TListbox -> Scrollbar visible?

[Jens Schumann]

Hallo,

Zitat von APP:

Hallo Jens,

Zitat von Jens Schumann:

Ich wollte nicht wissen, wie man den Scrollbar unterdrückt, sondern ob er sichtbar ist?

das war mir schon klar, aber ich dachte Du siehst im Code wie Du es benutzen kannst:

Delphi-Quellcode:

VAR
  Style                            : Integer;
BEGIN
  Style := GetWindowLong(Listbox1.Handle, GWL_STYLE);
  IF (Style AND WS_VSCROLL) <> 0 THEN
    ShowMessage('Scrollbar ist sichtbar')
  ELSE
    ShowMessage('Scrollbar ist unsichtbar');

oh - das habe ich so gar nicht bemerkt. Ich dachte mit dem Code legt man grundsätzlich fest, ob der Scrollbar sichtbar sein soll oder nicht.

Danke

[edit]Oh - man. Ich habe gerade in meinen Datensicherunge gesucht und genau Deinen Codevorschlag darin gefunden. Dateidatum ist vom 02.06.2001. Da bin ich wieder auf mein altes Problem gestoßen.
Ich habe mittlerweile so viel programmiert und in meinen Datensicherungen, dass ich machmal gar
nicht mehr weiss, dass ich ein Problem schon einmal gelöst hatte.[/edit]