CreateProcess und mehrere Konsolenbefehle

[Sunshine21]

muss mich nochmal melden da mir noch einiges unklar ist. Kurz und knapp kann man doch sagen, dass ich in der Funktion den Befehl oder die Anwendung starte und solange dann CreateProcess überprüfe. Erst wenn der Rückgabewert von CreateProcess true ist, ist der Befehl oder die Anwendung abgearbeitet.
Habe mal versucht den QC zu kommentieren. Die Stellen mit ??? sind mir noch immer unklar. Besonders der abschnitt mit Except....

Delphi-Quellcode:

{ WindowState is one of the SW_xxx constants. 
  Look up ShowWindow in the API help for a list.} 
function TForm1.ExecAndWait(const Filename, Params: string; 
                     WindowState: word): boolean; 
var 
  SUInfo: TStartupInfo;                    // ???
  ProcInfo: TProcessInformation;           // ???
  CmdLine: string; 
begin 
  { Enclose filename in quotes to take care of 
    long filenames with spaces. } 
  CmdLine := '"' + Filename + '" ' + Params; 
  FillChar(SUInfo, SizeOf(SUInfo), #0); 
  with SUInfo do begin 
    cb := SizeOf(SUInfo);                 // ???
    dwFlags := STARTF_USESHOWWINDOW;      // ???
    wShowWindow := WindowState;           // ???
  end; 
  try
    //
   //Der Rückgabewert der Funktion = der Rückgabewert von CreateProcess
   //solange dieser false ist ist der Prozess noch nicht fertig
   //
    Result := CreateProcess(NIL, PChar(CmdLine), NIL, NIL, FALSE, 
                            CREATE_NEW_CONSOLE or 
                            NORMAL_PRIORITY_CLASS, NIL, 
                            PChar(ExtractFilePath(Filename)), 
                            SUInfo, ProcInfo);
   //
   // Was ist das für eine Ausnahmebedingung?
   //
  except 
    on E: Exception do 
      begin 
        Result:=false; 
      end; 
  end; 

  { Wait for it to finish. } 
  if Result then begin            // Wenn Rückgabewert true dann fertig
    Application.Processmessages;  // ???
    WaitForSingleObject(ProcInfo.hProcess, INFINITE);   // ???
  end; 

end;