![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Контроль ввода... [D5]
Cranium © (2002-12-02 03:29:00)Как разрешить ввод в TEit только цифр...
Kudatsky (2002-12-02 10:10:00) [1]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if not (Key in ["0".."9"]) then Key:=#0;
end;
Song (2002-12-02 07:23:00) [2]TEdit.onKeyPress или ES_NUMBER
Крот (2002-12-02 06:22:00) [3]Воспользуйтесь TMaskEdit