Einzelnen Beitrag anzeigen

Benutzerbild von Matze
Matze
(Co-Admin)

Registriert seit: 7. Jul 2003
Ort: Schwabenländle
14.929 Beiträge
 
Turbo Delphi für Win32
 
#16

Re: Programm bei Klick auf "X" minimieren

  Alt 22. Apr 2005, 22:57
Ich habe es nun so versucht:

Delphi-Quellcode:
procedure TForm1.WMSize(var Message: TWMSize);
begin
    if(Message.Msg = WM_SIZE) and
    (Message.SizeType = SIZE_MINIMIZED) then
  begin
    Hide;
    // Icon nur anzeigen wenn Fenster minimiert
    Shell_NotifyIcon(NIM_ADD, @IconData);
  end
  else
    inherited;
end;
Aber einen Unterschied kann ich nicht feststellen.
  Mit Zitat antworten Zitat