how can i change the column description in ListIconGadgets (not during creation) ? What's wrong ? Always testet (and not working) variants:
Code: Select all
SetGadgetItemText(0,0,"column0",0)
;or
SetGadgetText(0,"column0")
Code: Select all
SetGadgetItemText(0,0,"column0",0)
;or
SetGadgetText(0,"column0")
Code: Select all
ListIconGadget(0, 20, 90,470,290,"TEXT",225,#PB_ListIcon_GridLines)
Code: Select all
SetGadgetText(0,"NEW TEXT")
Code: Select all
lvc.LV_COLUMN
lvc\mask = #LVCF_TEXT
lvc\pszText = @"NEW TEXT"
SendMessage_(GadgetID(#MyListIcon), #LVM_SETCOLUMN, ColumnIndex, @lvc)
Code: Select all
Enumeration
#MyWindow
#MyGadget
#ReturnCatch
EndEnumeration
hscol0.s = "Columnheader 0"
hscol1.s = "Columnheader 1"
If OpenWindow(#MyWindow,0,0,430,300,#PB_Window_ScreenCentered|#PB_Window_SystemMenu,"Header Text demo")
If CreateGadgetList(WindowID())
ListIconGadget(#MyGadget,10,10,410,230,hscol0,200,#PB_ListIcon_GridLines)
AddGadgetColumn(#MyGadget,1,hscol1,200)
AddGadgetItem(#MyGadget,-1,"Press Enter to Change Header"+Chr(10)+"and data of this part will be lost") ;Sets line height
AddKeyboardShortcut(#MyWindow,#PB_Shortcut_Return,#ReturnCatch)
Repeat
EventID = WaitWindowEvent()
Select EventID
Case #PB_Event_Menu
If EventMenuID() = #ReturnCatch
If hscol0 = "Columnheader 0"
hscol0.s = "Spaltenkopf 0"
hscol1.s = "Spaltenkopf 1"
Else
hscol0.s = "Columnheader 0"
hscol1.s = "Columnheader 1"
EndIf
RemoveGadgetColumn(#MyGadget,1)
RemoveGadgetColumn(#MyGadget,0)
AddGadgetColumn(#MyGadget,0,hscol0,200)
AddGadgetColumn(#MyGadget,1,hscol1,200)
EndIf
EndSelect
Until EventID = #PB_Event_CloseWindow And EventWindowID() = #MyWindow
EndIf
EndIf
Sorry, it's Windows API only.pickelrobert wrote:@gnozal
is this snippet code for linux available too ?