Текущий архив: 2007.01.21;
Скачать: CL | DM;
Вниз
Запрет ввода Найти похожие ветки
← →
Серый © (2006-12-26 22:16) [0]Как в StringGrid организовать запрет ввода всех символов кроме цифр и точки?
← →
Джо © (2006-12-26 22:38) [1]> [0] Серый © (26.12.06 22:16)
> Как в StringGrid организовать запрет ввода всех символов
> кроме цифр и точки?procedure TForm1.StringGrid1KeyPress(Sender: TObject; var Key: Char);
const
AllowedSymbols: TSysCharSet = ["0".."9",".",#8];
begin
if not (Key in AllowedSymbols) then
Key := #0
end;
← →
Джо © (2006-12-26 22:38) [2]+ можно поколдовать с маской ввода в событии OnGetEditMask, но это на любителя.
← →
Сергей М. © (2006-12-27 09:26) [3]
> Серый © (26.12.06 22:16)
Что будешь делать вот с таким
789.54752...54..045587
?
Как видишь, в строке присутствуют только цифровые символы и символы точки, т.е. изначальное твое условие неукоснительно соблюдено.
Страницы: 1 вся ветка
Текущий архив: 2007.01.21;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.032 c
