adoquery2.sql.Add('select userid from users where (username=@lcname) and (password=@lcpassword)')
if adoquery2.recordcount=0 then
begin
messagedlg('输入的密码不正确,请重新输入!',mtwarning,[mbyes],0);
exit;
end
else
if adoquery2.recordcount=0 then
begin
messagedlg('输入的密码不正确,请重新输入!',mtwarning,[mbyes],0);
exit;
end
else
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货