Detect ScrollBar event on ListIconGadget

[bbanelli]

Greetings to all,

what message is in charge for detecting any tampering (clicking or sliding scroll bar) on ListIconGadget? I tried #WM_HSCROLL but nothing is triggered in callback.

TIA!

[RSBasic]

Code: Select all

EnableExplicit

Define a
Global ListIconCB

Procedure ListIconCB(hWnd, uMsg, wParam, lParam)
  Select uMsg
    Case #WM_VSCROLL
      Debug "VScroll"
    Case #WM_HSCROLL
      Debug "HScroll"
  EndSelect
  ProcedureReturn CallWindowProc_(ListIconCB, hWnd, uMsg, wParam, lParam)
EndProcedure

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ListIconGadget(1, 0, 0, 500, 400, "Column", 1000, 0)
  
  For a=1 To 250
    AddGadgetItem(1, -1, "Item " + Str(a), 0, 0)
  Next
  
  ListIconCB = SetWindowLongPtr_(GadgetID(1), #GWL_WNDPROC, @ListIconCB())
  
  Repeat
    Select WaitWindowEvent()
      Case #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf

[bbanelli]

@RSBasic

Thank you very much!

Perhaps you could add that example somewhere here: http://www.rsbasic.de/winapi-library/ ?

After your keywords I've found exact solution that i need from srod: http://www.forums.purebasic.com/english ... cf#p435746

[falsam]

Thanks RSBasic ^^