TAdvToolBarPager, TAdvOfficePager and VCL style

Here I read that TAdvOfficePager does not support VCL. And what about TAdvToolBarPager? Has something changed?
TAdvToolBarPager takes colors from the Styler.
TAdvToolBarPager has an entire header and tab of TAdvPage invisible, including text. There is not a word about VCL in the TAdvOfficePager documentation.
How should I proceed correctly?2020-08-11 19_06_07-Jasot SVB

This family of components is designed to mimic Microsoft Office user interfaces. They support the Office styles, not VCL styles that have little to no resemblance to Microsoft Office look & feel.

Will I choose a VCL and how will I customize these components? For if I do not, it will be like a fist to the eye.

Set style to tsCustom for control.UIStyle as well as connected styler.Style and then you can change any color as you want at style level color settings.

I managed TAdvOfficePager by placing a TAdvPanel on each TAdvOfficePage.


But TAdvToolBarPager strongly resists me
If ToolBarStyler is set for TAdvToolBarPager
on the nile, so the VCL is not wanted.
<> nil, so the VCL will take effect. Whatever I do. See the first picture for the result. It is unusable because the header is all white.

See the first picture

I'm sorry, I do not understand the sentence

"If ToolBarStyler is set for TAdvToolBarPager on the nile, so the VCL is not wanted.
<> nil, so the VCL will take effect."

Sorry, I didn't notice a bad translation
on nil, so VCL is not applied
<> nil, so the VCL will allways take effect.

TAdvToolBarPager has no documentation not even demo.

I discovered the UpdateAppColors method for TAdvToolBarOfficeStyler, which redraws the entire TAdvToolBarPager and thus eliminates the effect of VCL. So I tried the following code

dtmdBasic.tbofstlrBasic.AppColor.HoverColor := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.ButtonAppearance.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.ButtonAppearance.ColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.CaptionAppearance.CaptionColor := Panel1.Color;
dtmdBasic.tbofstlrBasic.CaptionAppearance.CaptionColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.Color.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.Color.ColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.CompactGlowButtonAppearance.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.CompactGlowButtonAppearance.ColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.GlowButtonAppearance.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.GlowButtonAppearance.ColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.GroupAppearance.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.GroupAppearance.ColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.PageAppearance.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.PageAppearance.ColorTo := Panel1.Color;
dtmdBasic.tbofstlrBasic.PageAppearance.ColorMirror := Panel1.Color;
dtmdBasic.tbofstlrBasic.PageAppearance.ColorMirrorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.PagerCaption.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.PagerCaption.ColorTo := Panel1.Color;
//**********************************************************************************
dtmdBasic.tbofstlrBasic.TabAppearance.Color := Panel1.Color;
dtmdBasic.tbofstlrBasic.TabAppearance.ColorTo := Panel1.Color;
dtmdBasic.tbofstlrBasic.TabAppearance.ColorMirror := Panel1.Color;
dtmdBasic.tbofstlrBasic.TabAppearance.ColorMirrorTo := Panel1.Color;

dtmdBasic.tbofstlrBasic.UpdateAppColors;

The result can be seen in the picture. Change manifested itself only in Tab.
Is it possible to push it to other elements as well? I don't mean TAdvGlowButton.2020-08-14 19_36_39-Form1

Thanks for the feedback :frowning_face: I have reached the following state
2020-08-15 09_00_02-Form1

AdvGlowButton3.Appearance.Color: = Panel1.Color;
AdvGlowButton3.Appearance.ColorTo: = Panel1.Color;
AdvGlowButton3.Appearance.ColorMirror: = Panel1.Color;
AdvGlowButton3.Appearance.ColorMirrorTo: = Panel1.Color;
AdvGlowButton3.Transparent: = False;
AdvToolBarPager1.UpdateAppearance; 

TAdvToolBar remains to be resolved
left is on AdvPage - its rendering is incorrect
the right one is on AdvPanel - its rendering is correct, except for the left vertical bar with dots
Is there any advice?

Please, is it possible to add the "Show left handle" property to the TAdvToolBar?
That would solve all my problems.
Well thank you.

Hooray, I tried trial and error to achieve the required. It took an incredibly long time, but it was not possible without the documents.
Maybe it will help someone.

// DataModule TAdvToolBarOfficeStyler dtmdBasic.tbofstlrBasic.UpdateAppColors; //********************************************************************************** dtmdBasic.tbofstlrBasic.Color.Color := Panel1.Color; dtmdBasic.tbofstlrBasic.Color.ColorTo := Panel1.Color; dtmdBasic.tbofstlrBasic.Color.Mirror.Color := Panel1.Color; dtmdBasic.tbofstlrBasic.Color.Mirror.ColorTo := Panel1.Color; dtmdBasic.tbofstlrBasic.Color.Mirror.ColorMirror := Panel1.Color; dtmdBasic.tbofstlrBasic.Color.Mirror.ColorMirrorTo := Panel1.Color; //********************************************************************************** dtmdBasic.tbofstlrBasic.PageAppearance.Color := Panel1.Color; dtmdBasic.tbofstlrBasic.PageAppearance.ColorTo := Panel1.Color; dtmdBasic.tbofstlrBasic.PageAppearance.ColorMirror := Panel1.Color; dtmdBasic.tbofstlrBasic.PageAppearance.ColorMirrorTo := Panel1.Color; //********************************************************************************** dtmdBasic.tbofstlrBasic.PagerCaption.Color := Panel1.Color; dtmdBasic.tbofstlrBasic.PagerCaption.ColorTo := Panel1.Color; dtmdBasic.tbofstlrBasic.PagerCaption.ColorMirror := Panel1.Color; dtmdBasic.tbofstlrBasic.PagerCaption.ColorMirrorTo := Panel1.Color; //********************************************************************************** dtmdBasic.tbofstlrBasic.TabAppearance.BackGround.Color := Panel1.Color; dtmdBasic.tbofstlrBasic.TabAppearance.BackGround.ColorTo := Panel1.Color; dtmdBasic.tbofstlrBasic.TabAppearance.Color := Panel1.Color; dtmdBasic.tbofstlrBasic.TabAppearance.ColorTo := Panel1.Color; dtmdBasic.tbofstlrBasic.TabAppearance.ColorMirror := Panel1.Color; dtmdBasic.tbofstlrBasic.TabAppearance.ColorMirrorTo := Panel1.Color; //********************************************************************************** AdvToolBarPager1.UpdateAppearance; 2020-08-15 19_27_17-Form1

I still miss him there

  dtmdBasic.tbofstlrBasic.CaptionAppearance.CaptionColor := Panel1.Color;
  dtmdBasic.tbofstlrBasic.CaptionAppearance.CaptionColorTo := Panel1.Color;