一个其名其妙的问题,只要调用了数据表的代码中,条件语句的条件就不能判断,不解啊,苦恼啊,有那位专家能否帮我!!!小弟在线恭候,下为一例
procedure TForm1.BitBtn1Click(Sender: TObject);
var
i:integer;
begin
with saledatemod.user do
begin
close;
sql.Clear;
sql.Add('select * from tuser where login='+quotedstr(edit1.Text));
open;
first;
if edit2.Text=n then  //此处即无效了,但是在此之前加上showmessage(fieldbyname 
                                    ('psw').asstring都可显示出正确数据
  begin
    mainfrm.ShowModal;
    form1.Hide;
    end
    else
    begin
showmessage('你输入的用户名和密码有误,请重新输入');
edit2.Text:='';
edit1.SetFocus;
end;
end;
end;

解决方案 »

  1.   

    从你给的这点代码if edit2.Text=n then 我看不出来是什么意思
      

  2.   

    哦不好意思,望了改,是if edit2.Text=fieldbyname('psw').asstring then ,当时是急了什么都试了一下
      

  3.   

    if edit2.Text=trim(fieldbyname('psw').asstring) then 
    看看
      

  4.   

    确是是数据有问题,但是我在SQL表中都是使用的NVCHAR类型,为何前面有空格呢,但是在输出时也没有发现空格啊