回 帖 发 新 帖 刷新版面

主题:帮帮忙啊

begin
timeid:=timeid+1;

 adotable1.FieldByName('Name').AsString :=user.Text;

 if(user.text=adotable1.fieldbyname('Name').asstring )
     and (password.text=adotable1.fieldbyname('Mma').asstring)
  then
  begin
  Modalresult:=mrOK;
 end
 else
 begin
 if timeid>3 then
 begin
  application.Terminate ;
 end
 else if user.text<>adotable1.FieldByName('Name').asstring then
  begin
   application.MessageBox('非法用户名,请输入正确的用户名!','用户名',
      MB_OK+MB_ICONEXCLAMATION);
   user.SetFocus;
   end
   else
   begin
   application.MessageBox('输入密码错误,请再输入一次','密码',
      MB_OK+MB_ICONEXCLAMATION);
   password.SetFocus;
   end;

   end
这是我的一个小系统的登陆里的'确定'按纽里的程序我运行的时候回出现如下的错误能帮我看看吗?谢谢!
project kaoqin.exe raised exception class EDatabaseError with message ‘ADOTable1:Aataset not in edit or insert mode’. Process stopped. Use Step or Run to continue.

回复列表 (共1个回复)

沙发

错误信息都明确告诉你了,别那么懒嘛,用词霸查一个你自己就清楚了。不过我还是告诉你:
‘ADOTable1:Dataset not in edit or insert mode’:数据集不在编辑或插入模式。
在adotable1.FieldByName('Name').AsString :=user.Text之前应adotable1.Append或adotable1.Edit

我来回复

您尚未登录,请登录后再回复。点此登录或注册