Windows System Font einstellen

[CCRDude]

Veto - da TApplication seine Fonts im Konstruktor auch so füllt, könnte ein direktes Ändern per API wie in Deinem Link zu später schwer nachvollziehbaren Problemem führen - etwa wenn anderer eigener Code oder Third-Party-Komponenten auf der VCL basieren.

Mindestens ein WM_WININICHANGE sollte dann noch ausgeführt werden, damit TApplication Screen per per Screen.GetMetricSettings wieder korrekt setzt.