Tecla Tab

[maxm.ro]

Ola pessoal,

Pra executar um evento quando pressiono a tecla ENTER faço isso:

If (Key = #13) then

begin

.

.

.

end;

E pra usar a Tecla "TAB" qual seria ?

[Jhonas]

Pra executar um evento quando pressiono a tecla TAB faço isso:

If (Key = #9) then

begin

.

.

.

end;

[maxm.ro]

coloquei dessa forma no evento onkeypress e não funcionou ... onde devo colocar ?

vlw obrigado...

[Jhonas]

procedure TForm1.DBGrid1KeyPress(Sender: TObject; var Key: Char);
begin
   if key = #9 then
     showmessage('tecla Tab clicada');
end;

[maxm.ro]

cara, Eu testei no DBGrid e Funcionou, só que nos campos que quero que são Edits e DBEdits não funcionou ...

você testou ai em DBEdts ?

se funcionar ai, pode ser porque eu estou utilizando delphi .net

[Jhonas]

estou usando delphi 3, 5 e 7 e o tab funciona normal tanto para edits como dbedits

[Vivendo&Aprendendo]

Ou você pode colocar no evento OnKeyDown da seguinte maneira:

If Key = VK_TAB then
   showmessage('tecla Tab clicada');

Abraços

Alexandre