PNGs oder Dateien allgemein in EXE einbinden und auslesen

[entwickler]

@ DeddyH
Klar, immer her damit!

@ wicht
Klingt logisch, habs in ne Prozedur gepackt:

Delphi-Quellcode:

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

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
  i : word;
begin
    for i := 1 to 493 do
      Memo.Lines.Add(inttostr(i) + ' RCDATA "' + inttostr(i)+ '.png"');
    Memo.Lines.SaveToFile('C:\Pokemon\Pokedex.rc');  // oder wohin auch immer
end;

War jetzt auch keine große Herausforderung