mxOutlookBarPro中，button是通过for语句动态生成的，如何取得当前单击button的标题呢？ VCL组件开发及应用http://www.delphi2007.net/DelphiVCL/html/delphi_20061220140320248.html
mxOutlookBarPro中，button是通过for语句动态生成的，如何取得当前单击button的标题呢？
动态生成的button如何他们响应他们onclick事件？
var
i: Integer;
pButton: TmxButton;
pButton:=pHeader.AddButton;
pButton.Caption := Menus[i].sName;
pButton.Tag:=i;
pButton.OnClick:= OnButtonClick;
procedure TFMenus.OnButtonClick(Sender: TObject);
var
pButton: TmxButton;
pHeader: TmxHeader;
iMenuIndex: Integer;
begin
pButton:=TmxButton(Sender);
ShowMessage(pButton.Caption);
end;