JPG unter Interbase BLOB speichern mit BDS2006 .NET

[gluglu]

Hallo !

Ich bekomme immer wieder Fehler wenn ich versuche in Interbase eine JPG Datei in einen BLOB zu speichern mit folgendem Code

Delphi-Quellcode:

procedure TPhoto.ButtonClick(Sender: TObject);
var
  m : TStream;
  f : TFileStream;
begin
  if OpenDialog1.Execute then begin
    DataModule1.IBQuery1.Edit;
    m := DataModule1.IBQuery1.CreateBlobStream(DataModule1.IBQuery1PHOTO, bmReadWrite);
    f := TFileStream.Create(OpenDialog1.Filename, fmOpenRead);
    m.CopyFrom(f, 0);
    f.Free;
    m.Free;
    DataModule1.IBQuery1.Post;
  end;
end;

Beim Post bekomme ich 'Object reference not set to an instance of an object' und beim schliessen und erneutem Post 'invalid BLOB handle'.

Benutze BDS2006 unter .NET und InterBase 7.5

Danke !