Главная страница
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.055 c
4-1157332644
Viacheslav
2006-09-04 05:17
2007.01.21
Диалог "Свойства".


15-1167566081
Riply
2006-12-31 14:54
2007.01.21
С Новым Годом Всех !


2-1167381892
KyRo
2006-12-29 11:44
2007.01.21
Помогите написать запрос


15-1167751512
_uw_
2007-01-02 18:25
2007.01.21
Приоритет потоков


2-1167139820
Гульназ
2006-12-26 16:30
2007.01.21
Как написать запросы?