TShapeButton + TAdvPreviewMenu => Visual issue when button width > 55

VCL TMS VCL UI Pack
1

When using a TAdvToolBarPager with a TShapeButton with an assigned TAdvPreviewMenu, when the menu pops up and the button width > 55, it gets shaded by the menu.
When button width < 55, it's kinda extended.
How can AdvPreviewMenu "respect" the button width?
Seems like it's transparency rect has a fixed width.

How to reproduce:

  • Open demo TMS VCL UI Pack\Demos\AdvToolBar\Office2010MDI\AdvToolBarMDI.dproj
  • Change AdvShapeButton1.Width to 85
  • Change AdvShapeButton1.Caption to 'System Menu'
  • Change AdvToolBarPager1.TabSettings.StartMargin to 86
  • Run
    image
  • Now click System Menu
    image

Thanks.

2

We have investigated this and applied a fix.
The next update will address this.

3

Thanks!

One more question: the PreviewMenu is supposed to be used exclusively with an unique form/toolbar/shapebutton, right?

I tried to use it as an independent popup menu, but although I showed it in other customized cordinates, it used the "back canvas" transparency as of my main ShapeButton.

4

TAdvPreviewMenu was designed to be used with the TAdvToolBarPager

1 Like