Gambas: Scrollbar

Zurück zum Gambas-Inhaltsverzeichnis.

ScrollBar (Schieberegler)

Mit dem Schieberegler kann man sehr schön kontinuierliche Zahlenwerte eingeben und ausgeben.

Den Schieberegler muss man sich aus der QT Werkzeugkiste holen, da er nicht in der normalen Gambas Werkzeugkiste zu finden ist.

Dazu lädt man die gb.qt.ext-Komponente. Dies kann man über den Menüpunkt Projekt -> Eigenschaften des Gambas-Projektfensters erreichen. In der Komponentenanzeige wählt man die Komponente gb.qt.ext zusätzlich aus.

In der Werkzeugbox erscheint dann eine Schaltfläche mit der Bezeichnung QT. Diese klickt man an und hat dann eine Reihe weiterer Steuerelemente darunter den ScrollBar zur Verfügung.

Beispielprogramm

Das Beispielprogramm ist sehr einfach. Man braucht den Schieberegler und eine TextBox auf der Form.

Betätigt man den Schieberegler wie gewohnt mit der Maus, dann wird ein numerischer Wert zwischen 0 und 99 in der Textbox angezeigt. Verändert sich die Scrollbar (Change-Ereignis), dann wird der Scrollbarwert (Value) an die Textbox übergeben.

Hinter dem Schieberegler steht folgender Code:

PUBLIC SUB ScrollBar1_Change()
  TextBox1.Text = ScrollBar1.Value 
END