Alterar tecla de atalho TAB para ENTER

Delphi

02/02/2021

Olá, estou desenvolvendo um projeto em delphi, mas a pessoa que pediu para eu realizar o desenvolvimento dele necessita que a tecla de atalho a ser usada seja o ENTER.
Já li diversos tópicos deste e outros foruns e nenhum funcionou. Se for possivel me ajudem.

Software:
Delphi 10.3 Rio
VCL
Guilherme Discher

Guilherme Discher

Curtidas 0

Melhor post

Paulo

Paulo

03/02/2021

Olá, estou desenvolvendo um projeto em delphi, mas a pessoa que pediu para eu realizar o desenvolvimento dele necessita que a tecla de atalho a ser usada seja o ENTER.
Já li diversos tópicos deste e outros foruns e nenhum funcionou. Se for possivel me ajudem.

Software:
Delphi 10.3 Rio
VCL


No OnKeyDown do Form adiciona esse código

if Key = VK_RETURN then
   perform(WM_NEXTDLGCTL,0,0);


No form mude a opção KeyPreview para true.

GOSTEI 2

Mais Respostas

Guilherme Discher

Guilherme Discher

02/02/2021

Olá, estou desenvolvendo um projeto em delphi, mas a pessoa que pediu para eu realizar o desenvolvimento dele necessita que a tecla de atalho a ser usada seja o ENTER.
Já li diversos tópicos deste e outros foruns e nenhum funcionou. Se for possivel me ajudem.

Software:
Delphi 10.3 Rio
VCL


No OnKeyDown do Form adiciona esse código

if Key = VK_RETURN then
   perform(WM_NEXTDLGCTL,0,0);


No form mude a opção KeyPreview para true.



Consegui resolver com isto:
 if (Key = #13) then begin
  Key := #0;
  Perform(Wm_NextDlgCtl,0,0);
  end;


Mas mesmo assim, obrigado pela ajuda :)
GOSTEI 0
POSTAR