Erzeugt wird die Trackbar wie jedes andere Fenster mit der Funktion "CreateWindowEx", wobei die Fensterklasse msctls_trackbar32 heißt (oder alternativ TRACKBAR_CLASS):
hredTB := CreateWindowEx(0, 'msctls_trackbar32', '', WS_VISIBLE or WS_CHILD or WS_TABSTOP or TBS_TOP or TBS_AUTOTICKS or TBS_TOOLTIPS, 10, 15, 275, 35, hWnd, 0, hInstance, nil)
Wenn Sie den Befehl "InitCommonControlsEx" verwenden, müssen Sie für die dwICC-Membervariable die Klasse ICC_BAR_CLASSES benutzen.
Ich stelle hier gleich noch die Fensterstile vor, die ich auch in meinem Programm verwendet habe. Weitere lassen sich im MSDN oder im PSDK nachschlagen:
| Wert | Beschreibung |
|---|---|
| TBS_TOP | Die Teilstriche werden oberhalb angezeigt. |
| TBS_BOTH | Die Teilstriche werden oberhalb und unterhalb angezeigt. |
| TBS_AUTOPTICKS | Der Abstand der Teilstriche wird automatisch gesetzt. Der Abstand kann mit der Nachricht "TBM_SETTICFREQ" bestimmt werden. |
| TBS_TOOLTIPS | Beim Bewegen des Sliders wird der aktuelle Wert als Tooltipp angezeigt. |