|
MAS
|
Дата: Воскресенье, 01.11.2015, 14:31 | Сообщение # 1
|
Участник
Зарегистрирован: 16.08.2013
Группа: Пользователи
Сообщений: 66
Статус: Offline
|
Привет всем, давно тут не появлялся,
я хочу написать код проверки числа, например: если ровно 50 или больше (число в переменной string) то нечего не делает, если меньше выводим messagbox , я знаю как сделать , но я каждые цифры расписываю, так не удобно, так
if (a < b) and (a < c) then
l := a
else if (b < a) and (b < c) then
Объясните покажите 
За одну ночь нельзя изменить свою жизнь, но за одну ночь можно изменить мысли которые изменят твою жизнь. (MAS)
|
| |
|
|
|
MAS
|
Дата: Воскресенье, 01.11.2015, 15:51 | Сообщение # 2
|
|
Участник
Зарегистрирован: 16.08.2013
Группа: Пользователи
Сообщений: 66
Статус: Offline
|
так попробовал
begin
if '100'>=(edit1.text) then
else
showmessage('Больше или равно!');
end;
безрезультатно
За одну ночь нельзя изменить свою жизнь, но за одну ночь можно изменить мысли которые изменят твою жизнь. (MAS)
Сообщение отредактировал MAS - Воскресенье, 01.11.2015, 16:06
|
| |
|
|
|
Гнилушка
|
Дата: Воскресенье, 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;
Совсем сайт сгнил ;( Одни крысы тут сидят.
|
| |
|
|
