In der Windowsumgebung gibts in den GDI-Funktionen einfach die Funtion GetTextExtentPoint, die den aktuellen Font verwendet.
Auf der AS/400 muss ich das API QGYOLAFP bemühen um Informationen über den gewählten Font zu erhalten.
Dann kann ich an Hand der Metric-Einträge die Texthöhe und -länge ausrechnen.

Aber wie gesagt, wenn dann COR oder HPT zuschlägt, kann die ganze Berechnung für die Katz sein.

API:
http://publib.boulder.ibm.com/infoce...66%6f%6e%22%20