versuch mal das da, es prüft ob die datei gestartet wurde, und du brauchst nur
uses Windows;
Delphi-Quellcode:
const
FileMp: String = 'C:\mp3.exe';
...
function RunFile: boolean;
var
Str: String;
begin
Str := FileMp + ' /whatever';
if WinExec(pChar(Str), SW_SHOWNORMAL) >31 then
Result := True
else
Result := False
end;
// -----------
// Aufrufen:
if RunFile then
begin
ShowMessage('Datei wurde ausgeführt');
...
end else
begin
ShowMessage('Datei konnte nicht gestartet werden');
end;