Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];
ВнизКак приостановить процесс работы проги? Найти похожие ветки
← →
kilop (2006-03-12 23:38) [0]for i:=1 to 5 do showmessage("Word");
выводиться пять раз сообщение "Word", причем пока мы не нажмем кнопку ОК то дальше шаг не пойдет, как мне это осуществить, но только нажимая кнопку на форме, а не в сообщении. Спасибо
← →
Petr V. Abramov © (2006-03-13 01:11) [1]> выводиться пять раз
без мягкого знака
> for i:=1 to 5 do showmessage("Word");
> ОК то дальше шаг не пойдет, как мне это осуществить,
А что надо осуществить-то???
← →
Плохиш © (2006-03-13 01:21) [3]
> kilop (13.03.06 01:14) [2]
Хм, очень информативно.
← →
Defunct © (2006-03-13 01:31) [4]kilop (12.03.06 23:38)
Примерно так:var flag: boolean;
procedure Suspend;
begin
flag := false;
while not flag do
begin
sleep(1);
Application.ProcessMessages;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
flag := true;
end;
...
for i := 1 to 5 do Suspend;
← →
Defunct © (2006-03-13 01:33) [5]> А что надо осуществить-то???
А что непонятного-то? В сабже все написано. Автор вопроса приостанавливал выполнение потока модальным диалогом, а теперь ему требуется то же самое только без доп. модальных окон.
← →
begin...end © (2006-03-13 08:40) [6]> Defunct © (13.03.06 01:33) [5]
> Автор вопроса приостанавливал выполнение потока модальным
> диалогом
Чушь. ShowMessage не приостанавливает никаких потоков.
← →
Defunct © (2006-03-14 07:21) [7]begin...end © (13.03.06 08:40) [6]
Ой!
ShowModal F1
A modal form is one where the application can’t continue to run until the form is closed.
← →
begin...end © (2006-03-14 07:41) [8]> Defunct © (14.03.06 07:21) [7]
LOL
И где в этой цитате хоть слово о каких-либо потоках?
← →
Defunct © (2006-03-14 09:57) [9]begin...end © (14.03.06 07:41) [8]
Или ты действительно такой тугодум или тебе просто захотелось повыстебываться по терминологии?
← →
begin...end © (2006-03-14 10:05) [10]> Defunct © (14.03.06 09:57) [9]
Чем хамить, лучше поясните, выполнение какого потока приостанавливает вызов ShowMessage.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.054 c