Officepager

VCL TMS VCL UI Pack
1

Hello,

I have a problem with the AdvOfficePager component.
In the Tabsetting I set rounding to 2, shape = tsRectangle

But when I run the program, i don’t have the round edges ? It’s always a square rectangle.
Probably I do something wrong ?

Regards

2

Hi,

Can you execute this programmatically and see if it changes the appearance?

AdvOfficePager1.TabSettings.Rounding := 2;
3

Hi,

I put your code in the “oncreate” event of the Form and it’s working well.

Thanks

1 Like
4

I suspect you have the TAdvOfficePagerOfficeStyler component connected to your TAdvOfficePager? If so, this component takes over the style of the TAdvOfficePager and you would configure the tab rounding at design-time via TAdvOfficePagerOfficeStyler.TabRounding