Форум: "Начинающим";
Текущий архив: 2011.10.30;
Скачать: [xml.tar.bz2];
ВнизКомпонент tEdit Найти похожие ветки
← →
set666 (2011-07-12 01:49) [0]Как сделать так что бы в компонент tEdit можно было ввводить только числа, то есть цифры и запятую ?
← →
Германн © (2011-07-12 02:26) [1]В OnKeyPress проверять какая клавиша нажата.
← →
set666 (2011-07-12 02:39) [2]ну это понятно допустим что я знаю значение переменной key если оно мне неподходит то что делать ?
← →
Германн © (2011-07-12 03:00) [3]
> если оно мне неподходит то что делать ?Key:=#0;
← →
Anatoly Podgoretsky © (2011-07-12 10:02) [4]> set666 (12.07.2011 01:49:00) [0]
Это не живое и тебя побьют
← →
Омлет © (2011-07-12 10:17) [5]
procedure TForm1.edt1KeyPress(Sender: TObject; var Key: Char);
begin
Key := chr(integer(Key in ["0".."9", ","]) * ord(Key));
end;
← →
Smile (2011-07-12 10:21) [6]Лучше вместо
","
- DecimalSeparator,
но это не решает проблему ввода более одного сепаратора, да и много других проблем ...
← →
Игорь Шевченко © (2011-07-12 10:59) [7]Омлет © (12.07.11 10:17) [5]
Давить за такой код
← →
Омлет © (2011-07-12 11:17) [8]> Игорь Шевченко © (12.07.11 10:59) [7]
Согласен )
← →
Gu (2011-07-12 11:46) [9]там же вроде в маскедит все это есть
← →
Sha © (2011-07-12 12:38) [10]> set666
Некоторые еще длину ввода ограничивают.
Лечится переводом программиста в операторы на недельку-другую.
← →
Dennis I. Komarov © (2011-07-12 15:46) [11]проверять надо после, а не во время...
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2011.10.30;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.004 c