Um die ganze Spaltenleiste zu entfernen, einfach mit: #LVS_NOCOLUMNHEADER
Beispielcode:
Code: Alles auswählen
If OpenWindow(0, 0, 0, 500, 250, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListIconGadget(1, 10, 10, 480, 230, "", 100, #LVS_NOCOLUMNHEADER)
For a=1 To 100
AddGadgetItem(1, -1, "Item " + Str(a))
Next
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Wenn du die "letzte" Spalte nicht anzeigen lassen möchtest, kannst du die Breite der ersten Spalte auf volle Breite setzen. Entweder manuell oder automatisch mit:
Code: Alles auswählen
SendMessage_(GadgetID(1), #LVM_SETCOLUMNWIDTH, 0, #LVSCW_AUTOSIZE_USEHEADER)
Beispielcode:
Code: Alles auswählen
If OpenWindow(0, 0, 0, 500, 250, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ListIconGadget(1, 10, 10, 480, 230, "Überschrift", 0, 0)
For a=1 To 100
AddGadgetItem(1, -1, "Item " + Str(a))
Next
SendMessage_(GadgetID(1), #LVM_SETCOLUMNWIDTH, 0, #LVSCW_AUTOSIZE_USEHEADER)
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf