Auch die Reihe anzeigen
Verfasst: 18.12.2018 15:58
Hallo,
folgendes Problem. Ich brauchte einen Abfrage für die Überschriften der Spalten meines ListIconGadgets, weil ich damit gearbeitet habe. Mit folgendem Code gings auch einwandfrei :
jetzt ist es aber so, dass in dieser LIste auch Einträge gemacht werden, welche ich löschen muss, daher muss ich nun auch die Reihe ermitteln.... nur wie geht das? Gedgetstate scheint mit diesem Code nicht mehr zu gehen....
folgendes Problem. Ich brauchte einen Abfrage für die Überschriften der Spalten meines ListIconGadgets, weil ich damit gearbeitet habe. Mit folgendem Code gings auch einwandfrei :
Code: Alles auswählen
Procedure wndproc(hwnd,msg,wParam,lParam)
Shared hlv
ret=#PB_ProcessPureBasicEvents
Select msg
Case #WM_NOTIFY
*pnmhdr.NMHDR=lParam
If *pnmhdr\code=#LVN_COLUMNCLICK ;column click
*pnmlistview.NMLISTVIEW=lParam
If *pnmlistview\hdr\hwndFrom=hlv ;comes from our listicon
Column=*pnmlistview\iSubItem
MessageRequester("",Str(Column),0)
EndIf
EndIf
EndSelect
ProcedureReturn ret
EndProcedure
hwnd=OpenWindow(0,100,100,300,150,"Column Click",#PB_Window_SystemMenu)
CreateGadgetList(hwnd)
hlv=ListIconGadget(1,10,10,250,100,"Column 0",80)
AddGadgetColumn(1,1,"Column 1",80)
AddGadgetColumn(1,2,"Column 2",80)
SetWindowCallback(@wndproc())
Repeat
Until WaitWindowEvent()=#PB_Event_CloseWindow