Pular para o proximo componente automaticamente!
Tenho usado nos meus sistemas o setfocus para pular para o proximo componente ´editavel´.
Para otimizar mais o codigo, tem algum comando que ao finalizar a função do atual componnente, ele pula para o proximo da lista ´TabOrder´ automaticamente sem ficar especificando qual é?
Para otimizar mais o codigo, tem algum comando que ao finalizar a função do atual componnente, ele pula para o proximo da lista ´TabOrder´ automaticamente sem ficar especificando qual é?
Fausto.malheiros
Curtidas 0
Respostas
Steve_narancic
14/10/2009
no OnKeyPress do Form
{** Enter funcionar como Tab, caso o foco não estiver em uma grid}
if (key = #13) and (not (Screen.ActiveControl is TCustomGrid)) then
begin
key := 0;
Screen.ActiveForm.Perform(WM_NextDlgCtl, 0, 0);
end;GOSTEI 0
Fausto.malheiros
14/10/2009
Vlw Steve. Obrigado!
GOSTEI 0