查询问题,明天就要交任务,等着急!!!

请高手指点,我想查询,commitstate为TRUE的记录,我的数据库是ACESS,有一个字段是Boolean类型的,但是我想查询这个字段,如何实现,表txpp(bh,xm,commitstate);
字段commitstate 为是,否,我现在不知道什么实现,请帮我看看我的写的代码如下:var 
 byter:boolean;procedure TF_SJCX.RadioButton1Cick(Sender: TObject);
begin
if RadioButton1.hecked then
   byter:=true
  else if  RadioButton2.hecked then
   byter:=false
end;procedure TF_SJCX.RadioButton2cLick(Sender: TObject);
begin
if RadioButton1.hecked then
   byter:=true
  else if  RadioButton1.hecked then
   byter:=false
end;
procedure TF_SJCX.BitBtn2Click(Sender: TObject);
var
ss:string;
time:string;
begin
 if CheckBox4.Checked then
      ss:=ss+'and commitstate=''true''';
     ss:='select * from txjl where 1=1'+ss+' order by fssj desc ';
     data1.ADO_SJCX.Close;
     data1.ADO_SJCX.SQL.Clear;
     data1.ADO_SJCX.SQL.Add(ss);
     data1.ADO_SJCX.Open;
     if data1.ADO_SJCX.RecordCount= 0 then
     begin
        showmessage('你没符合查询条件，请重新输入')
      end;
  end;