|
|
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
22.09.2018, 02:46
|
|||
|
|||
Как изменить условие
Подскажите пожалуйста, такой код:
Код:
procedure TForm1.Button7Click(Sender: TObject);
begin
if (RadioGroup2.ItemIndex=0) and (Edit12.text<'18') then
Edit13.Text := FloatToStr(1.5);
end;как сделать чтобы в условии здесь ...and (Edit12.text<'18') then... было не "меньше 18" а "от 1 до 18". |
Древовидный вид