Hallo Leute,
ich bin Delphi-Neuling und habe jetzt schon etliche Forenseiten durchforstet.
Ich möchte aus meinem delphi-Programm heraus eine .bat-Datei ausführen.
In dieser lösche, kopiere und führe ich jeweils eine Textdatei aus.
Das ganze soll über cmd laufen.
Wenn ich die .bat-Datei manuell ausführe, funktioniert alles wie gewünscht.
Aus delphi heraus, passiert nichts. Es bearbeitet meine Dateien nicht und gibt auch keinen Fehler aus.
Laut Debugger durchläuft es aber meine "ShellExecute"-Programmzeile.
Code:
procedure TForm5.pnlUpdateMessageClick(Sender: TObject);
begin
try
ShellExecute(0, 'open', 'cmd', PChar('/c ' + (ParamStr(0) + '_DELETE_COPY_EXECUTE.bat')), nil, SW_SHOWNORMAL);
ShowMessage('Alte Version gelöscht.');
except
ShowMessage('Fehler');
end;
end;
Wo genau liegt mein Fehler?
Vielen Dank im Voraus für eure Mühen
VG Kratos