Video von Ressource auslesen

[taktaky]

Hallo,

ich habe ein Video als externe Datei in mein Form so eingebaut:

Delphi-Quellcode:

{$R *.dfm}
{$R Daten.res}

procedure TForm1.Button1Click(Sender: TObject);
begin
MediaPlayer1.FileName:='cool2.avi';
MediaPlayer1.open;
MediaPlayer1.Display:=panel1;
MediaPlayer1.DisplayRect:=Panel1.ClientRect;
MediaPlayer1.Play;
end;

Nun habe ich das Video an exe gebunden:

Daten.res:

Code:

01 VIDEO "cool1.avi"
02 VIDEO "cool2.avi"

Wie kann das Video nun ausgelesen werden?

Delphi-Quellcode:

MediaPlayer1.FileName:='cool2.avi'; // so geht nicht mehr wenn das Video schon an exe gebunden ist

// eine Wav Datei kann man aus Ressource problemlos so laden:
PlaySound(PChar(01),HInstance, snd_ASync or snd_Memory or snd_Resource);

Was ist mit Videos?

In DP Forum fand ich kein einziges Beispiel !!!

[jakobwenzel]

Der Mediaplayer kann nicht aus Ressourcen laden, das heißt, du wirst die Datei wohl oder übel aus der EXE extrahieren müssen (nur temporär), um sie abspielen zu können.

[taktaky]

Zitat von jakobwenzel:

Der Mediaplayer kann nicht aus Ressourcen laden, das heißt, du wirst die Datei wohl oder übel aus der EXE extrahieren müssen (nur temporär), um sie abspielen zu können.

Sind bei alle Videos genauso wie .wmv, .mov, ... oder nur bei .avi ?

Wie kann ich die Videos, die an Exe gebunden sind, in Temporär oder besser in Memory extrahieren?


Das Thema ist da, wenn Du lust hast weiter yu helfen

[DeddyH]

Zitat von jakobwenzel:

Der Mediaplayer kann nicht aus Ressourcen laden,...

Zitat von taktaky:

Sind bei alle Videos genauso wie .wmv, .mov, ... oder nur bei .avi ?

Bockwürste kann er auch nicht aus Ressourcen laden *tztz*

[taktaky]

Zitat von DeddyH:

Bockwürste kann er auch nicht aus Ressourcen laden *tztz*

Dann bleibt nur die Möglichkeit entweder den Ordner in dll oder in Archiv zu packen.

<('I*)>

[Matze]

Wenn es keinen besonderen Grund gibt, die Videos in die Exe einzubinden, dann würde ich diese auslagern und getrennt mitgeben, wie du es bereits hast. Die Exe ist somit kleiner, vermutlich startet sie schneller und benötigt weniger RAM. Sie spielt die Videos schneller ab, da diese nicht erst extrahiert und temporär gespeichert werden müssen und ähnliches. Ich sehe keine Vorteile, Videos in Ressourcen mitzugeben.

[taktaky]

Zitat von Matze:

Ich sehe keine Vorteile, Videos in Ressourcen mitzugeben.

Du hast Recht aber die Daten (wie Bilder, Videos,... ) sollen nur von dem Delphi-Programm ausgelsen werden.
Ich wollte damit keine Möglichkeit für den Anwender die Bilder oder die Videos direkt auszuführen. mehr nicht

Und deswegen ist ist mir egal wie und wo man die Videos versteckt

Hast eine Idee? Oder gibt es nur die zwei Möglichkeiten In Archiv und in Dll?

[Matze]

Ich möchte kein OT posten, aber das muss ich noch sagen:

Zitat von taktaky:

Ich wollte damit keine Möglichkeit für den Anwender die Bilder oder die Videos direkt auszuführen.

Mit dem Ressource Hacker kann man die Dateien, die über Ressourcen eingebunden sind, extrahieren, speichern und getrennt ausführen.

[taktaky]

Zitat von Matze:

Ich möchte kein OT posten, aber das muss ich noch sagen:

Zitat von taktaky:

Ich wollte damit keine Möglichkeit für den Anwender die Bilder oder die Videos direkt auszuführen.

Mit dem Ressource Hacker kann man die Dateien, die über Ressourcen eingebunden sind, extrahieren, speichern und getrennt ausführen.

Kein Angst ! Man kann die Exe-Datei kompremieren

Das ist ein sehr guter Hinweis von Dir, aber das ist das letzte Problem.

Wir sind aber nicht soweit Ich bin immer noch nicht bei diesem Punkt

Es geht nun, wie ich den Ordner als Archiv packen und wieder bei Laufzeit entpacken (in Memory) und dann die Daten von dort auslesen.

<>

[Matze]

Zitat von taktaky:

[...]
Die Frage nun, kann man das Video in diesem Form steuern, wie Stop, Pause, ...?
[...]

Stelle deine Fragen nie doppelt!

Edit: Da du die Frage 1:1 kopiert hast, blende ich deinen Beitrag aus, da es sonst zu Verwirrungen kommt. Das ist wie eine Art Doppelthread und das ist nicht erwünscht. Unterlasse dies bitte zukünftig.