var
BarMenu: TdxBarPopupMenu;
begin
BarMenu := TdxBarPopupMenu.Create(Self);
with BarMenu.ItemLinks.Add do
begin
Item := dxBarButton1;
end;
dxBarLargeButton1.DropDownMenu := BarMenu;
end;
var
BarMenu: TdxBarPopupMenu;
begin
BarMenu := TdxBarPopupMenu.Create(Self);
with BarMenu.ItemLinks.Add do
begin
Item := dxBarButton1;
end;
dxBarLargeButton1.DropDownMenu := BarMenu;
end;