Вниз
Скачать: 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.033 c
14-1099565233
КаПиБаРа
2004-11-04 13:47
2004.11.21
Оформление заголовков модулей


6-1095128280
inkarik
2004-09-14 06:18
2004.11.21
Internet


4-1097351708
AlexeyM
2004-10-09 23:55
2004.11.21
размер процесса


1-1099495453
Виктор
2004-11-03 18:24
2004.11.21
Добавить в PageControl TabSheet из программы.


4-1097348954
Sphinx
2004-10-09 23:09
2004.11.21
Таймер




   Наверх