GARANTIR DESCONTO

Fórum OnExit de Um maskedit #352046

18/01/2008

0

Tenho várias rotinas no evento OnExit de uma maskedit. O que eu preciso, é que quando o usuário no Maskedit digitar CTRL+TAB, o evento OnExit não seja disparado e o cursor volta para o Edit anterior. Como faço?


Paulo

Paulo

Responder

Posts

18/01/2008

Flyskin

testa no início do evento se foi teclado as teclas que voce quer, no caso o CTRL+TAB.
se for, joga o foco para o campo desejado senão continua os procedimentos como está.


Responder

Gostei + 0

18/01/2008

Paulo

Acho que eu não expliquei bem a minha dúvida. Como faço para capturar o valor das teclas CRTL+TAB no OnExit de um Maskedit? É isso que eu quero.


Responder

Gostei + 0

18/01/2008

Djjunior

vc não faz isso no onExit e sim no OnKeyPres ou OnKeyDown


Responder

Gostei + 0

18/01/2008

Paulo

Isso eu sei. Por isso a pergunta: Como faço para capturar o OnKeyPress de dentro de um OnExit? Como ler a tecla pressionada.


Responder

Gostei + 0

18/01/2008

Dbergkamps10

Ola

Tente Assim:
var
PressTab: Boolean;

procedure TForm1.Button1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
case key of
VK_TAB: PressTab:=true;
end;
end;

procedure TForm1.Edit1Exit(Sender: TObject);
begin
if PressTab = true then
 VoltaFocoEditAnterior;
end;


Espero ter ajudado.

Att
Dalton


Responder

Gostei + 0

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

Aceitar