Clear columns from list icon gadget?

Just starting out? Need help? Post your questions and find answers here.
User avatar
doctorized
Addict
Addict
Posts: 856
Joined: Fri Mar 27, 2009 9:41 am
Location: Athens, Greece

Clear columns from list icon gadget?

Post by doctorized »

Is there a way to delete all rows including columns and headers from a list icon gadget?
RASHAD
PureBasic Expert
PureBasic Expert
Posts: 4664
Joined: Sun Apr 12, 2009 6:27 am

Re: Clear columns from list icon gadget?

Post by RASHAD »

Hi

Code: Select all

Procedure DeleteColumn(Gadget,columnindex)
  SendMessage_(GadgetID(gadget),#LVM_DELETECOLUMN,columnindex,0)
EndProcedure

If OpenWindow(0, 0, 0, 600, 400, "ListIcon Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ListIconGadget(0, 5, 5, 590, 360, "Name", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
  AddGadgetColumn(0, 1, "Address", 250)
  AddGadgetColumn(0, 2, "Titles", 250)
  AddGadgetItem(0, -1, "Harry Rannit"+Chr(10)+"12 Parliament Way, Battle Street, By the Bay"+Chr(10)+"Test")
  AddGadgetItem(0, -1, "Ginger Brokeit"+Chr(10)+"130 PureBasic Road, BigTown, CodeCity"+Chr(10)+"Test")
  ButtonGadget(1,10,370,60,20,"TEST")
 
Repeat
  Select WaitWindowEvent()
    Case  #PB_Event_CloseWindow
      Quit = 1
     
    Case #PB_Event_Gadget
      Select EventGadget()
        Case 1
            DeleteColumn(0,1)
      EndSelect
  EndSelect
Until Quit = 1
EndIf
Egypt my love
User avatar
mk-soft
Always Here
Always Here
Posts: 5409
Joined: Fri May 12, 2006 6:51 pm
Location: Germany

Re: Clear columns from list icon gadget?

Post by mk-soft »

RemoveGadgetColumn :wink:

Code: Select all

If OpenWindow(0, 0, 0, 600, 400, "ListIcon Example", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ListIconGadget(0, 5, 5, 590, 360, "Name", 100, #PB_ListIcon_FullRowSelect | #PB_ListIcon_AlwaysShowSelection)
  AddGadgetColumn(0, 1, "Address", 250)
  AddGadgetColumn(0, 2, "Titles", 250)
  AddGadgetItem(0, -1, "Harry Rannit"+Chr(10)+"12 Parliament Way, Battle Street, By the Bay"+Chr(10)+"Test")
  AddGadgetItem(0, -1, "Ginger Brokeit"+Chr(10)+"130 PureBasic Road, BigTown, CodeCity"+Chr(10)+"Test")
  ButtonGadget(1,10,370,60,20,"TEST")
  
  Repeat
    Select WaitWindowEvent()
      Case  #PB_Event_CloseWindow
        Quit = 1
        
      Case #PB_Event_Gadget
        Select EventGadget()
          Case 1
            RemoveGadgetColumn(0,#PB_All)
        EndSelect
    EndSelect
  Until Quit = 1
EndIf
My Projects ThreadToGUI / OOP-BaseClass / EventDesigner V3
PB v3.30 / v5.75 - OS Mac Mini OSX 10.xx - VM Window Pro / Linux Ubuntu
Downloads on my Webspace / OneDrive
User avatar
doctorized
Addict
Addict
Posts: 856
Joined: Fri Mar 27, 2009 9:41 am
Location: Athens, Greece

Re: Clear columns from list icon gadget?

Post by doctorized »

Thank you both very much!! mk-soft I looked for a command starting with "clear", I looked for "delete", I didn't check for "remove". I will have RASHAD's code just in case...
Post Reply