Seite 1 von 1

Wie aendere ich den Column HeaderNamen eines ListIconGadgets

Verfasst: 23.10.2005 05:14
von guruk
Wie aendere ich den Text einer Column in einem ListIconGadget... ohne diese Columns mit Remove zu loeschen und mit Add neu zuerstellen?

Danke fuer eure Tips schon im Vorraus

chris

Verfasst: 23.10.2005 11:18
von Eckhard
Hi guruk,

hier mal ein Beispiel aus dem Code-Archiv!

Code: Alles auswählen

; English forum: http://purebasic.myforums.net/viewtopic.php?t=8741&highlight=
; Author: Karbon
; Date: 15. December 2003

Structure LVCOLUMN 
  mask.l 
  fmt.l 
  cx.l 
  pszText.s 
  cchTextMax.l 
  iSubItem.l 
  iImage.l 
  iOrder.l 
EndStructure 


Procedure SetListIconColumnText(Gadget,index,HeaderText.s) 
  
  lvc.LVCOLUMN 
  lvc\mask    = #LVCF_TEXT 
  lvc\pszText = HeaderText 
  SendMessage_(GadgetID(Gadget),#LVM_SETCOLUMN,index,@lvc) 

EndProcedure 


Procedure.s GetListIconColumnText(Gadget,index) 
  
  lvc.LVCOLUMN 
  lvc\mask = #LVCF_TEXT 
  lvc\pszText = Space(255) 
  lvc\cchTextMax = 255 

  SendMessage_(GadgetID(Gadget),#LVM_GETCOLUMN,index,@lvc) 
  
  ProcedureReturn PeekS(lvc\pszText) 
  
EndProcedure 
Gruss
Eckhard!