Win32Api

[Mark90]

hi turbopascal.
ich habe gerade die pdf datei nach WM_CTLCOLORDLG durchsucht und nichts gefunden.

und bei schließen passiert gar nichts

Delphi-Quellcode:

function dlgfunc(hwnd: hwnd; umsg: dword; wparam: wparam;
lparam: lparam): bool; stdcall;
begin
  result := true;
  CASE umsg OF
  WM_CLOSE:

  enddialog(hwnd, 0);
  WM_DESTROY:
  PostQuitMessage(0);
  WM_COMMAND:
  IF hiword(wparam) = BN_CLICKED THEN BEGIN
  CASE loword(wparam) OF
  0:      /mein exit button
  sendmessage(hwnd, SC_CLOSE, 0, 0); <--- SC_CLOSE statt WM_CLOSE
  end;
  end;
  else result := false;
end;
end;