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

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

Автоматический переход фокуса с TEdit на TEdit [D6, Win2k]


diabolik_krsk ©   (2004-11-04 08:46:00) 

Уважаемые мастера. Вопрос следующий.

На форме лежит 3 и более компонента Edit. Мне необходимо произвести переход фокуса с одного эдита на другой при достижении текста в Edit определенной длинны.
Например: у меня есть номер 24:50:0400021:0032.
В результате у меня на форме 4 TEdit. В первый и второй должно входить по 2 символа, в третий - 7 символов, в четвертый - 4 символа.
Так вот как такое сделать??


diabolik_krsk   (2004-11-04 11:45:00) [1]


> begin...end ©   (04.11.04 09:35) [4]


Спасибо.


begin...end   (2004-11-04 09:35:00) [2]


> [2] diabolik_krsk   (04.11.04 09:20)

procedure TMyForm.Edit1Change(Sender: TObject);
begin
 if Length(Edit1.Text) = 2 then
   Edit2.SetFocus
end.

> [3] Fay ©   (04.11.04 09:31)

LOL


Fay   (2004-11-04 09:31:00) [3]

begin
 ShowMessage('TEdit.OnChange; Length; TWinControl.SetFocus ?');
end;


diabolik_krsk   (2004-11-04 09:20:00) [4]

А поподробней?? Кусок кода хоть можно??


begin...end   (2004-11-04 08:52:00) [5]

TEdit.OnChange; Length; TWinControl.SetFocus ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо