http://www.purebasic.com
https://www.purebasic.fr/english/
Thanks, I think I found the problem (maybe...)QuimV wrote:This is the result in debug screen, with the word "test".
t
te
tes
test
tes
te
t
C
Is this the result with the latest test library (PureLVSORT 21972 bytes 27/04/2010 10:19) ?QuimV wrote:Output Debug:
t
te
tes
test
tes
te
t
C
Code: Select all
GetItemOk = SendMessage_(hHeader, #HDM_GETITEM, *pNMHdr\iItem, @hHDItem)
If GetItemOk
FilterText = PeekS(TFilter\pszText, TFilter\cchTextMax)
Else
FilterText = ""
EndIfQuimV wrote:Yes, this is the result with the latest test library (PureLVSORT 21972 bytes 27/04/2010 10:19)
Sure, no problem.QuimV wrote:Could you send me, by PM, source files (no libraries) that i could debug directly on W7 and then I report you back?
You have my honored word and my total discretion about to destroy the files after the problem is solved.
According to MSDN, HDM_GETITEM returns 0 if failed.QuimV wrote:The problem is located in the function:
GetItemOk = SendMessage_(hHeader, #HDM_GETITEM, *pNMHdr\iItem, @hHDItem)
In Windows XP-SP3:
When len(userfiltertext)>0 the function returns 1 (GetItemOk = 1)
When len(userfiltertext)=0 the function returns 0 (GetItemOk = 0)
In Windows W7-x32:
When len(userfiltertext)>0 the function returns 1 (GetItemOk = 1)
When len(userfiltertext)=0 the function returns 1 (GetItemOk = 1)
Code: Select all
#CONTIS = 1
#LI0 = 2
#BTN = 3
; This code uses SetGadgetItemData to store the user data
; of each item to later know it, even if the items index changed.
;
If OpenWindow(0, 0, 0, 280, 350, "SetGadgetItemData", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ButtonGadget(#BTN, 190, 10, 80, 20, "Test")
ContainerGadget(#CONTIS, 0, 100, 280, 350, #PB_Container_Raised)
;- ListIcon de Usuarios
ListIconGadget(#LI0, 0, 0, 280, 250, "Name", 150,#PB_ListIcon_CheckBoxes|#PB_ListIcon_GridLines|#PB_ListIcon_FullRowSelect|#PB_ListIcon_AlwaysShowSelection)
CloseGadgetList()
;****** Comment and Uncomment the next two lines in order to show the effect ****
If PureLVSORT_SelectGadgetToSort(#LI0, #PureLVSORT_ShowClickedHeader_IconLeft) = #PureLVSORT_Ok
EndIf
;********************************************************************************
;-- Add row
AddGadgetItem(#LI0, CountGadgetItems(#LI0),"1")
SetGadgetItemData(#LI0,CountGadgetItems(#LI0)-1,100)
;-- Add row
AddGadgetItem(#LI0, CountGadgetItems(#LI0),"2")
SetGadgetItemData(#LI0,CountGadgetItems(#LI0)-1,200)
;-- Add row
AddGadgetItem(#LI0, CountGadgetItems(#LI0),"3")
SetGadgetItemData(#LI0,CountGadgetItems(#LI0)-1,300)
;-- Add row
AddGadgetItem(#LI0, CountGadgetItems(#LI0),"4")
SetGadgetItemData(#LI0,CountGadgetItems(#LI0)-1,400)
;-- Add row
AddGadgetItem(#LI0, CountGadgetItems(#LI0),"5")
SetGadgetItemData(#LI0,CountGadgetItems(#LI0)-1,500)
;-- Add row
AddGadgetItem(#LI0, CountGadgetItems(#LI0),"6")
SetGadgetItemData(#LI0,CountGadgetItems(#LI0)-1,600)
Repeat
Event = WaitWindowEvent()
If Event = #PB_Event_Gadget
If EventGadget() = #BTN
Debug GetGadgetItemData(#LI0, GetGadgetState(#LI0))
EndIf
EndIf
Until Event = #PB_Event_CloseWindow
EndIf
Yes, and it's documented in the help file.QuimV wrote:SetGadgetItemData and GetGadgetItemData doesn't run properly in the LisIcon when I use it with PureLVSORT library (PureLVSORT_SelectGadgetToSort).