RunProcess('C:\DRPEncPrediction.bat', SW_SHOW,
FALSE, @ProcID);
Du meist sicher FALSE oder? Gibts irgendwo ne Documentation für RunProcess oder könntest Du mir die Parameter von RunProcess erklären? (Sorry, wenn die Frage noobiehaft ist...)
[Edit] müsste doch TRUE statt FALSE rein, damit der Code wartet oder?
Lag richtig:
Delphi-Quellcode:
procedure TForm12.Button7Click(Sender: TObject);
var
ProcID: Cardinal;
begin
ProcID := 0;
//if OpenDialog1.Execute then
RunProcess('C:\DRPEncPrediction.bat', SW_SHOW, TRUE, @ProcID);
//ShowMessage(IntToStr(ProcID));
listbox1.Items.add('Done');
end;
Es wird dann Done in der listbox angezeigt. Ich öffne mal ne Datei nach der Batch...
... bekomme Probleme:
Delphi-Quellcode:
If Not OpenDialog3.Execute Then Exit;
Edit8.Text:=GET_FILE_SIZE(Opendialog3.filename,true);
a:= StrToFloat(Edit8.text);
b:=(a / 1024) /1024;
c:= StrToFloat(Edit9.text);
listbox1.Items.add('This Pass has the filesize of ' +FloatToStr(b)+ ' MB');
if FloatToStr(b) < FloatToStr(c) then listbox1.Items.add('Higher the bitrate');
if FloatToStr(b) > FloatToStr(c) then listbox1.Items.add('Lower the bitrate');
end;
Statt dem OpenDialog über einen seperaten Button sollen die Zeilen oben nach der Beendigung der Batch gestartet werden.
Hab aber leider Stringvariable drin. Kann man String und Cardinal in einer Variablenzeile mischen?