Mögliche Größen für eine Font ermitteln

[berens]

Auch mit

Delphi-Quellcode:

  public
    property lbGrad: TListBox read FlbGrad write FlbGrad;
  ...
  lbGrad.Items.Add('8');
  ...

ändert sich da leider nichts...

Ich hatte auch schonmal versucht, die Funktion direkt dem Form unterzuordnen und dann mit

EnumFontFamilies(DC, PChar(Fontname), @TMyFontDialog.EnumFontSizes, Longint(Self)); was allerdings den selben Effekt hatte.

Ich nehme auch sehr gerne Tips zu Alternativen an, wie ich die Schriftgrößen ermitteln kann an. Die LMDFontSizeComboBox kann das ganze super, allerdings würde ich gerne auf LMD verzichten, zumal dies nur eine ComboBox ist.

Und... eine LMDFontSizeComboBox einfügen (unsichtbar) und dann mit Assign die Items rübernehmen ist auch nicht die feine Art oder?

Irgendwer Ideen? Danke schonmal für die Antwort und die, die da folgen mögen.