ich hab ne kleine App gebaut die mittels TProcess das Programm "meld" (ist ein Linux tool zum vergleichen von Dateien) startet und sich dann eigentlich beenden soll, dazu habe ich folgenden Code geschrieben:
Code: Alles auswählen
Procedure TForm1.AddFilePath(Value: String);
Var
P: TProcessUTF8;
Begin
p := TProcessUTF8.Create(Nil);
Try
p.Executable := 'meld';
p.Parameters.Add('Datei1.txt');
p.Parameters.Add('Datei2.txt');
p.Options := [];
p.Execute;
Finally
p.free;
End;
sleep(5000);
close;
End
Else Begin
// Nichts die Datei ist die selbe die wir schon gewählt haben ..
End;
End;
End;
Mittels poWaitonExit zu warten geht nicht, da mein Program via Uniqueinstance nur eine instanz zuläst und ich ggf mehrfach meld über mein Program aufrufen will...