JPGs aus einer Resourcendatei laden

[fiscch4]

Hallo,

also das mit der Procedure funktioniert jetzt soweit nur das immer noch die Fehlermeldung kommt das die Resource nicht gefunden wurde
hier mal der Quellcode komplett

Delphi-Quellcode:

unit testen;

interface

uses
  JPEG, 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;
procedure LoadPictureFromJpgResource(picture : TPicture;const AResName: string);
var
  Form1: TForm1;

implementation

{$R *.dfm}
{$R bilder.RES}

procedure LoadPictureFromJpgResource(picture : TPicture;const AResName: string);
var
   rs: TResourceStream;
   jpg: TJPEGImage;
begin
   rs := TResourceStream.Create(HInstance,AResName,RT_RCDATA);
   jpg := TJPEGImage.Create;
   try
      jpg.LoadFromStream(rs);
      picture.Assign(jpg);
   finally
      jpg.Free;
      rs.Free;
   end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin

  LoadPictureFromJpgResource(Image1.Picture,'TEST2');
end;


end.

der Code von der bilder.RC datei die ich dann per drag and drop in die BRCC32.exe schieb und eine bilder.RES rausbekommen

Code:

TEST1 RT_RCDATA "C:\Users\Public\Documents\delphi\test\test.jpg"
TEST2 RT_RCDATA "C:\Users\Public\Documents\delphi\test\images.jpg"

warum kann er die Resource nicht finden habe ich beim einbinden was falsch gemacht?
oder schon bei der Erstellung der bilder.RES?
der Rest würde denk ich funktionieren
Vielen Dank

PS: ich bin echt positiv überrascht das ihr so viel geduld habt... und mir helft