I've got 5 labels on my form whose Fonts styles should all get the BOLD property added. I tried doing this using the code below but only Label2 gets bold and the rest still stays as it is at design time.
Sleep(350);
TThread.Synchronize(nil,
procedure
begin
Label2.TextSettings.Font.Style := Label2.TextSettings.Font.Style +
[TFontStyle.fsBold];
Label2.TextSettings.FontColor := TAlphaColorRec.Gray;
end);
Sleep(350);
TThread.Synchronize(nil,
procedure
begin
Label3.TextSettings.Font.Style := Label3.TextSettings.Font.Style +
[TFontStyle.fsBold];
Label3.TextSettings.FontColor := TAlphaColorRec.Gray;
end);
Sleep(350);
TThread.Synchronize(nil,
procedure
begin
Label4.TextSettings.Font.Style := Label4.TextSettings.Font.Style +
[TFontStyle.fsBold];
Label4.TextSettings.FontColor := TAlphaColorRec.Gray;
end);
Sleep(350);
TThread.Synchronize(nil,
procedure
begin
Label5.TextSettings.Font.Style := Label5.TextSettings.Font.Style +
[TFontStyle.fsBold];
Label5.TextSettings.FontColor := TAlphaColorRec.Gray;
end);
Sleep(350);
TThread.Synchronize(nil,
procedure
begin
Label6.TextSettings.Font.Style := Label6.TextSettings.Font.Style +
[TFontStyle.fsBold];
Label6.TextSettings.FontColor := TAlphaColorRec.Gray;
end);
Sleep(350);
The colors change on each Label, but the Fonts aren't getting bold except for the first label which I try to get bold... this is confusing me. please help me. I use Delphi 10.3.3 Community Edition and an Android 10 Smartphone (Lineage 17.1)