Seite 1 von 1

Treeview + ScrollBar

Verfasst: 19.04.2018 20:58
von lite
Hallo

Wie kann ich per Befehl Scrollbar und Treeview wieder auf Pos auf 0 Stellen ?
Der Beispielcode stellt nur die Laufleiste auf Position 0.
Möchte das das Treeview auch auf Position 0 zurück gestellt wird, nachdem der User nach unten gescrollt hat.
Gibt es dafür eine Api ?

Code: Alles auswählen

Define a

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  TreeGadget(1, 0, 0, WindowWidth(0), WindowHeight(0)-40, 0)
  For a=1 To 100
    AddGadgetItem(1, -1, "Item " + Str(a), 0, 0)
  Next
  ButtonGadget(2, WindowWidth(0)-160, WindowHeight(0)-30, 150, 20, "Scrollposition auf 0", 0)
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_Gadget
        Select EventGadget()
          Case 2
                       
            SetScrollPos_(GadgetID(1), #SB_VERT,0,1)
       EndSelect
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf

Grüße

Lite

Re: Treeview + ScrollBar

Verfasst: 19.04.2018 21:16
von ccode_new
Hallo lite,

das hier sollte funktionieren:

Code-Ausschnitt!

Code: Alles auswählen

Case 2
            SetGadgetState(1, 0) ;Sollte funktionieren!
            SetScrollPos_(GadgetID(1), #SB_VERT,0,1)
            SetGadgetState(1, -1)

Re: Treeview + ScrollBar

Verfasst: 20.04.2018 06:24
von lite
Vielen Dank, genau das wars. :D :)

Lite