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

← →
Lonix (2007-02-22 18:46) [0]

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

← →
RASkov (2007-02-22 19:42) [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;
ведут себя немного по разному...

Переход курсора в Edit Найти похожие ветки