Blob laden

[meggles]

Hallo,
ich schreibe gerade nen datenbankgestützten Email-Editor, in dem das zu jeder Email gehörende Indy-Message-Objekt als Blob in der DB gespeichert wird. Das mach ich so:

Delphi-Quellcode:

  var
    vStream : TStringStream;
begin
    vStream := TStringStream.Create('');
    imessage.SaveToStream(vStream,false);
    vStream.Position := 0;
    with IBD_Email do
    begin
        ParamByName('MESSAGEBLOB').AsString := vStream.DataString;

Das geht auch so. Aber - sorry, vielleicht stell ich mich jetzt echt dumm an - wie lade ich das wieder? :gruebel:
Danke!!
Simon

Delphi 7 - interbase 7.0 - IBObjects