求教 C++builder 的问题 ！！！(0分)

下面的一个函数写成C++Builder 的代码该怎么写？请帮忙，谢过各位了。
function TmomsMainFrm.ReturnMenu(Sender: TObject);
if Trim(TSpeedButton(Sender).Caption) = '客户信息' then
begin
menu1.Caption := '物品入库' ;
menu2.Caption := '工程跟踪' ;
pnMenu.Height := 52 ;
end else
if Trim(TSpeedButton(Sender).Caption) = '销售计划' then
begin
menu1.Caption := '公司计划' ;
menu2.Caption := '个人计划' ;
pnMenu.Height := 52 ;
end
end;

((TspeedButton *)Sender)->Caption

你只要把delphi中的“.”和“：＝”改成cb中的“->”和“＝”就行了。
基本上的区别不大的。

接受答案了.