usar o Enter em CLX

Question

Pessoal,como utilizar o Enter ao inv�s do Tab em Kylix / CLX ???Algu�m tem a dica para me informar?Obrigado!...

Anonymous · Answer

Criei uma nova classe e dei override nos m�todos abaixo:

procedure Txxxx.KeyDown(var Key: Word; Shift: TShiftState);
begin
if (Key = Key_Return) or (Key = Key_Enter) then
begin
Txxxx(GetParentForm(Self)).SelectNext(Self,true,true)
end;
inherited KeyDown(Key,Shift);
end;

procedure Txxxx.ReturnPressed(var Suppress: Boolean);
begin
Suppress := true;
end;

Anonymous · Answer

[quote:1a5feba733=�Jack Stone�]Pessoal,como utilizar o Enter ao inv�s do Tab em Kylix / CLX ???Algu�m tem a dica para me informar?Obrigado![/quote:1a5feba733]//forum.clubekylix.com.br/viewtopic.php?p=91#91...