Zitat von
MrKnogge:
Drumm noch ein ExtractFilePath ...
derzeitiger Quellcode ...
Delphi-Quellcode:
procedure TFmetall.FormCreate(Sender: TObject);
begin
MediaPlayer1.FileName:= ExtractFilePath(ParamStr(0) + 'seat.avi');
MediaPlayer1.Open;
...
...
...
end;
Fehlermeldung beim compalieren dazu ... wieder im Anhang