奇怪的错误。

    ADOTable1.Edit;  
      ADOTable1.First;  
      while   not   ADOTable1.Eof   do  
      begin  
          if   ADOTable1.FieldByName('title').Value   =   'haven'   then  
          begin  
              ADOTable1.FieldByName('content').Value   :=   Memo1.Text;  
              ADOTable1.Post;  
              break;  
          end;  
          ADOTable1.Next;  
      end;  
  end;  
   
  出现的错误是：ADOTable1:Dataset   not   in   edit   or   insert   mode  
  这是怎么回事？  
   
   
  问题点数：20、回复次数：6Top

1 楼powerlee（老李飞刀）回复于 2001-09-19 20:39:10 得分 20

    ADOTable1.First;  
      while   not   ADOTable1.Eof   do  
      begin  
          if   ADOTable1.FieldByName('title').Value   =   'haven'   then  
          begin  
              AdoTable1.Edit;  
              ADOTable1.FieldByName('content').Value   :=   Memo1.Text;  
              ADOTable1.Post;  
              break;  
          end;  
          ADOTable1.Next;  
      end;  
  Top

2 楼line（一千弯线）回复于 2001-09-19 20:39:44 得分 0

active设为true试试Top

3 楼haven（阿天）回复于 2001-09-19 20:41:11 得分 0

to   powerlee:我试试  
  to   line:active已经true了Top

4 楼haven（阿天）回复于 2001-09-19 20:44:55 得分 0

to   powerlee:成功了，谢谢，不过这是怎么回事呢，AdoTable1.Edit;的位置放在那里就行，放在上面就不行？  
              Top

5 楼yeqiufeng（叶秋枫）回复于 2001-09-19 20:45:34 得分 0

      ADOTable1.Edit;  
      ADOTable1.First;    
   
  什么时候该写了  
   
  什么时候再Edit  
   
  先Edit好   再干那干这  
   
  然后再写  
   
  那是不可能的  
   
  因为你指针一移动  
   
  Edit马上就无效  
   
  @_@Top

6 楼guipei（IMRAD(QQ:88598744)）回复于 2001-09-19 20:49:49 得分 0

gzTop

相关问题

• adotable1
• fieldbyname
• edit
• begin

• 帖主：haven
• powerlee

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载