Bitmap aus Stream lesen

[Redeemer]

TImage.Picture.Bitmap dürfte zu dem Zeitpunkt gar nicht initialisiert sein (vorher irgendwas mit TImage.Canvas machen wäre auch möglich). Da Delphi den Dateityp einer Bilddatei (für die Auswahl von TGraphicClass) ausschließlich über die Erweiterung bestimmt (die ein Stream nicht hat), musst du die Graphics.TBitmap selbst erstellen. Graphics.TBitmap (es gibt mehrere Klassen in Delphi, die TBitmap heißen) weist man einem Bild zu, indem man TPicture.Assign aufruft (nicht TGraphics.Assign ).

Delphi-Quellcode:

var
  BMP: Graphics.TBitmap;
begin
  TuEtwasMitDem(Stream);

  BMP := Graphics.TBitmap.Create;
  BMP.LoadFromStream(Stream);
  Image1.Picture.Assign(BMP);
  BMP.Free;
end;