GARANTIR DESCONTO

Fórum Cursor pulando de Edit para Edit #174582

12/08/2003

0

Duas perguntas:

1º - Como faço para saber a quantidade de caracteres que foi digitado em um Maskedit.

2º - Tenho um MaskEdit mascarado como data (__/__/__ para ser preenchido com um total de seis caracteres). Como faço para que no momento em que ele seja preenchido o cursor vá automaticamente para o seguinte MaskEdit.

Valeu Galera

Denysk


Denysk

Denysk

Responder

Posts

12/08/2003

Profjohnny

declare uma variavel na seção private do formulário e no evento onKeyPress do MaskEdit incremente esta variavel...

qualquer duvida entre em contato


Responder

Gostei + 0

12/08/2003

Marcelo

Depende... se o seu campo for apenas para cadastro voce pode optar pelo seguinte codigo, no evento OnChange...
[b:75a6446b8a]...
begin
if Length(Edit1.Text) = 6 then
begin
Perform(WM_NEXTDLGCTL, 0, 0);
end;
end;
...[/b:75a6446b8a]

Caso seu campo é usado tambem para visualizar dados, você terá que usar o evento OnKeyPress!

Valeu?


Responder

Gostei + 0

12/08/2003

Cebikyn

Para mudar de MaskEdit quando o usuário terminar de preenxe-lo, coloque no evento [b:4c44006c3b]OnChange[/b:4c44006c3b]:

  if Pos(´ ´, MaskEdit1.Text)=0
  then
    MaskEdit2.SetFocus;


A linha de código:

MaskEdit2.SetFocus;


pode ser substituida pela sugestão do marcelo:

Perform(WM_NEXTDLGCTL, 0, 0);


Ao marcelo: a função [b:4c44006c3b]Length(MaskEdit1.Text)[/b:4c44006c3b] quando usada em MaskEdits formatados para data ( __/__/__) [b:4c44006c3b]sempre[/b:4c44006c3b] retorna 8...


Responder

Gostei + 0

12/08/2003

Denysk

A propósito, é possivel colocar animações flash no Delphi? Como?


Responder

Gostei + 0

12/08/2003

Cebikyn

A propósito, é possivel colocar animações flash no Delphi? Como?


Sim. O [i:78d7d4cbe6]Flash Player[/i:78d7d4cbe6], quando instalado, copia um componente [i:78d7d4cbe6]ActiveX[/i:78d7d4cbe6] que visualiza *.swf direto no seu form, para instala-lo, clique em [b:78d7d4cbe6]Components[/b:78d7d4cbe6], depois em [b:78d7d4cbe6]Import ActiveX Control[/b:78d7d4cbe6], depois procure pelo Flash, depois de selecionar a opção desejada, clique no botão [b:78d7d4cbe6]Create Unit[/b:78d7d4cbe6] e depois em [b:78d7d4cbe6]Install[/b:78d7d4cbe6]. Depois procure pelo componente [b:78d7d4cbe6]TShockwavFlash[/b:78d7d4cbe6] na paleta [i:78d7d4cbe6]ActiveX[/i:78d7d4cbe6].


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar