源码如下: 
DataSourceDataChange事件代码:
{   if (Field!=NULL) 
  { 
    DBGrid.Tag=false; 
    ADOQuery1.DisableControls(); 
    if (Field!=NULL) 
    { 
      CtrlInput(Field.FieldName); 
    } 
    ADOQuery1.EnableControls(); 
  } 
} CtrlInput(FieldName:String ) ////功能:控制输入 

  
    ADOQuery1.Edit();    //不要这两句当鼠标点到别的行时,不能保存当前输入的内容,但就算是去掉了还是会出错 
    ADOQuery1.Post();    
  ............          //已经屏蔽掉代码了 
    ADOQuery1Close(); 
    ADOQuery1.SQL.Clear(); 
    ADOQuery1.SQL.Add("Select * From TbName order by xh"); 
    ADOQuery1.Active:=true; 
 
} 其中 ADOQuery1 、DataSource、DBGrid、ADOConnect均已设置好相关连接,我快速在DBGird里输入数据,输入数据后并用鼠标点击DBGrid的任意格子,多试几次就会出现undefined symbol ADOQuery这样的错误了, 除了这些外,我并没有在程序中写入任何事件