Wenn VLC der Standardplayer ist, dann ruf doch zum Test mit ShellExecute mal VLC auf und übergibt den Namen der abzuspielenden Datei als Parameter.
Delphi-Quellcode:
var
ShellExError : Integer;
begin
if FileExists(FileName)
then begin
ShellExError := ShellExecute(Application.Handle,
Nil,PChar('
VLC.exe'),PChar(FileName),
Nil,SW_SHOW);
if ShellExError < 32
then begin
// Hier ist ein Fehler aufgetreten. Sinnvolle Fehlermeldung machen.
// Siehe: https://learn.microsoft.com/de-de/windows/win32/api/shellapi/nf-shellapi-shellexecutea
end;
end else begin
MessageDLG('
Datei wurde nicht gefunden:' + sLineBreak + FileName, mtError, [mbOk], 0);
end;
end;
Ist VLC im Suchpfad von Windows? Wenn nein, im Aufruf von ShellExecute diesen mit angeben.
Bleibt das Problem dann immernoch bestehen?
Bezieht sich der Fehler 2 eigentlich auf das Nichtfinden der MP4-Datei oder eventuell auf das Nichtfinden des Players?