Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.431 Beiträge
 
Delphi 12 Athens
 
#2

AW: Delphi 11.2 Patch 1 – immer noch Probleme mit High DPI?

  Alt 24. Okt 2022, 17:26
Es gibt in der Tat immer noch Probleme bei Controls mit ParentFont = False. Wenn du da einen Fall reproduzieren kannst, solltest du dafür einen Bugreport anlegen.

Als Workaround habe ich mir für Controls mit abweichenden Font-Eigenschaften (Farbe, Style) einen Helper geschrieben, den ich nach einem DPI-Change mit den passenden Werten aufrufe.
Delphi-Quellcode:
type
  TControlHelper = class helper for TControl
  public
    procedure SetFontColorStyle(AColor: TColor; AStyle: TFontStyles);
  end;

...

procedure TControlHelper.SetFontColorStyle(AColor: TColor; AStyle: TFontStyles);
begin
  ParentFont := True;
  if AColor <> clNone then
    Font.Color := AColor;
  Font.Style := AStyle;
end;

...

  pnlDirCaption.SetFontColorStyle(clNone, [TFontStyle.fsBold]);
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat