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

Вниз

Как вести в TEdit только цифры   Найти похожие ветки 

 
Gawk   (2003-10-09 11:14) [0]

Здравствуй Уважаемый ALL.
Подскажите мне как в TEdit вводить только цифры.
Заранее благодарен


 
Skier   (2003-10-09 11:15) [1]

стиль ES_NUMBER


 
TUser   (2003-10-09 11:21) [2]

Можно использовать св-во MaskEdit. Или еще так

procedure OnKeyPress(var Key);
begin
if not key in ["0","1", и т.д., "9"] then key:="";
end;


 
Gawk_   (2003-10-09 11:49) [3]


> стиль ES_NUMBER

Не подскажешь как работать со стилями если чесно я про них первый раз слышу.


> procedure OnKeyPress(var Key);
> begin
> if not key in ["0","1", и т.д., "9"] then key:="";
> end;

Выдаёт ошибку о несоответствии типов


 
AlexSV   (2003-10-09 11:55) [4]

А так
if not key in ["0".."9"] then key:=#0;


 
-=[SDA]=-   (2003-10-09 11:55) [5]

На OnKeyPress я писал так:

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


 
TUser   (2003-10-09 12:00) [6]

Со стилями? В смысле, что писать в MaskEdit. Если надо, чтобы вводились только цифры - то в IDE есть специальный редактор, вызывается из Object Inspector"а. Там все интуитивно-понятно. Ну и в хелпе что-то есть. Maskedit, собственно, записывается, как regular expretion в каком-нибудь перле или JavaScript, почти по том же правилам.



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

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

Наверх





Память: 0.45 MB
Время: 0.007 c
1-65410
Pavel Obishenko
2003-10-08 01:01
2003.10.20
SpeedButton и картинка


1-65460
Gawk
2003-10-09 11:14
2003.10.20
Как вести в TEdit только цифры


1-65530
Serguar
2003-10-09 12:34
2003.10.20
Как узнать что произошла смена суток


6-65569
ArtAlex
2003-08-19 15:34
2003.10.20
Submit в Webbrowser


14-65600
cyborg
2003-10-01 15:43
2003.10.20
Аналог Sleep, SleepEx





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский