Wie kann ich eine Ressource zur Laufzeit in eine Datei extrahieren?

Question

Ich möchte nur eine einzige EXE-Datei verteilen. Zur Laufzeit möchte ich jedoch einige eingebettete Image-Ressourcen auf die Festplatte des Benutzers extrahieren.

Kann ich, und wenn ja, wie?

Answer 1

Verwenden Sie Delphes TResourceStream. Sein Konstruktor findet und lädt die Ressource in den Speicher, und die SaveToFile-Methode schreibt die Festplatte.

Etwas ähnliches wie dies funktionieren soll:

var 
    ResStream: TResourceStream; 
begin 
    ResStream := TResourceStream.Create(HInstance, 'YOURRESOURCENAME', RT_RCDATA); 
    try 
    ResStream.Position := 0; 
    ResStream.SaveToFile('C:\YourDir\YourFileName.jpg'); 
    finally 
    ResStream.Free; 
    end; 
end; 

Wenn Sie die Ressourcen-ID statt Namen verwenden können, ist es ein bisschen weniger Speicher ist. In diesem Fall würden Sie Create mit CreateFromID ersetzen und die numerische ID anstelle des Zeichenfolgennamens angeben.

Answer 2

Erstellen Sie eine TResourceStream. Sie benötigen das Modulinstanz-Handle (normalerweise SysInit.HInstance für die aktuelle EXE-Datei oder was auch immer Sie von LoadLibrary oder LoadPackage erhalten), den Ressourcentyp (z. B. oder rt_RCData) und entweder den Ressourcennamen oder die numerische ID. Rufen Sie dann die SaveToFile Methode des Streams auf.

Answer 3

try 
    if not Assigned(Bitmap) 
    then 
     Bitmap := TBitmap.Create(); 
    Bitmap.LoadFromResourceName(HInstance,SRC); 
except 
    on E:Exception do 
     ShowMessage(e.Message); 
end; 

Und dann speichern Sie die Bitmap auf der Festplatte.

Answer 4

Vielleicht könnte dies auch nützlich sein, wenn Sie mit den Ressourcen selbst arbeiten müssen. Delphidabbler/ResourceFiles