Font für Tbutton lässt sich nicht per Software ändern

[malabarista]

Ich möchte bei einigen TButtons nachträglich, d.h. zur Laufzeit, per Software die Schriftgrösse ändern (Display-abhängig).

Code: Alles auswählen

 
buttonfont:=tfont.create;
buttonfont.name:='Verdana';
buttonfont.size:=16
...
Button1.font:=buttonfont;
 

Aber da ändert sich gar nichts.
Obwohl ich folgende Eigenschaften für Button1 im Objektinspektor geändert habe:

Code: Alles auswählen

 
Autosize:=false;
Parentfont:=false;
 

Welche Eigenschaften muss ich noch ändern ?

[KenntKeinSchwein AG]

Statt ein extra typ zu erzeugen kannst auch das bereits verwendete TFont benutzen.

Code: Alles auswählen

Button1.Font.Name := 'Verdana';
Button1.Font.Size := 16;

[malabarista]

Danke.
Da war noch ein Programmfehler drin....

Jetzt funktioniert alles.