Memory Leak nach Zuweisung eines Resourcestream

[peterbelow]

Die zweite Variante ist die richtige, allerdings solltest Du das mit einem try finally Block machen.

Delphi-Quellcode:

procedure TFormViewFinMathZins.FormCreate(Sender: TObject);
var
  Stream: TStream;
begin
  Stream:= TResourceStream.Create(HInstance, 'EWoZZ', RT_RCDATA);
  try
    Image1.Bitmap.LoadFromStream(stream);
  finally
    stream.free;
  end; 
end;

Du kannst Dir allerdings den stream sparen, TBitmap hat auch eine LoadFromResourceName-Methode...