| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

как... [D6, WinXP]

md ©   (2006-04-05 21:50:00) 

Как сделать, чтобы после ввода текста в текстовое поле и нажав Enter, фокус переходил следующему полю или кнопке ?

---

EXILE   (2006-04-06 11:13:00) [1]

> md   (05.04.06 21:50)

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


---

Leonid Troyanovsky   (2006-04-06 09:59:00) [2]

> Джо ©   (05.04.06 22:18) [2]

> В обработчике OnKeyPress для всех Edit'ов:


http://groups.google.com/group/fido7.ru.delphi.chainik/msg/9882c0fd38c38706

--
Regards, LVT.

---

Джо   (2006-04-05 22:18:00) [3]

В обработчике OnKeyPress для всех Edit'ов:
 if Key = #13 then
   Perform (WM_NEXTDLGCTL,0,0)


---

Andy BitOff   (2006-04-05 21:59:00) [4]

SetFocus в обработчике OnKeyPress

---

Наверх