Einzelnen Beitrag anzeigen

Fisti

Registriert seit: 9. Jan 2009
14 Beiträge
 
#4

Re: Popup Fenster - stay on top

  Alt 31. Jul 2009, 09:53
Erstmal danke für die schnellen Antworten

Der Hinweis mit FormStyle auf fsStayOnTop setzen hat mir schon einmal geholfen, danke.


Mein aktueller Code:

Delphi-Quellcode:
procedure TMainForm.Button1Click(Sender: TObject);
var
  _myForm: TForm1;
begin

  _myForm := TForm1.Create(self);
  _myForm.UebergabeWert := 'blabla';
  _myForm.Show;

  //Externe Software starten
  if not CreateProcess( nil,_pAppName,nil,nil,False,CREATE_NEW_CONSOLE or NORMAL_PRIORITY_CLASS,nil,nil,_StartupInfo,_ProcessInfo)
  then begin
    _lwResult := WAIT_FAILED;
    exit;
  end;

  //Warten bis externe Software beendet wurde
  _WaitResult := WaitForSingleObject(_ProcessInfo.hProcess, INFINITE);


  _myForm.Destroy;

end;

Da beim Starten der externen Software meine MainApp blockiert wird, wird auch mein Hinweis-Form "_myForm" blockiert (man sieht nur weis) und ich sehe nicht was da ausgegeben wird.

Das Ziel ist, dass ich während dem Laufen der externen Software eine Hinweis-Box/Form habe, die mir nützliche Informationen anzeigt.


Wie muss ich die Hinweis-Form "_myForm" kreieren und anzeigen, damit sie nicht auch blockiert wird?
  Mit Zitat antworten Zitat