[Error] Unit_user.pas(67): Incompatible types: 'String' and 'Boolean'

Question

ADOQ_user1.fieldbyname('是否有用户管理权限').Value:=StrToBool(CheckBox1.Checked);
我是这样赋值的
有这样的提示
不知道怎么改
[Error] Unit_user.pas(67): Incompatible types: 'String' and 'Boolean'
高手帮帮忙，很急，谢谢

Answer 1

'是否有用户管理权限'这个字段不是bool行的，你不能赋值为StrToBool(CheckBox1.Checked);

Answer 2

StrToBool(Str: String)里边的参数要求是String型变量。你的CheckBox1.Checked明显是个Bool量直接ADOQ_user1.fieldbyname('是否有用户管理权限').Value:= CheckBox1.Checked;就行了

Answer 3

现在的问题是，
  if( Edit1.Text='')or(Edit2.Text='') then
   ShowMessage('编号和用户名不能为空且不能相同')
    else
     begin
     ADOQ_user1.SQL.Clear;
     ADOQ_user1.SQL.Add('insert into t_user values');
     ADOQ_user1.fieldbyname('用户编号').Value:=Edit1.Text;
     ADOQ_user1.fieldbyname('用户名称').Value:=Edit2.Text;
     ADOQ_user1.fieldbyname('用户类型').Value:=ComboBox1.Text;
     ADOQ_user1.fieldbyname('是否有用户管理权限').Value:=CheckBox1.Checked;
     ADOQ_user1.fieldbyname('是否有商品管理权限').Value:=CheckBox2.Checked;
     ADOQ_user1.fieldbyname('是否有商品销售权限').Value:=CheckBox3.Checked;
     ADOQ_user1.ExecSQL;
显示的错误是ADOQ_user1:'商品编号' not found，我数据表里明明是有用户编号的