[求助]有个登陆窗口的问题,用户名和密码怎么用循环表示啊
要做个登陆窗口,判断用户名和密码的时候如果用循环要怎么写代码，其他的数据库都已经连接好了，我是用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
show_waring('用户名或密码不对，请从新输入！') ;
ed_user.SetFocus;
Exit;
end;
Frm_Management.ShowModal;
end;
end;
