usar o Enter em CLX

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;

[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]

http://forum.clubekylix.com.br/viewtopic.php?p=91#91