StringGrid: Breite der vertikalen Scrollbar ermitteln

[Helmi]

Hallo,

gibt es die Möglichkeit die Breite der vertikalen Scrollbar eines StringGrid zu ermitteln?

Ich hatte gehofft, dass sich ClientWidth dadurch ändert, aber leider bleibt der Wert mit/ohne Scrollbar gleich

Was will ich eigentlich tun?
(für manche eine schwierige Frage)

Wenn die vertikale Scrollbar sichtbar ist, dann möchte ich die Breiten der Spalten des StringGrids reduzieren.

Ob eine Scrollbar sichtbar ist, mach ich mit diesem Code:

Delphi-Quellcode:

if (GetWindowlong(Stringgrid1.Handle, GWL_STYLE) and WS_VSCROLL) <> 0 then
   ShowMessage('Vertical scrollbar is visible!');

if (GetWindowlong(Stringgrid1.Handle, GWL_STYLE) and WS_HSCROLL) <> 0 then
   ShowMessage('Horizontal scrollbar is visible!');

(gefunden bei den Schweizern)