if (self.ADOQuery1.RecordCount=0) then
showmessage('用户名密码错误')
else
begin
self.Button4.Enabled:=true;
if (self.ADOQuery1.FieldByName('pow').AsString='a') then <------一直不能进入这个if里面
begin
self.Button1.Enabled:=true;
self.Button2.Enabled:=true;
self.Button3.Enabled:=true;
self.ADOTable1.Active:=true;
end;
if (self.ADOQuery1.FieldByName('pow').AsString='b') then
begin
self.Button1.Enabled:=true;
self.Button2.Enabled:=true;
self.ADOTable1.Active:=true;
end;
end;
showmessage('用户名密码错误')
else
begin
self.Button4.Enabled:=true;
if (self.ADOQuery1.FieldByName('pow').AsString='a') then <------一直不能进入这个if里面
begin
self.Button1.Enabled:=true;
self.Button2.Enabled:=true;
self.Button3.Enabled:=true;
self.ADOTable1.Active:=true;
end;
if (self.ADOQuery1.FieldByName('pow').AsString='b') then
begin
self.Button1.Enabled:=true;
self.Button2.Enabled:=true;
self.ADOTable1.Active:=true;
end;
end;
while not self.adoquery1.eof do
begin
....//那些条件判断的处理
self.adoquery1.next;
end;
showmessage('用户名密码错误') 此处改为:
if (self.ADOQuery1.RecordCount<1) then
showmessage('用户名密码错误')