Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Компонент tEdit [D7]


set666 ©   (2011-07-12 01:49:00) 

Как сделать так что бы в компонент tEdit можно было ввводить только числа, то есть цифры и запятую ?


Dennis I. Komarov   (2011-07-12 15:46:00) [1]

проверять надо после, а не во время...


Sha   (2011-07-12 12:38:00) [2]

> set666

Некоторые еще длину ввода ограничивают.
Лечится переводом программиста в операторы на недельку-другую.


Gu   (2011-07-12 11:46:00) [3]

там же вроде в маскедит все это есть


Омлет   (2011-07-12 11:17:00) [4]

> Игорь Шевченко ©   (12.07.11 10:59) [7]

Согласен )


Игорь Шевченко   (2011-07-12 10:59:00) [5]

Омлет ©   (12.07.11 10:17) [5]

Давить за такой код


Smile   (2011-07-12 10:21:00) [6]

Лучше вместо ','- DecimalSeparator,
но это не решает проблему ввода более одного сепаратора, да и много других проблем ...


Омлет   (2011-07-12 10:17:00) [7]

procedure TForm1.edt1KeyPress(Sender: TObject; var Key: Char);
begin
 Key := chr(integer(Key in ['0'..'9', ',']) * ord(Key));
end;


Anatoly Podgoretsky   (2011-07-12 10:02:00) [8]

> set666  (12.07.2011 01:49:00)  [0]

Это не живое и тебя побьют


Германн   (2011-07-12 03:00:00) [9]


> если оно мне неподходит то что делать ?

Key:=#0;


set666   (2011-07-12 02:39:00) [10]

ну это понятно допустим что я знаю значение переменной key если оно мне неподходит то что делать ?


Германн   (2011-07-12 02:26:00) [11]

В OnKeyPress проверять какая клавиша нажата.


Наверх

Титульная страница Поиск, карта сайта Написать письмо