我现在把三个单选择框合并成一个构件，想做一个click事件(100分)

我现在把三个单选择框合并成一个构件，想做一个click事件，该事件
能够得到选择的是哪个，比如A,B,C单选框，我选A的时候，能在click事件中
得到该信息。如何做？

这跟直接动态创建控件事件是一样的吧.
type
myclass=class(-----);
----------
public
procedure myclick(sender:Tobject);
----------
end;

实现部分:
constructor myclass.create;//类的构造函数
begin
RadioBut:=TRadioButton.create(self);
------------
---------
RadioBut.onclick:=myclick;
-------
-----
end;
procedure Tmyclass.click(sender:Tobject);
begin
showmessage('成功');
end;

直接用RadioGroup吧，根据ItemIndex判断

继承TWincontrol，
把他的click事件显出来，
再把三个单选框的click事件指向它。

接受答案了.