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

Вниз

предусмотреть ввод данных в Edit   Найти похожие ветки 

 
Cijgan   (2005-06-05 18:34) [0]

Как в программе предусмотреть ввод данных в Edit, чтобы данные были в числом формате и если дробь, то через запятую?


 
Reindeer Moss Eater ©   (2005-06-05 18:55) [1]

Данные будут через запятую, если попросить пользователя вводить их через запятую в этот самый Edit


 
Хинт ©   (2005-06-05 19:02) [2]

Обрабатывать OnKeyPress. Если not (key in ["0".."9",","]) тогда key:=chr(0)


 
SergP ©   (2005-06-05 20:40) [3]


> Обрабатывать OnKeyPress. Если not (key in ["0".."9",","])
> тогда key:=chr(0)


Только вот тогда оно будет позволять вводить и такую фигню как 454,544,45,
что не есть хорошо...


 
begin...end ©   (2005-06-05 20:53) [4]

Во-первых, не OnKeyPress, а OnChange, потому что есть ещё буфер обмена.
Во-вторых, корректность ввода можно проверять с помощью TryStrToFloat.
В-третьих, ИМХО, не надо мешать пользователю вводить. Пусть введёт, а поругаться можно будет в дальнейшем, когда понадобится преобразование.


 
NeoVariant ©   (2005-06-05 22:17) [5]

А не легче использовать MaskEdit. Там можно выбирать и устанавливать тип маски ввода.


 
ssk ©   (2005-06-06 09:23) [6]

делал я как-то такое... даже наследника писал. для простоты работы.
вот он http://www.ucad.pisem.net/delphi_components/sskeditflint.zip

не дает ставить знак минуса где попало - только первым.
не дает ставить два DecimalSeparator"а.



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

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

Наверх




Память: 0.45 MB
Время: 0.042 c
14-1117742518
Cerberus
2005-06-03 00:01
2005.06.29
Чёто не пойму


1-1118264735
Новичок :)
2005-06-09 01:05
2005.06.29
Обработка собития формы !!!


14-1117127529
palva
2005-05-26 21:12
2005.06.29
Про гнилой строй


4-1114793145
Grell
2005-04-29 20:45
2005.06.29
Изменение BorderStyle


3-1116504029
makaron_x
2005-05-19 16:00
2005.06.29
Как добраться к значению поля через отображающий его DBText?





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