rzcheckboxgrop 用法

     i:=0;
     try
     rzchckgrp1.Items.BeginUpdate;
     SetLength(myjcxArray, adojcxmset.RecordCount);  //创建动态数组，有5个元素
      with adojcxmset do
      begin
        while not Eof do
        begin
        rzchckgrp1.Items.Add(FieldByName(‘mcheng‘).AsString );   //添加名称显示    
        myjcxArray[i].isselect:=FieldByName(‘isselect‘).AsString;       

        i:=i+1;
        Next;
        end;
      end;
      rzchckgrp1.Items.EndUpdate;
    finally

    end;
  //遍历设置初始checked状态
   for i:=0 to rzchckgrp1.Items.Count-1 do
   begin
      if myjcxArray[i].isselect<>‘0‘ then  
      rzchckgrp1.ItemChecked[i]:=True;
   end;