L
lunx
Unregistered / Unconfirmed
GUEST, unregistred user!
请个为大侠帮我诊断一下吧?
我的头都大了(一点都不夸张,不信割下来让你下酒)
cmusername:= musername.text;
cmpassword:=mpassword.text;
table1.open;
table1.setkey;
table1.fieldbyname('username').asstring:=cmusername;
if table1.gotokey
then
begin
if (tmppassword=cmpassword)and(length(tmppassword)=length(cmpassword))
then
begin
end
else
begin
application.messagebox('密码不对!','系统登录',mb_ok+mb_iconquestion);
Cishu:=cishu+1;
if cishu>3 then
begin
end;
table1.close;
end;
end
else
begin
application.messagebox('没有这个用户!','系统登录',mb_ok+mb_iconquestion);
Cishu:=cishu+1;
if cishu>3
then
begin
modalresult:=mrall;
close;
// main1.free;
end;
table1.close;
end;
我的头都大了(一点都不夸张,不信割下来让你下酒)
cmusername:= musername.text;
cmpassword:=mpassword.text;
table1.open;
table1.setkey;
table1.fieldbyname('username').asstring:=cmusername;
if table1.gotokey
then
begin
if (tmppassword=cmpassword)and(length(tmppassword)=length(cmpassword))
then
begin
end
else
begin
application.messagebox('密码不对!','系统登录',mb_ok+mb_iconquestion);
Cishu:=cishu+1;
if cishu>3 then
begin
end;
table1.close;
end;
end
else
begin
application.messagebox('没有这个用户!','系统登录',mb_ok+mb_iconquestion);
Cishu:=cishu+1;
if cishu>3
then
begin
modalresult:=mrall;
close;
// main1.free;
end;
table1.close;
end;