Скачать: CL | DM;

Ввод данных   Найти похожие ветки 

← →
Xmen   (2004-01-17 10:56) [0]

Привет!
У меня такой вопрос.
Как можно в EDIT контролироват ввод только цифр и денежной информации ограниченной длины. Например: 45,32; 1212; 4545444,87 итд. для цифр до 7 , а для денежной информации 999999.99 . Я попробовал с помошью MaskEdit, но там в не заполненном месте остаётся символ "_". и денежная информация идет в виде 455___.__ Как можно организовать контроль ввода

---

← →
Tt   (2004-01-17 11:56) [1]

Можно, конечно, и вручную попытаться анализировать каждый вводимый символ в событии, кажется, OnKeyDown или OnKeyPressed. Если введен не числовой символ - сбрасывать его (Key := #0)

---

← →
Xmen   (2004-01-17 12:52) [2]

как можно отличить символ от цифр

---

← →
Palladin ©   (2004-01-17 13:14) [3]

сравнением

---

← →
Tt   (2004-01-17 13:32) [4]

И то верно
Сравнить if pos(Key, "0123456789")>0 then Key - цифра

---

← →
McSimm ©   (2004-01-17 13:33) [5]

В OnKeyPress

if not (Key in ["0".."9", #8, "."]) then Key := #0

---

← →
Xmen   (2004-01-17 13:49) [6]

Спасибо всем
>>McSimm © (17.01.04 13:33) [5]

>>В OnKeyPress

>>if not (Key in ["0".."9", #8, "."]) then Key := #0

Хоть чтото у меня получилось.
Вот еще вопрос по этому повуду #8 что это означает. Не можнали так сделат чтобы посли запятой вводилось только 2 цифры

---

← →
McSimm ©   (2004-01-17 14:24) [7]

> #8 что это означает

Позволяет стирать символы (backspace)


> вводилось только 2 цифры

Лучше всего все же с maskedit разобраться

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.012 c