Png in Image laden

[Luki206]

So:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var h: Cardinal; res: TResourceStream; Graphic: TGraphic;
begin
h := LoadLibrary('test.dll');
res := TResourcestream.CreateFromID(h, 1, RT_RCDATA);
Graphic := TPngImage.Create;
try
Graphic.LoadFromStream(res);
Image1.Picture.Assign(Graphic);
finally
Graphic.Free;
res.Free;
end;

Ich weiß jetzt nicht ob da Fehler drin sind, habe das nämlich ausm Kopf geschrieben aber so mache ich es immer