Détecter un clic sur une entete de colonne d'une listicon ?

[olivier]

Bonjour vous tous

Ben je crois que tout est dans le titre....
J'utilise une callback pour l'instant, mais j'aimerais la virer car elle me sert uniquement à cela.

Merci d'avance

[Frenchy Pilou]

Désolé, cela n'a rien à voir
J'ai été sur
http://www.tib-net.com/ecligne/cours_ex ... trice.html
Quel est l'usage de la touche Ans
Merci d'avance et pardon pour le hors sujet

[AWEAR]

A partir du moment où tu y arrive par l'intermédiaire d'un callback, ca devrait-être la même chose sans....
-Le handle tu le récupère avec eventwindow() ou eventgadget()
-Le message avec Windowevent() ou waitwindowevent()
-Le wparam avec EventwParam()
-Le lparam avec Eventlparam()

Sinon Frenchy Pilou, la touche Ans, c'est tout simplement le dernier résultat calculé...

Exemple :
1+1=
Affiche 2
Ans - 1 =
Affiche 1 (ca correspond à 2 - 1)

[Dr. Dri]

@AWEAR
WaitWindowEvent ne restitue pas tous les messages...
Certains sont traduits en messages "PB" et d'autres sont filtrés...

Dri

[AWEAR]

Tout juste, je n'y avais pas pensé, mais ça vaut peut-être le coup d'essayer ?

[Dr. Dri]

Tout juste, je n'y avais pas pensé, mais ça vaut peut-être le coup d'essayer ?

Ca vaut toujours le coup ^^
Et si ca ne fonctionne pas on appelle au secours sur le forum

Dri

[olivier]

Merci à tous pour vos réponse.

@ Frenchy : Cela fait plaisir de voir des personnes aller sur mon site
Pour la touche Ans, tu as la réponse, mais ma calculatrice bug un peu....Si tu es interessé je peux te passer le code (C'est du flash !)

Pour notre affaire de clic sur colonne, j'avais bien sur essayé ce qui est proposé, mais sans résultat. Je post un petit code pour ceux qui aurait quelques minutes pour m'aider.

Code : Tout sélectionner

Procedure.l WinProc(hWnd,Msg,wParam,lParam)
   result = #PB_ProcessPureBasicEvents
   Select Msg
      Case #WM_NOTIFY
         Debug "call : clic colonne"
         
         *NMHDR.NMHDR = lParam
         
         If *NMHDR\hWndFrom = GadgetID(1)
            If *NMHDR\code = #LVN_COLUMNCLICK
               *NMLV.NMLISTVIEW = lParam
               column = *NMLV\iSubItem
               Debug "call: clic sur colonne : "+Str(column)
            EndIf
         EndIf
   EndSelect
   ProcedureReturn result 
EndProcedure

OpenWindow(0, 0, 0, 300, 300, "Test", #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_MinimizeGadget)
CreateGadgetList(WindowID( 0))
ListIconGadget(1,10,10,280,200,"col1",50)
For i=1 To 4
   AddGadgetColumn(1, i,Str(i),50)
Next

For i=1 To 4
   AddGadgetItem(1, i,Str(i))
Next

SetWindowCallback(@WinProc())
   
Repeat
   event = WaitWindowEvent()

   Select event
      Case #WM_NOTIFY
         Debug "pure : clic colonne"
         
      Case #PB_Event_Gadget
         Select EventGadget()
            Case 1
               Debug "pure :clic sur list"
               Debug EventlParam()
               Debug EventwParam()
               
              
         EndSelect
          
   EndSelect
   
Until event = #WM_CLOSE