Дата: Воскресенье, 01.11.2015, 14:31 | Сообщение # 1
Участник
Зарегистрирован: 16.08.2013
Группа: Пользователи
Сообщений: 67
Статус: Offline
Привет всем, давно тут не появлялся, я хочу написать код проверки числа, например: если ровно 50 или больше (число в переменной string) то нечего не делает, если меньше выводим messagbox , я знаю как сделать , но я каждые цифры расписываю, так не удобно, так
if (a < b) and (a < c) then l := a else if (b < a) and (b < c) then
Объясните покажите За одну ночь нельзя изменить свою жизнь, но за одну ночь можно изменить мысли которые изменят твою жизнь. (MAS)
Дата: Воскресенье, 01.11.2015, 15:59 | Сообщение # 3
Был не раз
Зарегистрирован: 29.10.2015
Группа: Пользователи
Сообщений: 6
Статус: Offline
Код
var i:integer; begin if not trystrtoint(edit1.text,i) then raise exception.create('Введенное значение не является числовым!'); if i>=100 then showmessage('Больше или равно'); end;
