XbpListBox einzelne Einträge disablen

[__WEY]

hallo zusammen

ich möchte in einer Listbox einzelne Einträge nicht auswählbar machen. Ist dies überhaupt möglich? Finde nur Methoden für das Objekt XbpListBox() und kann die einzelnen Einträge wie nicht einzeln "ansprechen"

mfg

WEY

[Martin Altmann]

Moin,
das geht nicht. Du musst nach der Auswahl prüfen, ob der Eintrag hätte ausgewählt werden dürfen. Und falls ja, einfach normal weiterarbeiten.

Viele Grüße,
Martin

[Tom]

Oder die Listbox mit DelItem() und AddItem() fallweise bestücken, in Abhängigkeit davon, was gewählt werden dürfte.

[AUGE_OHR]

ich möchte in einer Listbox einzelne Einträge nicht auswählbar machen. Ist dies überhaupt möglich? Finde nur Methoden für das Objekt XbpListBox() und kann die einzelnen Einträge wie nicht einzeln "ansprechen"

in diesem Fall hilft Ownerdraw und ein Sample gibt es ja auch von Alaska ( das mit dem Office Menu )

Code: Alles auswählen

  PROTECTED:
    VAR    Images
    VAR    MarkedImages
    VAR    DisabledImages

sogar entsprechende Icons sind vorgesehen.

...ob es allerdings auch eine Methode gibt die das "beachtet" hab ich noch nicht ausprobiert.

[AUGE_OHR]

ich "denke" ... eigentlich suchst du eine ListView ... so z.B.

LW_Check.JPG (32.06 KiB) 3106 mal betrachtet

[AUGE_OHR]

hi,

ich habe mal XbpCheckbox, per FOR/NEXT, auf eine "grosse" XbpStatic gesetzt.

Code: Alles auswählen

   i:= 1
   FOR i := 1 TO iMax
      oXbp := XbpCheckbox():new( oStatic , , {10,i*30}, {170,26} )
      oXbp:caption := aWert[i,2]
      oXbp:autoSize  := .F.
      oXbp:selection := .F.
      oXbp:selected  := {| lCheck, uNIL, oSelf | IF( lCheck ,;
                             oSelf:SetColorFG(GRA_CLR_GREEN),;
                             oSelf:SetColorFG(GRA_CLR_BLACK) ) }
      oXbp:TabStop := .T.
      oXbp:create()
      oXbp:show()
      AADD(aSammel,oXbp)
   NEXT

nun kann ich die XbpStatic "scrollen" und auch ein :disable() wäre kein Problem.
man kann auch das ganze mit XbpStatic aufbauen, dann müsste man den :lbClick() Slot benutzen.