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

下面的一个函数写成C++Builder 的代码该怎么写？请帮忙，谢过各位了。
procedure TmomsMainFrm.ReturnMenu(Sender: TObject);
procedure 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 ;
begin
Return(TObject(menu1)) ;
Return(TObject(menu2)) ;
Return(TObject(menu3)) ;
end;

你这短程序结构是不是本身就有问题的啊？
你只要把delphi中的“.”和“：＝”改成cb中的“->”和“＝”就行了。
基本上的区别不大的。

lbylby你可真“逗”