Moin,
eigentlich ist mir ja klar wie es gehen sollte:
Ich habe einen Film unter
e:\Video\2 Serien\Friesland-03-Klootschiessen.mp4
der soll mit folgendem Sourcecode gestartet werden. Natürlich habe ich im Debugger mir den Inhalt von Filename angesehen, da steht der Name auch korrekt in Anführungszeichen. Macht PChar noch irgendwas aus den Tüttelchen ?
Der Film wird nicht abgespielt und es kommt als Fehlermeldung:
EOSError
Systemfehler. Code: 2
Das System kann die angegebene Datei nicht finden.
Gruss
Hans
Delphi-Quellcode:
procedure FilmAbspielen;
var
Node: PVirtualNode;
Data: PTreeData;
FileName: String;
begin
Node := SerienDB.VST.FocusedNode;
if not Assigned(Node) then Exit;
Data := SerienDB.VST.GetNodeData(Node);
FileName := #34 +SerienDB.LbEVerzeichnis.Text +'\' +Data.FCaption +#34;
if Data.FColumn5 = 'F' then
begin
ShellExecute(0, 'open', PChar(FileName), NIL, NIL, SW_SHOW);
RaiseLastOSError;
end;
end;