7/23/2015

Ir para determinado tedit

ex 1

ir para o edit1 apos pressionar enter

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);

begin
  if key = #13 then
  begin
    key := #0;
    Edit1.SetFocus;
  end;
end;

Nenhum comentário:

Postar um comentário