TBlobField.LoadFromStream

[ATS3788]

Hallo
Kann mir jemand mir Efahrung erklären was in der folgenden
Prozedur geschieht ?

Ich übergebe einen Stream an LStream der vorher Created wird

Der Stream wird nach LStream übergeben und dann sofort destroyed.
Wo sind jetzt die blöden Daten von dem Blob?

Hintergrund. Ich möchte das gerne ein TDBImage so überschreiben
um auch JPeg's und andere Datenformate zu speichern und auszugeben.

Delphi-Quellcode:

procedure TBlobField.LoadFromStream(Stream: TStream);
var
  LStream: TStream;
begin
  LStream := DataSet.CreateBlobStream(Self, bmWrite);
  try
    LStream.CopyFrom(Stream, 0);
  finally
    LStream.Free;
  end;
end;