Problem mit TMemoryStream

[Lenny-k]

Ich weiß zwar nicht, ob das hier das richtige Forum ist, aber ich poste mal mein Problem ^^
Folgender Code bricht ab, mit einer Zugriffsverletzungsmeldung...

Delphi-Quellcode:

  AResponseInfo.ContentType:='image/bmp';
  bmp:=TBitmap.Create;
  ImageList1.GetBitmap(0,bmp);
  try
    str:=TMemoryStream.Create;
    bmp.SaveToStream(str);
    AResponseInfo.ContentStream:=str;
  finally
    str.Free
  end;

str ist eine Variable vom Typ TMemoryStream... AResponseInfo ist die Responseinfo vom Indy HTTP-Server!
Debuggen hilft nix, die Meldung kommt immer einfach am schluss der prozedur :S Ich bin irgendwie ratlos... Woran liegt das?

[marabu]

Hallo.

Du darfst den Stream nicht freigeben - er wird noch benötigt.

Grüße vom marabu

[PMM]

Zitat:

AResponseInfo.ContentStream:=str

kopiert _nicht_ den Stream, sondern übergibt die Addr. desselben. Anschliessend wird der Stream freigegeben und der nächste Zugriff von "AResponseInfo" auf "ContentStream" kracht..
PMM