一个将delphi代码 写成 C++builder 的问题 ！！！(0分)

下面的一个函数写成C++Builder 的代码该怎么写？请帮忙，谢过各位了。
procedure TmomsMainFrm.Return(Sender : TObject) ;
begin
if TPanel(Sender).Font.Color = clYellow then
begin
TPanel(Sender).BevelInner := bvNone ;
TPanel(Sender).BevelOuter := bvNone ;
TPanel(Sender).Font.Color := clWhite ;
end ;
end ;
procedure TmomsMainFrm.ReturnMenu(Sender: TObject);
begin
Return(TObject(menu1)) ;
Return(TObject(menu2)) ;
Return(TObject(menu3)) ;
end;

试一下吧！
void TMomsMainFrm::Return(TObject *Sender)
{
if(((TPanel *)Sender)->Font->Color == clYellow)
{
((TPanel *)Sender)->BevelInner = bvNone;
...
}
}
void TMomsMainFrm::ReturnMenu(TObject *Sender)
{
Return((TObject *)menu1);
...
}

为什么要将Delphi的代码写成BCB的
BCB可以直接使用和编译Delphi的代码的，只不过都变成只读的。

可以直接编译。呵呵。
双编译器啊。