Como fazer p/ aceitar [enter] ao inves do [tab] na digitação

Delphi

24/03/2003

Eu gostaria de saber como faço para aceitar [enter] ao inves do [tab] na digitação de dados porque os usuário estão acostumados com essa tecla.

Obrigado,

Airton


Airton Santos

Airton Santos

Curtidas 0

Respostas

Okama

Okama

24/03/2003

Defina KeyPreview como true em seu form e insira esse código em onKeyPress:


if Key = #13 then begin
perform(WM_NEXTDLGCTL,0,0);
Key :=0;
end;


GOSTEI 0
POSTAR