Программа не выключаеться при попытки перезагрузить компьютер :(

← →
xGhost (2003-09-29 13:09) [0]

Пытался ловить сообщения WM_QUERYENDSESSION если пустой проэкт то всё ок но если код ловли WM_QUERYENDSESSION сообщения поместить в уже готовый проэкт то беда просто не могу отловить и всё как будто до него не доходит сообщение и компьютер при этом нельзя не перезагрузить не выключить :(

← →
m_kus (2003-09-29 14:38) [1]

Напиши подробней, как пытаешься ловить сообщение, и чем таким занимается программа, когда ты пытаешься перезагрузить компьютер...

← →
Nikky (2003-09-29 15:01) [2]

тоже такая фигня была, так и не понял с чем связана. Программа была клиентом трехзвенки (сокет)

← →
ZEE (2003-09-29 15:17) [3]

тако у меня было когда пользовал TNMSMT/TNMPOP3 - вобще компоненты с закладки FastNet - они ловят WM_QUERYENDSESSION - и возвращают результат 0

← →
xGhost (2003-09-29 15:21) [4]

> m_kus

procedure OnWM_QUERYENDSESSION(var Msg: TMessage); message WM_QUERYENDSESSION;

procedure TForm1.OnWM_QUERYENDSESSION(var Msg: TMessage);
begin
Application.Terminate;
inherited;
end;

> Nikky

У меня достаточно большая программа работает с UDP , реестром , сетью и т.д

скорей всего дело в незакрытом потоке ( хотя я сам пока не знаю как работать с потоками , скорей всего потоки используються в компонентах )
Перепробывал всё ! ничего не могу поделать :( как можно отследить какая часть программы мешает закрыться программе ?

Если вызвать метод close то прога нормально закрываеться !
Странно .

← →
xGhost (2003-09-29 16:38) [5]

люди ! помогите кто может

← →
Ketmar (2003-09-29 19:14) [6]

FastNet выкинь.

← →
xGhost (2003-09-30 07:37) [7]

> Ketmar

я не пользуюсь FastNet !!!

← →
Anatoly Podgoretsky (2003-09-30 07:40) [8]

Другие компоненты выкинь

← →
xGhost (2003-09-30 13:09) [9]

> Anatoly Podgoretsky

Без других компонентов программа к сожалению отказываеться работать :(

← →
Zelius (2003-09-30 13:13) [10]

Можно воспользовать утилитой Spy++ от MS Visual Studio. Надо отлавливать это сообщение для всех окон процесса и смотреть кто вернет неверное значение. Я так поймал у себя.

← →
Song (2003-09-30 13:15) [11]

Прогу выкинь

← →
Anatoly Podgoretsky (2003-09-30 13:28) [12]

xGhost © (30.09.03 13:09) [9]
Ты привередливый, а мысль не понял, надо найти какой компонент тебе бяку делает. Лучше конечно не выбрасывать, а по одному добавлять в тестовый проект.

← →
xGhost (2003-09-30 15:29) [13]

> Anatoly Podgoretsky

А это мысль ! хотя проэкт большой всё же попробую ! завтря прям с утра !!!

← →
sniknik (2003-09-30 15:54) [14]

xGhost © (29.09.03 15:21) [4]
> m_kus

>procedure OnWM_QUERYENDSESSION(var Msg: TMessage); message WM_QUERYENDSESSION;

>procedure TForm1.OnWM_QUERYENDSESSION(var Msg: TMessage);
>begin
>Application.Terminate;
>inherited;
>end;

попробуй еще так
procedure TForm1.OnWM_QUERYENDSESSION(var Msg: TMessage);
begin
try
inherited;
destroy;
except
end;
end;

(отступы не забудь иначе гарантированно не сработает ;о)))

Программа не выключаеться при попытки перезагрузить компьютер :( Найти похожие ветки