Einzelnen Beitrag anzeigen

Benutzerbild von harrybo
harrybo

Registriert seit: 26. Nov 2002
Ort: Aachen
87 Beiträge
 
Delphi 6 Enterprise
 
#7
  Alt 22. Jan 2003, 09:50
Hallo bubabo,

platziere ein TTimer Object auf Dein HauptFormular, setze Interval auf 1, und schreibe für das Ereignis OnTimer folgendes:
Delphi-Quellcode:
procedure TfrmMain.Timer1Timer(Sender: TObject);
var
  vOwner : THandle;
begin
  vOwner := GetWindow( handle, GW_OWNER );
  ShowWindow( vOwner, SW_HIDE );
  Self.Hide;
  Timer1.Enabled := false;
end;
Ergebnis: das Hauptfenster wird ausgeblendet, die Applikation erscheint ebenfalls nicht in der Taskleiste.

gruß, harrybo
Harry Boldt
  Mit Zitat antworten Zitat