![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Есть ли альтернатива у Sleep и Exit? [D7, WinXP]
Reaktor © (2007-04-13 12:44:00)Обаружилось одно неудобство. Если Sleep продолжительный, то прога зависает конкретно и не дает даже свернуть окно самой программы (неговоря уже о работе с компонентами). Есть ли вариант, как сделать так, что бы программа заснула, но при этом можно было бы работать с ее окном и компонентами?
И еще вопрос. Есть ли альтернатива Exit, такая, что бы выход осуществлялся не из вызывающей процедуры, а из всей программы целиком?
{RASkov} (2007-04-14 23:12:00) [1]> А чем halt плох?
Initiates abnormal termination of a program.
Промт говорит:
Начинает неправильноезавершение программы. ;)
Reaktor (2007-04-14 22:52:00) [2]Позор мне. До последнего (3) мог бы и сам догадаться.
А чем halt плох?
S@shka (2007-04-13 23:55:00) [3]
> Есть ли вариант, как сделать так, что бы программа заснула,
> но при этом можно было бы работать с ее окном и компонентами?
>
1. использовать потоки
2. использовать ttimer
3. proceduere GoodSleep (Sleep_ :Integer);
var i : Intger;
begin
sleep_ := sleep div 100;
for i := 1 to sleep_ do
begin
sleep (100);
Application.processmessage;
end;
end;
homm (2007-04-13 22:58:00) [4]Удалено модератором
Belorus (2007-04-13 22:09:00) [5]Удалено модератором
Юрий Зотов (2007-04-13 12:58:00) [6]> Reaktor (13.04.07 12:44)
Подумайте сами: если программа "спит" (то есть, ничего не обрабатывает), то как можно с нею работать?
Поэтому в самой постановке вопроса уже есть противоречие и на такой вопрос ответ может быть только один - никак.
Есть много вариантов сделать так, чтобы программа чего-то дожидалась, но при этом юзер мог с нею работать (Application.ProcessMessages, второй поток, MsgWaitForMultipleObjects). Но чтобы ответить конкретно, нужно уточнить вопрос - чего именно программа должна дождаться?
Elen (2007-04-13 12:57:00) [7]
> ExitProcess (для них же)
Ну эт еще гуманно, но вот TerminateProcess...!
homm (2007-04-13 12:55:00) [8]> Например, Application.Terminate, MainForm.Close, Halt (для
> экстремалов), ExitProcess (для них же) ...
Зато для вызова первых 2-х нужно существование этих самых Application и MainForm :)
homm (2007-04-13 12:52:00) [9]> Есть ли вариант, как сделать так, что бы программа заснула,
> но при этом можно было бы работать с ее окном и компонентами?
Открою тебе секрет: поведением компонентов программы управляет (о ужас…) программа! Если она заснет, компонентами управлять станет некому.
Сергей М. (2007-04-13 12:51:00) [10]А ты не вызывай Sleep(), тогда и "зависания" не будет)
> Есть ли альтернатива Exit
Да хоть отбавляй !)
Например, Application.Terminate, MainForm.Close, Halt (для экстремалов), ExitProcess (для них же) ...
homm (2007-04-13 12:50:00) [11]> Есть ли альтернатива Exit, такая, что бы выход осуществлялся
> не из вызывающей процедуры, а из всей программы целиком?
Halt;