Передача фокуса элементу

← →
Avers (2012-04-25 11:22) [0]

Здравствуйте,заранее спасибо за помощь.На форме расположены два Edita.
Проблема:куда нужно прописать код ,чтобы при вводе определенного количества символов(к примеру 4) в Edit1, фокус ввода автоматически перешел к Edit2?

← →
AV © (2012-04-25 11:33) [1]

procedure TForm1.Edit1Change(Sender: TObject);
begin
if Length(Edit1.Text)> 3 then
Edit2.SetFocus;

← →
Avers (2012-04-25 11:44) [2]

Большое спасибо.Все работает.

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