Font.size<=8 ---> ItemHeight bleibt 13
Font.size=11 ---> ItemHeight bleibt 16 (bei 6/5 wäre es 18) usw.
(Ich hoffe, ich habe mich nicht verrechnet.)
Doch, denn die Formel lautet
Zitat:
ItemHeight := Round(-Font.Height*6/5)
Du rechnest aber mit Font.
Size!
Außerdem ergibt 11*6/5 bei mir immer noch 13,2 und nicht 18.