ListIconGadget gibt keine Nummer zurück

[Velindos]

Hallo Thomas,
danke für dein Bemühen, funkt! Ein Event für die Sache, wäre was für die Zukunft.
Gruss ... Velindos

[Velindos]

Hallo,
die Sache funktioniert ja recht und schlecht!

SetGadgetItemData(#ListIcon_0, CountGadgetItems(#ListIcon_0) - 1, q)

mit diesem aufruf!
Nur wenn man am Listicon nicht gezielt auf die Spalte drückt, dann gibt das Listicon "0" zurück.

Code: Alles auswählen

Enumeration
  #ListIcon_0
EndEnumeration
If OpenWindow(0, 1024, 115, 457, 479, "ListIconAuswahl ( 0 )",  #PB_Window_SystemMenu | #PB_Window_SizeGadget | #PB_Window_TitleBar )
    ListIconGadget(#ListIcon_0, 10, 10, 250, 200, "ListIcon0", 80, #PB_ListIcon_GridLines)
    AddGadgetColumn(#ListIcon_0, 1, "Column 0"+Str(index), 80)
  AddGadgetColumn(#ListIcon_0, 2, "Column 1"+Str(index), 80)
    For a= 1 To 12
    AddGadgetItem(#ListIcon_0, -1, "Line "+Str(a)+Chr(10)+"Level "+Str(a)+Chr(10)+"Point "+Str(a))
    SetGadgetItemData(#ListIcon_0, CountGadgetItems(#ListIcon_0) - 1, a)
  Next a
  EndIf
Repeat
  Event = WaitWindowEvent()
    Select GadgetID
          Case #ListIcon_0
      Select EventType()
        Case #PB_EventType_LeftClick  
                    Anzeige= GetGadgetItemData(#ListIcon_0, GetGadgetState(#ListIcon_0))
          ;Anzeige= GetGadgetItemData(#ListIcon_0,Liste)
          Debug Anzeige
                EndSelect
  EndSelect    
Until Event = #PB_Event_CloseWindow

Diese Null möchte ich abfangen oder ausblenden. Dh. nur wenn eine Zeile gedrückt wurde möchte ich auslösen. Kann mir jemanden da helfen?

Gruss ... Velindos

[hjbremer]

wie wäre es mit einem funktionierendem Beispiel ?

warum fehlt #PB_ListIcon_FullRowSelect ?

[Velindos]

Hallo,
habs gerade eingebaut und ist eine Lösung, DANKE!
Wie aber kann ich das ListIcon steuern das es nur die Erste Spalte akzeptiert beim Mouseclick. Sprich bei den anderen Spalten reagiert es nicht?
Gruss ... Velindos

[hjbremer]

dafür hast du doch LvMausclick bekommen

LvMausclick(GadgetID(lv), p.Point)
Debug "Col ab null: " + Str(p\x)
Debug "row ab null: " + Str(p\y)

if p\x = 0
tue nix
else
tue irgendwas
endif

[Velindos]

Hallo,
ihr habt ja recht!!! Dachte wohl an ein kürzel was die Auswahl auf eine Spalte begrenzt, damit nicht immer bei unvorsichtiger Benutzung das Ding bereits beim scrollen und unvorsichtigen checken auslöst. Werde mal mit der Lösung leben!
Danke, für eure Tips, das ist eine echte Hilfe!
Gruss ... Velindos