[求助]有个登陆窗口的问题,用户名和密码怎么用循环表示啊
要做个登陆窗口,判断用户名和密码的时候如果用循环要怎么写代码,其他的数据库都已经连接好了,我是用datasource,adotable和数据库连在一起的,但是写代码的时候循环老出错,快来帮我看看最好给出你写的代码,判断给的字符串和库里的条目是否相等就可以。
试验下?
begin
adotable1.First;
while (ed_user.Text <> adotable1.FieldByName('user').AsString) or
(ed_password.Text <> adotable1.FieldByName('password').AsString ) do
begin
adotable1.Next;
if adotable1.Eof then
begin
Break();
end;
end;
if (ed_user.Text = adotable1.FieldByName('user').AsString) and
(ed_password.Text = adotable1.FieldByName('password').AsString ) then
begin
Frm_Management.ShowModal;
end
else
begin
show_waring('用户名或密码不对,请从新输入!') ;
ed_user.SetFocus;
end;
end;