Табуляция из одного Edit в другой [D7, WinXP]
ronyn © (2005-08-01 00:24:00)
Как сделать, что бы при вводе пароля при заполнении одного
Edit1
например на 4 знака ввод автоматически переносился в
следующий Edit2? заранее благодарен.
Delphi_is_cool (2005-08-01 00:38:00) [1]
Надо измерять длину текста в Edit1, и если текст равен 4
установить
св-во ActiveControl на Edit2.
событие OnKeyPress у edit1
var
TxtLen: Integer;
begin
TxtLen := Length(edit1.text);
if TxtLen >= 4 then ActiveControl := edit2;
end;
Наверх 
ЧАТ |
Орешник |
|
