|  | Unser Angebot für Sie! Lesen Sie diesen Beitrag und 500 andere sofort im Onlinearchiv, und erhalten Sie alle zwei Monate brandheißes Access-Know-how auf 72 gedruckten Seiten! Plus attraktive Präsente, zum Beispiel das bald erscheinende Buch 'Access 2010 - Das Grundlagenbuch für Entwickler'! |
| |
Zusammenfassung
Verwenden Sie die Funktion GetTextSize, um die Abmessungen von Texten zu ermitteln.
Techniken
VBA
Voraussetzungen
Access 2000 und höher
Beispieldateien
Platzbedarf.zip
Shortlink
562
Platzbedarf für Texte ermitteln
André Minhorst, Duisburg
Gelegentlich möchte man Steuerelemente in Formularen und Berichten an den tatsächlich von ihnen benötigten Platz anpassen. Access liefert keine offizielle Funktion, um für einen gegebenen Text mit einer bestimmten Schriftgröße und -breite den Platzbedarf in Höhe und Breite zu liefern. Grund genug, auf eine nicht dokumentierte Funktion zuzugreifen und diese entsprechend zu wrappen ...
Die versteckte Wizhook-Klasse liefert immer wieder nützliche Funktionen (siehe auch Shortlink 358). Gleichwohl sind diese Funktionen mit Vorsicht zu genießen, denn diese Klasse mit ihren Elementen ist nicht dokumentiert und könnte in zukünftigen Versionen von Access einfach verschwinden. Doch wie das Beispiel der MsgBox-Funktion beim Wechsel von Access 97 zu Access 2000 zeigt, haben auch dokumentierte VBA-Funktionen nicht unbedingt den Anspruch, für alle Ewigkeiten gleich zu arbeiten.
Also ran an die nützlichen Diener der Wizhook-Klasse, in diesem Fall die Funktion TwipsFromFont. Diese wird von der Funktion GetTextSize gekapselt, sodass die Eingabe der Parameter und das Auswerten des Ergebnisses etwas leichter als mit dem Original fällt - außerdem berücksichtigt diese Funktion auch Zeilenumbrüche (s. Listing 1).
|