程序代码如下：
procedure TForm1.Button1Click(Sender: TObject);
var
yong:string;
mi:string;
n:string;
i:string;
begin
n:='pas';
yong:=edit1.Text;
mi:=edit2.Text;
ADOQuery1.SQL.Text:='select '+n+' from pass where us='''+yong+'''';
ADOQuery1.Active:=true;
i:=ADOQuery1.FieldByName(n).asstring;
edit4.Text:=i;
if i=mi then
messageDlg('欢迎登录本系统',mtinformation,[mbok],0)
else
messageDlg('密码或用户名错误！',mtinformation,[mbok],0);
end;

上面的程序实现的功能是：从数据库读一个密码出来，和用户输入的密码进行比较。
可是用if语句总会失败。能编译运行。但不得结果。用FieldByName取得返回结果却无法比较.请高手帮忙.

问题已解决。谢谢各位。如版主所言，使用TRIM函数。