Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.02.05;
Скачать: [xml.tar.bz2];

Вниз

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

Форум: "Начинающим";
Текущий архив: 2006.02.05;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.45 MB
Время: 0.031 c
1-1136283831
sergg
2006-01-03 13:23
2006.02.05
Запрет редактирования элементов Items в Combobox


10-1112891389
eugene32
2005-04-07 20:29
2006.02.05
Поиск в Excel. :(


2-1137844569
FunkyByte
2006-01-21 14:56
2006.02.05
Перекрытие конструктора с расширенным набором параметров


2-1137354521
mctarik
2006-01-15 22:48
2006.02.05
Запуск приложения, только один раз за сеанс Windows!


15-1137252416
McSimm
2006-01-14 18:26
2006.02.05
Обнаружено сканирование портов с адреса delphimaster.ru





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский