Word datei in db speichern und wieder auslesen

[Schodn]

delphi]var
FileStream: TMemoryStream;
anlagefile : string;
begin
if (OpenDialog1.Execute) then
begin
anlagefile :=OpenDialog1.FileName;
try
FileStream:=TMemoryStream.Create;
FileStream.LoadFromFile(anlagefile);
FileStream.Position := 0;
ZQuery1.Close;
ZQuery1.SQL.Text := 'INSERT INTO Tabelle (feld) VALUES (:panlage)';
ZQuery1.Parameters.ParamByName('panlage').LoadFrom Stream(FileStream,ftBlob);
ZQuery1.ExecSQL;
finally
FileStream.Free;
end;
end;[/delphi]

so geht das speichern jetzt brauch i nur noch das auslesen