Image in Access Datenbank speichern

[uwe12]

Ich habe das jetzt mal geändert aber es kommt immer noch der gleiche Fehler.

Delphi-Quellcode:

var
  blob: TAdoBlobStream;
  fs:TMemorystream;
begin
AdoTable1.edit;
 blob := TADOBlobStream.Create(AdoTable1Bild, bmwrite);
  try
    blob.Seek(0, soFromBeginning);
    fs := TMemorystream.create();
    try
      blob.CopyFrom(fs, fs.Size)
    finally
      fs.Free
    end;
  finally
    blob.Free
  end;
 AdoTable1.post;
end;