在"*.bmp"图片保存到Access中时出现的错误怎样解决？帮看一下源代码！

Question

Access中的表为：no,name,sex,photo,re等
源代码:
var
  MS:TMemoryStream;
begin
  opendialog1.Filter:='图形文件(*.bmp)|*.bmp';
  MS:=TMemoryStream.Create;
  if OpenDialog1.Execute  then
     DBImage1.Picture.LoadFromFile(opendialog1.FileName);
     DBImage1.Picture.Bitmap.SaveToStream(MS);
     MS.Position:=0;
  TBlobField(adotable1.FieldByName('photo')).LoadFromStream(MS);
  adotable1.Post;
end;
出现的错误:
project MainForm.exe raised exception class EDatabaseError with message'ADOTable1:Dataset not in edit or insert mode',Process steopped,Use Step or Run to continue

Answer 1

var
  MS:TMemoryStream;
begin
  ADOTable1.Active:=true;
  ADOTable1.Insert;
  opendialog1.Filter:='ͼÐÎÎļþ(*.bmp)|*.bmp';
  MS:=TMemoryStream.Create;
  if OpenDialog1.Execute  then
     DBImage1.Picture.LoadFromFile(opendialog1.FileName);
     DBImage1.Picture.Bitmap.SaveToStream(MS);
     MS.Position:=0;
  TBlobField(adotable1.FieldByName('photo')).LoadFromStream(MS);
  adotable1.Post;
end;

Answer 2

在这段代码之前加一个
Edit or Insert.----------------
沉沦中..........