Возврат к проверке

← →
an-na2002 (2004-08-16 12:08) [0]

Как сделать чтобы при нажатии OK на ShowMessage программа возвращалась обратно к IF
begin
If Edit2.Text="" Then ShowMessage("Ошибка! Введите M");
....
....
end.

← →
Думкин © (2004-08-16 12:09) [1]

while Edit2.Text="" do ShowMessage("Ошибка! Введите M");

Удачного дня.

← →
mOOx © (2004-08-16 12:11) [2]

А как вообще сделать так, чтобы при нажатии на кнопку у меня что-то выполнялось?

← →
Рамиль © (2004-08-16 12:12) [3]

while Edit2.Text="" do
ShowMessage();

← →
VMcL © (2004-08-16 12:20) [4]

>>Думкин © (16.08.04 12:09) [1]
>>Рамиль © (16.08.04 12:12) [3]

Ну посоветовали, так посоветовали. Вечный цикл, ИМХО :-)

← →
КаПиБаРа © (2004-08-16 12:20) [5]

> while Edit2.Text="" do ShowMessage("Ошибка! Введите M");

Blbjnbpv

← →
VMcL © (2004-08-16 12:21) [6]

>>mOOx © (16.08.04 12:11) [2]

Для того, чтобы что-то выполнялось, нужно что-то написАть.

← →
Думкин © (2004-08-16 12:21) [7]

> [4] VMcL © (16.08.04 12:20)

Ух ты! Ты сразу догодался?
Я ничего не советовал, я просто ответил на вопрос. Или это не так?

← →
Anatoly Podgoretsky © (2004-08-16 12:25) [8]

VMcL © (16.08.04 12:20) [4]
Так он это и просил, правда с IF

← →
Sandman25 © (2004-08-16 12:26) [9]

[7] Думкин © (16.08.04 12:21)

Не-а. У тебя возврата к if не происходит. У тебя и if-а-то нет :)

← →
КаПиБаРа © (2004-08-16 12:27) [10]

> Думкин © (16.08.04 12:21) [7]
> > [4] VMcL © (16.08.04 12:20)
>
> Ух ты! Ты сразу догодался?
> Я ничего не советовал, я просто ответил на вопрос. Или это
> не так?

Летят Шерлок Холмс и доктор Ватсон на воздушном шаре. Заблудились. Видят мужик внизу идет.
- Ватсон: Добрый день. Не подскажете где мы аходимся.
- Мужик: На воздушном шаре.
- Ватсон: Что за идиот!
- Холмс: Это не идиот а программист. Ибо только программист может дать такой точный и бесполезный ответ.

← →
Думкин © (2004-08-16 12:28) [11]

> [9] Sandman25 © (16.08.04 12:26)

Ну условие то проверяется. :)
Хотя конечно, можно и так:

while 2=2 do If Edit2.Text="" Then ShowMessage("Ошибка! Введите M");

Можно бы и goto, но ... я его не пользую. :(

← →
Sandman25 © (2004-08-16 12:30) [12]

[11] Думкин © (16.08.04 12:28)

Все равно неправильно. При невыполнении условия зацикливания быть не должно.

repeat
If Edit2.Text="" Then
ShowMessage("Ошибка! Введите M");
else
break
until false;

← →
Vasya.ru (2004-08-16 12:35) [15]

an-na2002 (16.08.04 12:08)
Как сделать чтобы при нажатии OK на ShowMessage программа возвращалась обратно к IF
begin
If Edit2.Text="" Then ShowMessage("Ошибка! Введите M");
....
....
end.
Repeat
If Edit2.Text="" Then ShowMessage("Ошибка! Введите M");
Until (Edit.Text <> "");

Думкин © (16.08.04 12:09) [1] А реально помочь советом жаба душит?

> [15] Vasya.ru (16.08.04 12:35)

Я не понял - в чем беда? И Скажите мне о уважаемый, в чем такая прелесть вашего кода и ПРИНЦИПИАЛЬНОЕ отличие от моего.
По-моему, по своей бесполезности ваш код мало отличается от моего. Или как?

Возврат к проверке Найти похожие ветки