Главная страница
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.02 c
4-53803
Kinder
2003-12-13 00:12
2004.02.17
XP Иконки в менюшках


1-53466
VID
2004-02-05 19:53
2004.02.17
Уменьшение межстрочного интервала в RichEdit


1-53450
lokid7
2004-02-06 17:11
2004.02.17
Взаимодействие между двумя классами


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


1-53490
Максик
2004-02-06 10:10
2004.02.17
RunTime