Trocar o Tab pelo Enter
Caro colegas!!!
Existe alguma função que troca a tab pela tecla enter, ou seja, eu programo a propriedade taborder para se deslocar para os campos que desejo, e ao pressionar enter ele percorre a taborder da tecla Tab....
pois utilizo a seguinte linha no evento onkeypress:
if key=#13 then campo.setfocus;
mais isso é muito demorado, imagine se eu tiver um form com 30 campos para serem preenchidos???
obrigado!!!
Existe alguma função que troca a tab pela tecla enter, ou seja, eu programo a propriedade taborder para se deslocar para os campos que desejo, e ao pressionar enter ele percorre a taborder da tecla Tab....
pois utilizo a seguinte linha no evento onkeypress:
if key=#13 then campo.setfocus;
mais isso é muito demorado, imagine se eu tiver um form com 30 campos para serem preenchidos???
obrigado!!!
Fernandocneto
Curtidas 0
Respostas
Okama
06/05/2003
No Evento OnkeyPress:
if Key = #13 then begin
perform(WM_NEXTDLGCTL,0,0);
Key :=0;
end;
Defina a propriedade KeyPreview do Form como True;
if Key = #13 then begin
perform(WM_NEXTDLGCTL,0,0);
Key :=0;
end;
Defina a propriedade KeyPreview do Form como True;
GOSTEI 0
Fernandocneto
06/05/2003
No Evento OnkeyPress:
if Key = #13 then begin
perform(WM_NEXTDLGCTL,0,0);
Key :=0;
end;
Defina a propriedade KeyPreview do Form como True;
Valeu Okama!!
essa foi legal!!!
GOSTEI 0