usar o Enter em CLX

05/03/2003

1

Pessoal,

como utilizar o Enter ao invés do Tab em Kylix / CLX ???

Alguém tem a dica para me informar?


Obrigado!


Responder

Posts

13/03/2003

Anonymous

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;


Responder

20/03/2003

Anonymous

[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


Responder
×
+1 DevUP
Acesso diário, +1 DevUP
Parabéns, você está investindo na sua carreira