帮帮我,急死了

解决方案 »

  1.   

    使用LOCATE后如果DBGRID会自动将光标移到这条记录
      

  2.   

    if length(edt_id.text)=6 then
         begin
          if not dm.cluser.Locate ('编号', edt_id.Text, []) then //相同
                 MessageDlg ('编号,请重新输入!', mtError, [mbOk], 0);
         end;
      

  3.   

    Locate以后DBGrid中的记录自己就会移动到这条记录了,因为他是数据感知的控件。
    如果要把光标放到DBGRID中,用这条语句:
    if DBGrid1.CanFocus then DBGrid1.setFocus
      

  4.   

    ADOTable1.Locate('fieldname',value,[loPartialKey]);
      ADOTable1.FieldByName('fieldname').FocusControl;