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

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

Переход курсора в Edit

Lonix ©   (2007-02-22 18:46:00) 

У меня на фоме два элемента Edit1 и Edit2. В Edit1 стоит ограничение, ввести можно лишь  8 символов, как сделать так чтобы после ввода 8 символов курсор сам автоматически переходил в Edit2

---

RASkov   (2007-02-22 19:42:00) [1]

Вот один из простых способов
или на KeyUp
procedure TForm.Edit1KeyUp();
begin
  if (Length(Edit1.Text)=8) then Edit2.SetFocus;
end;
или на изменение
procedure TForm.Edit1Change();
begin
 if (Length(Edit1.Text)=8) then Edit2.SetFocus;
end;
ведут себя немного по разному...

---

Наверх