Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

запретить завершение работы компьютера

Novichok_new © (2007-02-11 11:29:00)
Чтобы запретить завершение работы компьютера, я использовал следующий код:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
//Спрашиваем пользователя, если инициировано завершение работы.
if MessageDlg('Вы уверены?', mtConfirmation, mbYesNoCancel, 0) = mrYes
then CanClose := true //Разрешаем завершение работы.
else CanClose := false; //Nе разрешаем завершение работы.
end;

Есть какая-нибудь альтернатива ему? - Так, чтобы не выскакивало сообщений: 'Вы уверены?' или 'приложение не отвечает'...
Алгоритм необходим такой:
Приложение запущено -> запрет на выключение компа (автоматически)
Завершаем работу приложения -> можно выключать

Leonid Troyanovsky (2007-02-11 12:30:00) [1]

> Novichok_new © (11.02.07 12:05) [5]

Кстате, идея! - А как проследить попытку выключения компа

Хватать и не пущать.

--
Regards, LVT.

Novichok_new (2007-02-11 12:05:00) [2]
Спасибо,

> C@N © (11.02.07 11:48) [3]

> Ну выдернут кабель, тебе лучше от этого будет?

Нет, это для предотвращения слов "Забыла! Ой, случайно!"
Пару раз попытаются выключить - вспомнят!

Кстате, идея! - А как проследитьпопытку выключения компа, и, если такие попытки были, автоматически выключить компьютер перед завершением работы программы?

iXT (2007-02-11 11:54:00) [3]

> Novichok_new © (11.02.07 11:46) [2]
> А компьютера тогда как?

А зачем тебе? Ну выдернут кабель, тебе лучше от этого будет?

C@N (2007-02-11 11:48:00) [4]
Button1.Onclick... ///запретить закрытие приложения млжешь в онкрейт прописать...
Begin
Form1.CanClose:= False;
End;

Button2Onclick...//Специальная кнопка для закрытия приложения....
begin
Form1.CanClose:= False;
Close;
///// тут можешь засунуть код для выключения компа.....
end;

Novichok_new (2007-02-11 11:46:00) [5]
А компьютера тогда как?

iXT (2007-02-11 11:36:00) [6]
У тебя запрет на закрытие приложения, а не выключения компьютера.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »