procedure TForm1.BitBtn1Click(Sender: TObject);
var
username,password:string;
begin
adoquery_login.Close;
adoquery_login.SQL.Clear;
adoquery_login.SQL.Add('select * from Operator');
adoquery_login.Open;
if adoquery_login.RecordCount>0 then
begin
adoquery_login.First;
username:=adoquery_login.FieldValues['name'];
password:=adoquery_login.fieldvalues['pwd'];
if (trim(username)=trim(edit2.Text) and (trim(password)=trim(edit3.Text)) then
........................
报错信息:incompatible types:'string' and 'boolean' 不知道是什么问题
var
username,password:string;
begin
adoquery_login.Close;
adoquery_login.SQL.Clear;
adoquery_login.SQL.Add('select * from Operator');
adoquery_login.Open;
if adoquery_login.RecordCount>0 then
begin
adoquery_login.First;
username:=adoquery_login.FieldValues['name'];
password:=adoquery_login.fieldvalues['pwd'];
if (trim(username)=trim(edit2.Text) and (trim(password)=trim(edit3.Text)) then
........................
报错信息:incompatible types:'string' and 'boolean' 不知道是什么问题
解决方案 »
- 一个有关ComboBox的问题!!望高人解答
- *.vsd和*.mdl可用什么打开。这大约是一个建模工具.
- 这个问题谁会呀!
- 在win2000中编的程序到windows xp中运行出错,请问是怎么回事?
- 在DELPHI中怎么样调试MTS\COM+服务器端的组件?
- 我在代码中设置的断点怎么不停下来?是不是哪个设置错了?
- 连锁企业的考勤数据怎样采集到总部
- 怎样不用安装access而将驱动升级到access2000
- 请教关于TTreeView的问题
- 将软件的设置信息存到一个*.ini文件中,怎样实现?
- 100分.不同的List,存储了不同的对象,请问如何用同一函数去检查List是否重复
- C++里面的结构指针和类型转换,在delphi里面怎么实现?
修改为
if (trim(username)=trim(edit2.Text) ) and ( (trim(password)=trim(edit3.Text)) then 因为and的优先级比=高