Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];
ВнизЕсть процедура приостановления работы программы, но ... Найти похожие ветки
← →
kilop (2006-03-14 16:12) [0]procedure Suspend;
begin
flag := false;
while not flag do
begin
sleep(1);
Application.ProcessMessages;
end;
end;
данная процедура не позволяет выйти из программы привычным методом, нажатия на крестик в правом верхнем углу, помогите это исправить. Спасибо
← →
Dmitrij_K (2006-03-14 16:18) [1]
procedure Suspend;
begin
flag := false;
while (not flag) and (not Application.Terminated) do
begin
sleep(1);
Application.ProcessMessages;
end;
end;
← →
kilop (2006-03-14 19:02) [2]Спасибо, чувак!!!!!
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.03.26;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.044 c