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

Как разрешить в Edit определенные символы?   Найти похожие ветки 

← →
JEK2   (2006-01-18 22:15) [0]

if not (Key in ["0".."9"]) then Key := #0;
разрешает только цифры, а как еще разрешить VK_DELETE

---

← →
Johnmen ©   (2006-01-18 23:28) [1]

if Key in [Ord("0")..Ord("9"),VK_DELETE] then
в OnKeyDown

---

← →
Кефир87 ©   (2006-01-18 23:45) [2]

.. или там-же
["0".."9", chr(VK_DELETE), chr(VK_BACK)]
Читай учебник по паскалю. Раздел множества 8)

---

← →
Johnmen ©   (2006-01-18 23:49) [3]

>Кефир87 ©   (18.01.06 23:45) [2]

Нет. Так неправильно, ибо клавиша Del функциональная и char"а не имеет.

---

← →
Кефир87 ©   (2006-01-19 00:11) [4]

> Johnmen ©   (18.01.06 23:49) [3]

А... Точно... Забыл. Это я просто про бэкспейс подумал...

---

← →
stef ©   (2006-01-19 07:01) [5]

А почему ни попробывать maskedit; или если там одни цифры нужно вводить, то вообще spinedit.

---

← →
Ega23 ©   (2006-01-19 10:44) [6]

> или если там одни цифры нужно вводить, то вообще spinedit.


Потому, что число 255 можно и как $FF представить...

---

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

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



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