您现在的位置: 天下网吧 >> 网吧天地 >> 天下码农 >> 后端开发 >> PHP >> 正文

delphi如何控制登陆失败的次数

2008-11-7网络佚名

要求:当输入的用户名或密码错误时,提示“用户名或密码错误,你还剩3次登陆机会!”  再错就提示“用户名或密码错误,你还剩2次登陆机会!”......最后当3次输入的密码都不正确时退出系统!


 if trim(MMEdit.Text) <> trim(pubQry.FieldByName('uPas').AsString) then
        begin
          Logintimes :=Logintimes + 1;
          if Logintimes < 3 then
          begin
          MessageBox(handle,pchar('错误。密码第'+IntToStr(Logintimes)+'次错误,请重新输入'),'密码错误',MB_OK OR MB_ICONERROR);
          MMEdit.Text:='';
          MMEdit.SetFocus;
          end
          else
          begin
          MessageBox(handle,'密码三次错误。系统将会关闭','密码错误', MB_ICONERROR);
          Application.Terminate;
          end;
        end

欢迎访问最专业的网吧论坛,无盘论坛,网吧经营,网咖管理,网吧专业论坛 https://bbs.txwb.com

关注天下网吧微信/下载天下网吧APP/天下网吧小程序,一起来超精彩

本文来源:网络 作者:佚名

声明
声明:本站所发表的文章、评论及图片仅代表作者本人观点,与本站立场无关。若文章侵犯了您的相关权益,请及时与我们联系,我们会及时处理,感谢您对本站的支持!联系邮箱:support@txwb.com,系统开号,技术支持,服务联系QQ:1175525021本站所有有注明来源为天下网吧或天下网吧论坛的原创作品,各位转载时请注明来源链接!
天下网吧 网吧天下