Código
próximo focus.
Vejam :
if (key = #13) then
begin
SelectNext(ActiveControl, true, true);
key := #0;
end;
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009