Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 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.03 c
4-1155585641
maxistent
2006-08-15 00:00
2007.01.21
Как получить данные из чужого контрола?


15-1167233205
Parus
2006-12-27 18:26
2007.01.21
Новый год


4-1157991343
alexandrine
2006-09-11 20:15
2007.01.21
SHFileOpStruct


2-1167906518
igor66613
2007-01-04 13:28
2007.01.21
Кнопка из ДЛЛ


15-1167799269
Думкин
2007-01-03 07:41
2007.01.21
На юге Москвы пасмурно, на СЗ столицы.. , на Дальнем Востоке +5.