我想把某一个groupbox里所选中的checkbox的caption值放到该groupbox里的memo控件中,请问怎样做呢???
注意:有好几个groupbox控件(里面当然有好多个checkbox,但只有一个相应的memo控件)了,比如有三组吧,分别为groupbox1,memo1
groupbox2,memo2
groupbox3,memo3;当选择groupbox控件里的checkbox时把checkbox.caoption内容写到相对应的memo里,
groupbox1里的写到memo1里,groupbox2里的写到memo2里,groupbox3里的写到memo3里
这几组groupbox组件分属于不同的tabsheet控件里,当在不同的tabsheet组件里切换时,选择的checkbox要求互不影响,即选择tabsheet1里的checkbox控件时,不要同时也选择了tabsheet2里的checkbox控件!!!!!!!

解决方案 »

  1.   

    这样就可以了
    ...
    procedure TForm1.CheckBox1Click(Sender: TObject);
    begin
      memo1.Lines.Add(TCheckBox(Sender).Caption);
    end;procedure TForm1.CheckBox2Click(Sender: TObject);
    begin
      memo1.Lines.Add(TCheckBox(Sender).Caption);
    end;procedure TForm1.CheckBox3Click(Sender: TObject);
    begin
      memo2.Lines.Add(TCheckBox(Sender).Caption);
    end;procedure TForm1.CheckBox4Click(Sender: TObject);
    begin
      memo2.Lines.Add(TCheckBox(Sender).Caption);
    end;
    ...
      

  2.   

    不同TABSHEET的CHECKBOX的選擇是沒有任何關聯的.