cxchecklistbox的小问题.

Question

第一次用,报错参数过多.请那位高手指教.procedure TForm1.BitBtn1Click(Sender: TObject);
var  i: integer;
begin
            for i:=0 to cxGrid2DBTableView1.ColumnCount-1 do
             begin
                  cxCheckListBox1.Items.Clear;
                  cxCheckListBox1.Items.Add(Trim(cxGrid2DBTableView1.Columns[i].Caption)); //报错:too many actual parameters.
             end;
end;

Answer 1

告诉你参数过多了，你看看Add需要什么参数

Answer 2

搞定原来是这关地:procedure TForm1.cxButton4Click(Sender: TObject);
var i:integer;
begin  cxCheckListBox1.Items.Clear;
  for i:=0 to cxGrid2DBTableView1.ColumnCount-1 do
   begin
      cxCheckListBox1.Items.Add;
      cxCheckListBox1.Items.Items[i].text:=Trim(cxGrid2DBTableView1.Columns[i].Caption);
    end;
end;