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

[Polotenchik]

Мне нужно в edit вводить только цифры. Как я понял для этого надо использовать MaskEdit, но вот какую создать маску я так и не понял. Цифра может быть любая: 12,1 ; 120 ; 12,12120 ; 1,1201

Подскажите пожалуйста!

[mihali4]

Достаточно в хэлпе взять и ознакомиться с темкой "TEditMask type".
Нужно же изучать свойства и методы используемых компонентов - это ведь так просто!
И тогда вы сами бы написали нужную маску - типа "9999,999999".

[Polotenchik]

У меня есть таблица символов маски только понять не могу как сделать.
что-то типа "9999,999999" или "0000,000000"
разрешает вводить 4 цифры после которых идет запитая, а потом еще несколько цифр (столько, сколько указано в маске). А я говорю, что у меня любая цифра может быть с любым количество знаков и запятая может быть в любом месте.
Вот в чем вопрос?!

[Evgeniy26]

Кидай Edit и в OnKey... делай синтаксический разбор введенных значений.

[Polotenchik]

Сообщение от Evgeniy26

Кидай Edit и в OnKey... делай синтаксический разбор введенных значений.

Не подкинете код? Просто весь, что приведен в инете либо без возможности ввода чисел с запятой, либо можно скопировать текст из буфера. А мне надо, что бы только цифры можно было вводить и с запятой.

Помогите пожалуйста.

[Pedro]

Событие OnKeyPress у Edit:

procedure TForm5.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
case key  of
'0'..'9',#8,',':;
else
key:=#0;
end;
end;

[Polotenchik]

Сообщение от Pedro

Событие OnKeyPress у Edit:

procedure TForm5.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
case key  of
'0'..'9',#8,',':;
else
key:=#0;
end;
end;

Все здорово, только вот можно из буфера текст вставить, как и от этого избавиться?

[Polotenchik]

Здесь есть что-то похожее http://www.programmersforum.ru/showthread.php?t=82, но там нельзя писать числа с запятой. Может как-то совместить эти 2 кода?!

[Evgeniy26]

http://www.programmersforum.ru/showthread.php?t=28085 Делай синтаксический разбор значения в буфере, если число вставляй.

[Polotenchik]

Чет накладно выходит! Мне же надо, чтобы нельзя было копировать только текст, а цифры та оставить...