Скачать: CL | DM;

Автоматический переход фокуса с TEdit на TEdit   Найти похожие ветки 

← →
diabolik_krsk   (2004-11-04 08:46) [0]

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

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

---

← →
begin...end ©   (2004-11-04 08:52) [1]

TEdit.OnChange; Length; TWinControl.SetFocus ?

---

← →
diabolik_krsk   (2004-11-04 09:20) [2]

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

---

← →
Fay ©   (2004-11-04 09:31) [3]

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

---

← →
begin...end ©   (2004-11-04 09:35) [4]

> [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

---

← →
diabolik_krsk   (2004-11-04 11:45) [5]

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


Спасибо.

---

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

Скачать: CL | DM;



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