SetForegroundWindow(Handle)

var
Handle: THandle;
begin
  Application.Initialize;
  if DebugHook=0 then //To pozwala uruchomic program z IDE
    begin
      Handle:=FindWindow(nil,'Forma');
      if Handle<>0 then  //jesli znajdzie to
        begin;

     <b><u>SetForegroundWindow(Handle);</u></b> //wyrzuca to okno na wierzch

          Application.Terminate;
        end;
    end;
Form1.Caption:='Forma';
end;;

To jest spox ale jak program jest minimalizowany to to nie działa dokładnie to pogrubione i podkreślone jak to zmienić?

ta funkcja ma zwrócić fokus danemu oknu

Może po prostu zwraca mu fokus ale nie przywraca okna

//dopisane

musisz poprostemu najpierw owe okienko przywrócić a potem dopiero je fokusnąć

A jak przywrócić okno?

SendMessage, komuniakt WM_SYSCOMMAND, SC_MAXIMIZE dla odpowiednie HWND i masz przyrocone okno.

Jeśli chcesz przywrócić okno, to wystarcz takie coś :

ShowWindow(Handle,SW_SHOW);