| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как разрешить в Edit определенные символы?
JEK2 © (2006-01-18 22:15:00)if not (Key in ['0'..'9']) then Key := #0;
разрешает только цифры, а как еще разрешить VK_DELETE
Ega23 (2006-01-19 10:44:00) [1]
> или если там одни цифры нужно вводить, то вообще spinedit.
Потому, что число 255 можно и как $FF представить...
stef (2006-01-19 07:01:00) [2]А почему ни попробывать maskedit; или если там одни цифры нужно вводить, то вообще spinedit.
Кефир87 (2006-01-19 00:11:00) [3]
> Johnmen © (18.01.06 23:49) [3]
А... Точно... Забыл. Это я просто про бэкспейс подумал...
Johnmen (2006-01-18 23:49:00) [4]>Кефир87 © (18.01.06 23:45) [2]
Нет. Так неправильно, ибо клавиша Del функциональная и char'а не имеет.
Кефир87 (2006-01-18 23:45:00) [5].. или там-же
['0'..'9', chr(VK_DELETE), chr(VK_BACK)]
Читай учебник по паскалю. Раздел множества 8)
Johnmen (2006-01-18 23:28:00) [6]
if Key in [Ord('0')..Ord('9'),VK_DELETE] then
в OnKeyDown
| |
