Page 2 sur 2

Re: ListIcon check unique et possibilité selection independa

Publié : jeu. 13/déc./2012 16:13
par falsam
Kwai chang caine a écrit :Y'a encore un "Beugounet"...Que je clique ou non le "OnlyOneCheck" et ben j'ai toujours qu'un seul cheque :D
Tsssss j'ai fait sauté un test !!!! Mon code est corrigé.

Re: ListIcon check unique et possibilité selection independa

Publié : jeu. 13/déc./2012 16:57
par Kwai chang caine
Aaaaahhh je reconnait bien la mon "FALSAMOUNET" :mrgreen:
Propre, précis, crosstrucform... 8)

Dis donc, ça en fait des evenements enchevétrés...
Je sais pas si tu t'es dit comme moi, au debut j'ai dit dans 2 mn c'est fini.....
Ca parait simple, mais y'a toujours un miasme :?

AND THE WINNER IS !!!

FALSAM !!!

Image

Merci beaucoup, peut etre même que je vais utiliser le tiens. 8)
J'aime pas les codes en plusieurs procedures comme le miens :?

Re: ListIcon check unique et possibilité selection independa

Publié : mar. 25/déc./2012 10:03
par MLD
Salut a vous

Je viens mettre mon grain de sel a votre discution (Un peu tard) :oops:
Mais en faisant le ménage dans ma bécane je suis tombé sur ceci (récupérer je ne
sais plus ou?)

Code : Tout sélectionner

ListIconGadget(#list,170,0,320,320,"stuff",315,#PB_ListIcon_CheckBoxes)
AddGadgetItem(#list,-1, "stuff 0")
AddGadgetItem(#list,-1, "stuff 1")
AddGadgetItem(#list,-1, "stuff 2")
AddGadgetItem(#list,-1, "stuff 3")
SetActiveGadget(#list)
SetGadgetState(#list,0)
Repeat
  ev = WaitWindowEvent()
  Select ev
    Case #PB_Event_Gadget
    
      If EventGadget() = #list And EventType() = #PB_EventType_Change
        GetCursorPos_(cp.POINT)
        MapWindowPoints_(0,GadgetID(#list),cp,1)
        With hti.LVHITTESTINFO
          \pt\x = cp\x
          \pt\y = cp\y
          \flags = #LVHT_ONITEM
        EndWith
        SendMessage_(GadgetID(#list),#LVM_HITTEST,0,hti)
       item = hti\iitem
        If GetGadgetItemState(#list,item) & #PB_ListIcon_Checked 
          Debug "item "+Str(item)+" checked"
        Else
          Debug "item "+Str(item)+" unchecked"
        EndIf
      EndIf
      
  EndSelect
Until ev = #PB_Event_CloseWindow

Re: ListIcon check unique et possibilité selection independa

Publié : mar. 25/déc./2012 10:31
par Backup

Re: ListIcon check unique et possibilité selection independa

Publié : mar. 25/déc./2012 11:52
par Kwai chang caine
Merci beaucoup MLD 8)

Certes, mais "vieux motard" que jamais :D
Celui la je l'avais pas trouvé, et pourtant j'ai cherché.
Du grand Netmaestro, quand je regarde ce code précisément, c'est la que je me dit que j'ai pas dépassé le niveau du sol de la prog. :oops: :(

Tu vois un tout petit code qui montre en quelques lignes toute la puissance d'un programmeur
MapWindowPoints_() jamais entendu parler ou alors pas compris
.LVHITTESTINFO pareil pour la structure
sans parler de l'utilisation des autres API...c'est beau 8O

Merci aussi à XXXXX pour le copyright, ça m'a évité de rechercher, car s'il y a une chose à laquelle j'essai de m'attacher, c'est toujours rendre à de gaulle ce qui appartient a de gaulle :mrgreen:
Ce savoir, cette générosité et parfois cette humilité mérite au minimum cette attention.

Encore merci à tous ceux qui m'ont aidé dans cette histoire 8)