Einzelnen Beitrag anzeigen

Delphi-Laie

Registriert seit: 25. Nov 2005
1.474 Beiträge
 
Delphi 10.1 Berlin Starter
 
#1

Scrollbar / Scrollbars v. TStringGrid / StringGrid sichtbar?

  Alt 4. Jan 2010, 21:16
Hallo Delphifreunde!

Über einen Tag suchte ich im Internet, wie man obiges feststellt. Ich fand auf keiner (!) deutschsprachigen Seite eine befriedigende Lösung dafür. Die Bastellösungen dazu erwiesen sich letztlich alle als untauglich. Das Problem ist wohl, daß das Zu-/Abschalten der Scrollbars leider nicht als Ereignisse oder wenigstens zur Laufzeit (und damit nicht im Objektinspektor voreinstellbare) abrufbare Eigenschaften verfügbar ist.

Kurzum, die Lösung, die das wirklich zu bieten bzw. umzusetzen scheint (meine ersten diesbezüglichen Erfahrungen sind positiv, deshalb hier die Veröffentlichung), findet sich hier:
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!');
  Mit Zitat antworten Zitat