Bild in .exe Datei speichern

[Blackheart]

Hallo
Ich versuchs mal.
Also mal ein Beispiel für Bmp.
Als erstes packst Du drei Bmp in deinen Projektordner mit dem Namen

Bild1.bmp, Bild2.bmp, Bild3.bmp

Als zweites nimmst Du einen Texteditor und schreibst folgendes dort rein

MyBild1 BITMAP "Bild1.bmp"
MyBild2 BITMAP "Bild2.bmp"
MyBild3 BITMAP "Bild3.bmp"

und speicherst die Datei als MyResource.rc

Als drittes suchst du in Delphi die Brcc32.exe, liegt wahrscheinlich im Bin Verzeichnis von Borland
kopierst Sie und fügst Sie in deinen Projektordner ein.
Dann nimmst Du deine MyResource.rc und schiebts sie per Drag & Drop auf die Brcc32.exe
Diese erzeugt Dir dann eine Res Datei mit dem Namen MyResource.res

Dann erstellst Du dein Projekt - Ein Button, Ein Image und gibst unteren Delphi Code ein.
Alles abspeichern und und Starten.

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TForm1 = class(TForm)
    Image1: TImage;
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

var
  Form1: TForm1;
  Zaehler:Integer;
implementation

{$R *.dfm}
{$R MyResource.res} //Hier die res Datei angeben

procedure TForm1.Button1Click(Sender: TObject);
begin
  Inc(Zaehler); //Zähler erhöhen
  if Zaehler > 3 then Zaehler:=1; //Wenn letztes Bild erreicht Zähler zurücksetzen
  Image1.Picture.Bitmap.LoadFromResourceName(HInstance,'MyBild'+IntToStr(Zaehler)); //Bild laden je nach Zähler
end;

end.

Ich Hoffe konnte weiter helfen.