Einzelnen Beitrag anzeigen

Benutzerbild von KodeZwerg
KodeZwerg

Registriert seit: 1. Feb 2018
3.685 Beiträge
 
Delphi 11 Alexandria
 
#14

AW: Property eines TObjects setzen Frage

  Alt 10. Mai 2021, 11:46
Warum bitte schön verwendest du dann nicht auch GetImmersiveColorFromColorSetEx
Delphi-Quellcode:
procedure TfrmMain.ApplyThemedColors;
var
  i: Integer;
begin
  if IsDarkTheme then
    begin
      FBackgroundColor := FColorSet.Colors[ImmersiveApplicationBackgroundDarkTheme];
      FTextColor := FColorSet.Colors[ImmersiveApplicationTextDarkTheme];
    end
    else
    begin
      FBackgroundColor := FColorSet.Colors[ImmersiveApplicationBackgroundLightTheme];
      FTextColor := FColorSet.Colors[ImmersiveApplicationTextLightTheme];
    end;
  UpdateColors;
end;
Aber vielleicht verstehe ich Dich da gerade auch falsch, wäre nicht das erste mal
Gruß vom KodeZwerg
  Mit Zitat antworten Zitat