 |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
 
|
|
Как проверить корректность ввода числа? 
| Лапоть |
|
|||
 Бывалый  Профиль Группа: Участник Сообщений: 185 Регистрация: 3.4.2009 Репутация: нет Всего: 2 |
Подскажите пожалуйста - есть ли в Дельфи аналоги сишных функций isAlpha(), isDigit(), atoi()?
Задачка-то тривиальная - в TEdit вводится значение года и надо проверить корректность этого ввода. Ничего, кроме StrToInt() в скобках try...except не придумал. Это сообщение отредактировал(а) Лапоть - 14.4.2009, 15:16 |
|||
|
||||
Загрузка ...
| Rrader |
|
|||
|
Inspired =) Профиль Группа: Экс. модератор Сообщений: 1535 Регистрация: 7.5.2005 Репутация: 70 Всего: 191 |
Функция Val, параметр Code - для целых чисел
|
|||
|
||||
Дата 14.4.2009, 17:04 (
| Данкинг |
|
|||
 Yersinia pestis Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 9 Всего: 130 |
ИМХО - это лучшее, что можно придумать. Если ещё некая функция "TryInToStr", но в ней без поллитры не разберёшься. -------------------- There's nothing left but silent epitaphs. |
|||
|
||||
| MetalFan |
|
|||
 Аццкий Сотона Профиль Группа: Комодератор Сообщений: 3815 Регистрация: 2.10.2006 Где: Moscow Репутация: 62 Всего: 128 |
 мож TryStrToInt ?? -------------------- There are always someone smarter than you... |
|||
|
||||
| Данкинг |
|
|||
|
Yersinia pestis Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 9 Всего: 130 |
Ну да, она самая.  -------------------- There's nothing left but silent epitaphs. |
|||
|
||||
| Alexeis |
|
|||
 Амеба  Профиль Группа: Админ Сообщений: 11743 Регистрация: 12.10.2005 Где: Зеленоград Репутация: 109 Всего: 459 |
Если число имеет строгий формат, например IP шник, то может подойти TMaskEdit.
-------------------- Vit вечная память. Обсуждение действий администрации форума производятся только в этом форуме гениальность идеи состоит в том, что ее невозможно придумать |
|||
|
||||
| Keeper89 |
|
||||
|
Эксперт Профиль Группа: Завсегдатай Сообщений: 2580 Регистрация: 26.2.2009 Репутация: 20 Всего: 58 |
Для целых чисел подойдет как Val, так и TryStrToInt как уже сказали выше.
Вот примерчик для последней: Описание
Это сообщение отредактировал(а) Keeper89 - 14.4.2009, 22:51 |
||||
|
|||||
| Лапоть |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 185 Регистрация: 3.4.2009 Репутация: нет Всего: 2 |
Всем спасибо!
 Я так понимаю, что и Val(), и TryStrToInt() таки внутри себя генерят исключение в случае ошибки, но плюс в том, что его не надо самому ручками обрабатывать. Учитывая менталитет юзеров, буду пользоваться Val() с выдачей подсказки - где наврано! |
|||
|
||||
| Poseidon |
|
|||
 Delphi developer Профиль Группа: Комодератор Сообщений: 5273 Регистрация: 4.2.2005 Где: Гомель, Беларусь Репутация: 53 Всего: 133 |
-------------------- Если хочешь, что бы что-то работало - используй написанное, если хочешь что-то понять - пиши сам... |
|||
|
||||
| Лапоть |
|
|||
|
Бывалый Профиль Группа: Участник Сообщений: 185 Регистрация: 3.4.2009 Репутация: нет Всего: 2 |
В реальной программе в Едит вводится либо ГОД, либо ИНТЕРВАЛ ГОДОВ (возможные значения - от 1942 до CurrentYear()). Так что пикать юзеры запарятся.
|
|||
|
||||
|
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
[ Время генерации скрипта: 0.0593 ] [ Использовано запросов: 22 ] [ GZIP включён ]
Реклама на сайте Информационное спонсорство
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |