Are there any simple ways to change font in the whole program? I have desktop fmx (delphi xe7) application, which use styles but for some users it’s nessasary to configure this thing.
I understantand that it may looks like this:
LabelReceptSign.StyledSettings := [];
LabelReceptSign.FontColor:= ComboColorBox1.Color;
LabelReceptSign.Font.Size:= SpinBoxReceptFontsize.Value;
LabelReceptSign.Font.Family:= ComboBoxFontRec.Selected.Text;
for each component, but it will be a very huge code! Using FindComponent procedure with name itteration generation ‘label’ + inttost(i) I could make it shorter, but whatever it’s very poor way.
Any suggestions?
