Image in Access Datenbank speichern

[DeddyH]

Kann das sein, dass Du die Streams verwechselt hast? Mal aus dem Kopf (daher keine Garantie):

Delphi-Quellcode:

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