BMP und JPG Bilder in Resource-Datei speichern und verwenden

[ManuMF]

Und das Ganze jetzt noch mal für die DLL:

Delphi-Quellcode:

var jpg1:Tjpegimage;
    stream:TResourceStream;
begin
  jpg1 := TJPEGImage.Create;
  try
    Stream := TResourceStream.Create(DLLHandle, 'jpg1', RT_RCDATA);
    try
      Jpg1.LoadFromStream(Stream);
      Image1.Picture.Bitmap.Assign(jpg1);
    finally
      Stream.Free;
    end;
  finally
    jpg1.Free;
  end;

P.S.: Warum [Code]? Wir haben doch [Delphi]?