Как разрешить в 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]

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

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

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

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