[Support]

For receiving of the current system scale value you can use such code:

Code:

CurrentScale := aScalePercents[sSkinManager1.SysFontScale]

Add “sConst” into “uses”.

[TAZ]

It did the trick.

actToolsScaleModeAuto.Caption := 'Auto (' + IntToStr(aScalePercents[smMain.SysFontScale]) + '%)';

Thank you very much.

[Author]

Posts