Programm im Heintergrund starten (nicht versteckt)???

[romber]

Hallo!

Ich möchte es so machen, dass einziges Fenster meines Programms beim Start sofort hinter allen anderen geöffneten Fenstern angezeigt wird. Wenn z.B. Explorer geöffnen ist und ich mein Programm starte, erscheint das Fenster meines Programms sofort im Vordegrund und verdeckt damit den Explorer. Das möchte ich verhindern. Wie mache ich das?

[Christian Seehase]

Moin Romber,

nur mal so als Idee:
Du prüfst beim Starten Deines Programmes darauf, welches gerade im Vordergrund ist, merkst Dir das, und bringst es, sobald Dein Programm läuft, wieder in den Vordergrund.
(GetForegroundWindow, SetForegroundWindow)
Wenn Du die Prüfung zu Beginn der Projektdatei einträgst, müsste das eigentlich funktionieren.

[bitsetter]

Hi,

folgenden Code habe ich in das onActivate Event des Formulars gesetzt:

Delphi-Quellcode:

procedure TForm1.FormActivate(Sender: TObject);
begin
  SetWindowPos(self.Handle, HWND_BOTTOM, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOMOVE or SWP_NOSIZE);
end;

Eventuell müsste man noch drauf achten, dass der Code nur einmal ausgeführt wird.