|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
12.12.2007, 21:44 | #1 |
Регистрация: 12.12.2007
Сообщений: 4
|
Проверка Edit, через val..
ребят помогите, суть в том, что нужно для Edit'ов сделать проверку, не ввели ли случайно символы вместо цифр, причем только с помощью Val(таково требование препода). Как ни пробовал не получается.проверку нужно сделать через цикл repeat until.Сделал так,проверку выполняет, делает проверку, если некорректный ввод, выводит сообщение о ошибке, и на этом и останавливается, как сделать чтоб после этого прога возвращалась к началу?
Код:
Последний раз редактировалось Alex21; 12.12.2007 в 22:15. Причина: [code] [/code] |
13.12.2007, 17:09 | #2 |
Форумчанин
Регистрация: 26.04.2007
Сообщений: 440
|
1.Если ты хочешь проверять свои строчки каждую секунду-для этого есть компонент таймер.
2. Цикл repeat until здесь явно не к месту.Лучше всего сделать проверку значений эдита в процедуре edit1.change,либо отлавливать сообщение EN_CHANGE либо если этот нужен то надо использовать goto. + Я так понял что надо выводить messagedlg всякий раз если хотя бы в одном из эдитов есть другие символы кроме чисел. Поэтому надо: Код:
|
13.12.2007, 20:19 | #3 |
Телепат с дипломом
Старожил
Регистрация: 10.06.2007
Сообщений: 4,929
|
Вот пример из справки Дельфи
Код:
{$R+} An out-of-range value always generates a run-time error. {$R-} The values for out-of-range vary depending upon the data type of V.
The future is not a tablet with a 9" screen no more than the future was a 9" black & white screen in a box. It’s the paradigm that survives. (Kroc Camen)
Проверь себя! Онлайн тестирование | Мой блог |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
через какую сетевую карту входить в инет, а через какую в лан | шКОЛЯР | Свободное общение | 2 | 27.06.2008 17:55 |
SSL через WinSock или через что? | Jolyk | Win Api | 2 | 07.06.2008 17:37 |
Проверка переменных | *_ViruS_* | Общие вопросы C/C++ | 3 | 21.09.2007 21:33 |
Проверка на сжатие | vitalik007 | Общие вопросы Delphi | 3 | 20.08.2007 10:53 |