Wie kann man ein Video aus Res direkt abspielen ?

[thomas2009]

Ja er holt das Video zwar von resource aber er soll auch es abspielen und nicht zuerst auf die Festplate oder in Windows temp speichern

[DeddyH]

Das scheint so nicht zu gehen, zumindest habe ich in der Hilfe keinen Hinweis darauf gefunden, dass man dem TMediaPlayer einen Stream unterjubeln könnte oder dergleichen.

[thomas2009]

ich muss also die video-Datei in Windows Temp legen und dann von doert wieder laden :

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
res: TResourceStream;
temp: String;
  begin
  temp:=GetEnvironmentVariable('TEMP');
  res := TResourceStream.Create(hInstance, PChar('film1'),
PChar('AVI'));
   try
   res.SaveToFile(temp+'film1.avi');
   finally
   res.Free;
   end;
MediaPlayer1.Close;
MediaPlayer1.FileName:=temp+'film1.avi';
MediaPlayer1.Open;
MediaPlayer1.play;
end;

Es funktioniert aber es wäre für mich viel besser, wenn man das Video direkt aus res abspielen kann

[lbccaleb]

Doch, das geht auch, das ist allerdings nicht so einfach wie du dir das vorstellst. Durchstöber das Forum http://www.progdigy.com/forums/viewforum.php?f=1

allerdings ist das dort nur in Englscih, und du solltest weiterführende programmierkenntnisse haben, sonnst ist das für dich wohl nicht leicht hinn zu bekommen...

[himitsu]

Oder eine andere Videoplayerkomponente verwenden, welche direkt von einem Stream abspielen kann.

[lbccaleb]

Zitat von himitsu:

Oder eine andere Videoplayerkomponente verwenden, welche direkt von einem Stream abspielen kann.

Ja, das DSPack zum Bleistift, welches sich auf der oben angegebenen Main-Page befindet