Delphi - Помощь студентам

Владимир1988 · 11.11.2009, 10:58

Подскажите пожалуйста как вернуться обратно для ввода значений если они не подходят под заданное правило, но чтобы при этом строка TLabel также отражалась. Если использую goto то програма виснет.
if v1 or v2>10 then
Label1.Caption := 'Значения v1 и v2 должно быть от 2 до 10';
v3:=v1+v2;
Form2.edit3.text:=floattostr(v3);

k1r1ch · 11.11.2009, 11:38

Код:

begin
  if (v1 > 10) or (v1 < 2) or (v2 > 10) or (v2 < 2) then 
  begin 
    Label1.Caption := 'Значения v1 и v2 должно быть от 2 до 10';
    Exit;
  end;
  v3:=v1+v2;
  Form2.edit3.text:=floattostr(v3); 
end;

Stilet · 11.11.2009, 12:25

Цитата:

как вернуться обратно для ввода значений

Куда возвращаться то?

k1r1ch · 11.11.2009, 13:24

2Stilet: Я как понял, это происходит по нажатию на батон.

Stilet · 11.11.2009, 13:34

Цитата:

k1r1ch

Это нам скажет автор.

Stilet · 11.11.2009, 13:34

Цитата:

k1r1ch

Это нам скажет автор.

11.11.2009, 10:58	#1
Владимир1988 Пользователь Регистрация: 10.11.2009 Сообщений: 25	Delphi Подскажите пожалуйста как вернуться обратно для ввода значений если они не подходят под заданное правило, но чтобы при этом строка TLabel также отражалась. Если использую goto то програма виснет. if v1 or v2>10 then Label1.Caption := 'Значения v1 и v2 должно быть от 2 до 10'; v3:=v1+v2; Form2.edit3.text:=floattostr(v3);

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
На Delphi 7 сделать игру кто хочет стать миллионером в delphi 7	666dart666	Помощь студентам	11	04.11.2010 17:57
Программа-тест в Delphi) скиньте))а то програмку здавать преподу надо,и самой хочется понять Delphi	Верчик	Помощь студентам	9	02.03.2009 17:46
Delphi. Как нарисовать в Delphi два движущиеся шара с определенной скоростью?	redred	Общие вопросы Delphi	10	11.12.2007 10:43
Как открыть БД, написанную в Delphi если нf другой машине Delphi нет?	dagarik	БД в Delphi	7	22.10.2007 17:54
не StringGrid1.Cells[1,1]:='Delphi'; а вот так SG1.C[1,1]:='Delphi'	Nemesisking	Компоненты Delphi	7	08.09.2007 03:27

11.11.2009, 13:24	#4
k1r1ch ACM! Форумчанин Регистрация: 19.06.2009 Сообщений: 382	2Stilet: Я как понял, это происходит по нажатию на батон.