so ich habs ^^
mir is da en kleiner peinlicher fehler unterlaufen
ich hab hier im forum nen thread gefunden wos auch ums minmieren ging und da hab ich unter anderem folgendes gelesen:
Zitat:
sorry hab ich vergessen: du musst ApplicationEvents von der Palette Zusätzlich einfügen, da gibts das!
naja denn satz hab ich etwas falsch vestanden... ich bin da erst davon ausgegangen das ich bei
oder ähnliches reinschreiben muss, und nicht das des ne komponenten is die ich mir lediglich in meine form ziehen muss...
naja aber jetzt funzt alles so wie ich es will...
sind im prinzip nur 2 zeilen ^^
hier der code...
Delphi-Quellcode:
procedure TMain_Form.ApplicationEvents1Minimize(Sender: TObject);
begin
CoolTrayIcon1.IconVisible := True;
ShowWindow(application.Handle, SW_HIDE);
end;
@Gollum
thx. für den typ mit shwowindow
