![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Программа не дает выключить комп [D6, WinXP]
leonidus © (2005-06-12 00:29:00)Мастера подскажите пожалуйста, сам просто теряюсь в догадках. Написал небольшую программку которая сидит в трее и мониторит окна IE. Все нормально, но если юзер решает перезагрузить комп или выключить его, то пока он не закроет программу винда перезагрузку/выключение не разрещает, я не пойму в чем может быть проблема. Эффект наблюдался в Win98 и XP. Подскажите плиз где грабли.
Defunct (2005-06-12 00:50:00) [1]
procedure TMainForm.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if Visible then
begin
Hide;
CanClose := False;
end
else
CanClose := True;
end;
procedure TMainForm.FormClose(Sender: TObject; var Action: TCloseAction);
begin
ClientsFrame.DoneFrame;
StatManager.DoneFrame;
Shell_NotifyIcon(NIM_DELETE, NotifyIcon );
Action := caFree
end;
Кусок завершения работы из похожей программы. Спокойно завершается при перезагрузке или выключении компьютера. Разбирайтесь.