问题很简单,就是两个个EDIT控件。输入数据后判断其跟数据库里的name,password是否一致
代码如下:(数据库里只有一条记录)
if E_name.Text<>ADOTable1['name'] then
MessageDlg('无此用户!',mtinformation,[mbOK],0)
else  begin
if
E_passworld.Text<>ADOTable1['password'] then
MessageDlg('密码错误,请重新输入',mtinformation,[mbOK],0)
else
。。
为什么无论我输入的用户名是否存在都显示  无此用户 ?
好像 if E_name.Text<>ADOTable1['name']  这个条件白写了
我试过放个Label1
在 if E_name.Text<>ADOTable1['name']  前加上Label1.Caption:=ADOTable1['name'];
运行后Label1的Caption显示的是正是我数据库里的数据没错啊,而且跟E_name.Text完全一样!这是怎么回事啊?还有我有时候关掉程序后就出现
  Access violation at address 00000000.Read of address 0000000.
按多两次F9就没事了,这又是个什么问题?

解决方案 »

  1.   

    我试过用 if ADOTable1.Locate('Fname',E_name,[]) then.........
    也没用,直接跳过这个条件了跟没写一样郁闷死了,各位大侠救命啊~
      

  2.   

    如果你的数据库中字段name为char类型的话
    应该在ADOTable1['name']前边加上trim(),去掉两边空格看看,应该是这样的。
    if E_name.Text<>trim(ADOTable1['name']) then