liooon 2004年12月26日
关于delphi数据库的密码验证问题,请有这方面经验的朋友进来帮帮忙?
我在做数据库的用户添加时,在添加窗体内,当按‘添加’按钮时,执行下面的代码:
repeat
begin
if edit3.text<>'' then
if edit3.text=edit4.Text then
break
else
begin
messagedlg('输入密码不一致,请重新输入!',mtinformation,[mbok],0);
edit3.text:='';
edit4.Text:='';
edit3.SetFocus;
end
else
begin
messagedlg('请输入密码!',mtinformation,[mbok],0); //这里当我输入密码不一致或
edit3.SetFocus; 为空时就会进入死循环了//
end;
end;
until edit3.text<>'' ;
但老是进入死循环,在delphi中是否有暂停的方法等待输入后验证,而不至于进入死循环?
...全文
83 点赞 收藏 3
写回复
3 条回复

还没有回复,快来抢沙发~

发动态
发帖子
数据库相关
创建于2007-08-02

1209

社区成员

8.8w+

社区内容

Delphi 数据库相关
社区公告
暂无公告