如何实现继承raduibutton控件,实现下面功能

Question

使用消息映射：
以下是在C++builder中的代码，自己转换一下吧：定义：
BEGIN_MESSAGE_MAP                        VCL_MESSAGE_HANDLER(CM_MOUSELEAVE,TMessage,CMMouseLeave);
END_MESSAGE_MAP(TImage); //这里的TImage改为TRadioButtonHIDESBASE MESSAGE void __fastcall CMMouseLeave(TMessage&Msg);实现：
void __fastcall TImagebtn::CMMouseLeave(TMessage&Msg)
{
  //移出的响应事件代码
}
—————————————————————————————————
MaximStr := '宠辱不惊，看庭前花开花落，去留无意；
             毁誉由人，望天上云卷云舒，聚散任风。';
if Not Assigned(I) then
  I := TI.Create(Nil);
I.Maxim := MaximStr;
—————————————————————————————————