JPeg aus Ressource in TImage laden, kriegs aber nicht hin.

[Christian S.]

Hallo!

Auf diese Weise hat M.Knebel's Beispiel bei mir funktioniert:

Delphi-Quellcode:

procedure loadImage (myImage : TImage);
VAR s : TResourceStream;
    j : TJPEGImage;
begin
  s := TResourceStream.Create(hInstance,'bild','JPG');
  j := TJPEGImage.Create;
  j.LoadFromStream(s);
  myImage.Picture.Bitmap.Assign(j);
  j.Free;
end;

Dabei ist "bild" der Name der Resource, die ich einlesen möchte und JPG der Resourcentyp.

MfG
Peter