如何在启动时检验身份(50分)

  • 主题发起人 主题发起人 wfjason
  • 开始时间 开始时间
W

wfjason

Unregistered / Unconfirmed
GUEST, unregistred user!
在启动窗口中,设有检验窗口,如何将其中的数据和口令库的已有记录相对应,
以确定身份?
注:数据库是PAX..型的,已使用SQL语言查询,但不知如何控制其返回值.
 
???
query1.sql.text := 'select username, password from pswddb where username=:username_what_u_entered and password = :password_what_u_entered';
query1.parambyname('username_what_u_entered').asstring := edit1.text;
query1.parambyname('password_what_u_entered').asstring := edit2.text;
query1.open;
if query1.empty then

illegal_login
else
enter_ur_app;
 
Another_eYes的方法可行,你的SQL语句是怎样写的?
 
that is easy!
 
如果在本地使用,还是用一下table吧!
if not tblpasswd.locate('username;passwd',
VarArrayOf([edtusername.text,
edtpasswd.text]
),
[]) then
begin
//非法用户
end
else
begin
//合法
end;
 
多人接受答案了。
 
后退
顶部