Fórum Enter no DBGrid #319633

20/04/2006

0

Como eu faço para substituir o tab pelo enter em um DBGrid?


Gbrezolini

Gbrezolini

Responder

Posts

20/04/2006

Paullsoftware

eu faço assim:
if Key = #13 then
if not (ActiveControl is TDBGrid) then
begin
Key := 0;
Perform(WM_NEXTDLGCTL, 0, 0);
end
else if (ActiveControl is TDBGrid) then
with TDBGrid(ActiveControl) do
if selectedindex < (fieldcount -1) then
selectedindex := selectedindex +1

espero ter ajudado :wink:


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar