Hola amigos.
Estoy intentando
capturar si se pulsa la tecla TAB del teclado, pero no lo logro aún habiéndome estudiado la ayuda y consultando foros. Incluyendo este:
http://www.clubdelphi.com/foros/show...codigos+escape
Normalmente con la tecla Intro, lo he hecho del siguiente modo:
Código Delphi
[-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if(Key=#13) THEN
SHOWMESSAGE('INTRO')
ELSE
SHOWMESSAGE('???')
end;
... y me funciona de maravilla, pero si intento lo mismo para la tecla TAb, no me funciona.
Código Delphi
[-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if(Key=#9) THEN
SHOWMESSAGE('TAB')
ELSE
SHOWMESSAGE('???')
end;
También he probado para ver cual es el texto que me saldría, por si acaso no devolvía exactamente ese texto, pero me imprime blanco con el siguiente código.
Código Delphi
[-]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if(Key=VK_TAB) THEN
SHOWMESSAGE(WORDTOSTR(KEY))
ELSE
SHOWMESSAGE(WORDTOSTR(KEY))
end;
¿Alguien me podría decir como trabajar con las Virtual Keys Codes?. El fin es cuando pulse una determinada tecla de este tipo como (Tab, Esc, intro) realizar el evento que desee. Si sirve para algo... trabajo con D6 y WXP.
Gracias a todos.