Текущий архив: 2009.05.24;
Скачать: CL | DM;

Вниз

Работа с интерфейсом в Delphi   Найти похожие ветки 

← →
bioss ©   (2009-04-08 12:28) [0]

Ребята, подскажите как сделать так что бы по нажатию Enter фокус ввода переходил из одного окна объекта Edit в следующее.
Пока он переходить только по нажатию Tab

---

← →
brother ©   (2009-04-08 12:30) [1]

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
 if key=#13 then Edit2.SetFocus;
end;

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
 if key=#13 then Edit3.SetFocus;
end;
итд.

---

← →
bioss ©   (2009-04-08 12:32) [2]

brother ©, спасибо!

---

Страницы: 1 вся ветка

Текущий архив: 2009.05.24;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.012 c