Einzelnen Beitrag anzeigen

Benutzerbild von Bummi
Bummi

Registriert seit: 15. Jun 2010
Ort: Augsburg Bayern Süddeutschland
3.470 Beiträge
 
Delphi XE3 Enterprise
 
#4

AW: ParentFont aller Komponenten eines Forms setzen

  Alt 23. Nov 2011, 18:43
einen hätt' ich noch
Delphi-Quellcode:

type

  THackControl = Class(Controls.TControl)
    public
    Property ParentFont;
  End;
...



  if Control is TControl then
    THackControl(Control).ParentFont := wasauchimmer;

end;
Thomas Wassermann H₂♂
Das Problem steckt meistens zwischen den Ohren
DRY DRY KISS
H₂ (wenn bei meinen Snipplets nichts anderes angegeben ist Lizenz: WTFPL)
  Mit Zitat antworten Zitat