函数的问题

Question

定义了一个函数判断用户登录
function Tuser.GetUserPwd(Name:string):string;
  var
  s:string;
  begin
  datamodfrm.ADOQuery1.Close;
  datamodfrm.ADOQuery1.SQL.Clear;
  Datamodfrm.ADOQuery1.SQL.Add('select * from 用户清单 where 姓名='''+Name+'''');
  Datamodfrm.ADOQuery1.Open;
  s:=Datamodfrm.ADOQuery1.fieldbyname('密码').AsString;
  result:=s;
  end；
这是登录代码
procedure TForm1.Button1Click(Sender: TObject);
begin
user:=Tuser.create;
if (edit1.Text='')or (edit2.Text='') then
begin
showmessage('请将用户信息输入完整');
exit;
end;
times:=times+1;
if user.GetUserPwd(edit1.Text)=edit2.Text then
showmessage('恭喜你通过验证')
else
begin
showmessage('对不起，密码不正确');
if (times>3) then form1.Close;
end;
user.Free;
end;
经检测用户名与密码均正确，在断点调试检测S变量获取的密码也正确，但登录老是弹出密码不正确。

Answer 1

没看出啥头绪...
姑且一试 ，加 trim()：
if trim(user.GetUserPwd(edit1.Text))=trim(edit2.Text) then

Answer 2

会不会是数据库密码后面有空格？
试下
result:=Trim(s);

Answer 3

在函数的返回值与edit2.text中的密码比较时出现问题，直接跳过