Программа мешает перезагрузиться Опции

[Unconnected]

Привет всем.

Сомневался между разделом Delphi и этим, запостил сюда. Есть программа на делфи, обычное такое VCL-приложение, не служба, никаких хуков, немного API (типа FindWindow, GetForeignWindow). И вот столкнулся с проблемой, что когда эта программа работает, то компьютер не получается перезагрузить или выключить (через Пуск - Выключить компьютер...). Все остальные приложения, работающие в тот момент, порядочно закрывается, а это висит, и перезагрузки/выключения не происходит. Без этого приложения всё нормально перезагружается. В журнале событий такое предупреждение (с жёлтым значком): "Попытка Перезагрузка HOME-********** не удалась". На данный момент кода с собой нет. Что это может быть?

[Unconnected]

Может, кому-то пригодится, сделал так:

procedure WMQUERYENDSESSION(var Msg: TMessage);message WM_QUERYENDSESSION;
...
procedure TForm1.WMQUERYENDSESSION(var Msg: TMessage);
begin
  halt;
  inherited;
end;

Тут не возвращается значение, просто программа закрывается, результат тот же в принципе.