OleContainer mit Word zeigt die vertikale ScroollBar nicht vollständig

[Markus Sendelbach]

Nach dem Laden eines Word-Dokumentes in den OleContainer wird die vertikale ScrollBar durch die Symbolleisten (Top/Bottom) der Word-Applikation überdeckt. Wie kann ich rausfinden, welche Höhe die Word-Symbolleisten einnehmen, um den benötigten vertikalen Platz für den OleContainer zu schaffen?
Gibt es vielleicht auch eine andere Möglichkeit?

TopSpace := 50; // Höhe der Word-
Symbolleisten (Top)
BottomSpace := 30; // Höhe der Word-
Symbolleisten (Bottom)
Ole.Top := 0;
Ole.Height := ClientHeight;
Ole.CreateObjectFromFile(FileName, false);
Ole.DoVerb(ovShow);
Ole.Top := TopSpace;
Ole.Height := ClientHeight - TopSpace - BottomSpace;