Форум: "Основная";
Текущий архив: 2004.11.21;
Скачать: [xml.tar.bz2];
ВнизАвтоматический переход фокуса с 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 вся ветка
Форум: "Основная";
Текущий архив: 2004.11.21;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.039 c