PDF aus DB anzeigen im Webbrowser?

[blondervolker]

Hallo,

bin schon eine weile hier,aber dass hab ich jetzt erst gesehen...

Hab nun gebastelt und den Webbrowser weggelassen.Aber komme nicht weiter.
Kann ich ein Oleobject mit einem DBMemo verknüpfen?

Es kommt immer eine Fehlermeldung:"ungültiger Stream".

Delphi-Quellcode:

procedure TForm17.Button1Click(Sender: TObject);
var
Stream: TMemoryStream;
Field: TBlobfield;
begin
ADOTable1.Edit;
OpenDialog1.Filter:='*.pdf|*.pdf';
    if OpenDialog1.Execute then
      begin
        TBlobField(ADOTable1.FieldByName('PDFFILE')). //PDF im DBMemo10 speichern
          LoadFromFile(OpenDialog1.FileName);
          ADOTable1.Post;
end;
end;


procedure TForm17.Button2Click(Sender: TObject);
var
Stream : TMemoryStream;  
Field : TBlobField;  
begin  
  Field := ADOTable1.FieldByName('PDFFILE') AS TBlobField;
  Stream:=TMemoryStream.Create;
  try
    Field.SaveToStream(Stream);
    Stream.Position:=0;
    OleContainer1.LoadFromStream(Stream);
  finally
    Stream.Free;
  end;
end;

Was habe ich jetzt nach über 10 STD. falsch gemacht?