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 !