Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.02.17;
Скачать: CL | DM;

Вниз

Не могу выключить прогу   Найти похожие ветки 

 
Thick   (2003-12-12 13:38) [0]

Пишу прогу на API и при завершении она не выключаеться
вот код со всеми сообщениями о закрытии
ID_ClOSE:
begin
HDll:=LoadLibrary("Module");
@Ab:=GetProcAddress(HDll,PChar("Auto"));
Ab;
FreeLibrary(hdll);
SendMessage(hWnd, WM_DESTROY, 0, 0);
end;

WM_DESTROY:
begin
TaskBarDeleteIcon(hWnd, 0);
SendMessage(FindWindow("TMes","Mes"),WM_CLOSE,0,0);
SendMessage(FindWindow("MyKalOfForm","Simple Program"),WM_CLOSE,0,0);
PostQuitMessage(0);
Exit;
end;

А это код основной процедуры

begin
FillChar(WndClass, SizeOf(WndClass), 0);
with WndClass do
begin
hInstance := SysInit.hInstance;
lpszClassName := ClassName;
lpfnWndProc := @WindowProc;
end;
RegisterClass(WndClass);
hWnd := CreateWindow(ClassName, "", 0, 0, 0, 0, 0, 0, 0, hInstance, NIL);
SetTimer(hwnd,0,1000,nil);
TreyCreated := RegisterWindowMessage("TaskbarCreated");
CreateIcon;
while GetMessage(Msg, hWnd, 0, 0) do
begin
TranslateMessage(Msg);
DispatchMessage(Msg);
end;
Halt(Msg.wParam);
end.


 
Cobalt ©   (2003-12-13 22:32) [1]

Попробуй вести журнал (англ. log) ВСЕХ сообщений, которые приходят в очередь сообщений и твоей оконной процедуре - может, отладишь...


 
JibSkeart ©   (2003-12-14 12:30) [2]

а что для сообщений нелзя использовать чтоли
тот Хендл уже созданного окна ?



Страницы: 1 вся ветка

Текущий архив: 2004.02.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.022 c
1-53484
zamkom
2004-02-05 17:29
2004.02.17
Формат даты


3-53383
denis24
2004-01-27 13:31
2004.02.17
Параметры в query


14-53744
DimaK
2004-01-27 23:36
2004.02.17
Ошибка при установки


1-53607
Budy
2004-02-07 00:27
2004.02.17
Form2 на Form1


1-53620
Budy
2004-02-06 23:07
2004.02.17
HTML из Delphi