ListIconGadget largeur colonne non modifiable

[fd]

Bonjour,

Suite à ma question précédente et à l'impossibilité de retrouver la colonne du listicongadget. Je fais un calcul sur la position de la souris pur savoir dans quelle colonne je clique. Existe-il un moyen d'empecher l'utilisateur de modifier la largeur de la colonne lorsqu'il joue avec l'entête ? Un flag à ajouter ?

Merci

[nn a512]

Code : Tout sélectionner

#MainWindow             = 0 
#ListIconGadget1        = 1 

Procedure WindowCallBack(Window, Message, wParam, lParam) 
  Result = #PB_ProcessPureBasicEvents 
  Select Message 
    Case #WM_NOTIFY
      *NotifyMsgInfos.NMHEADER = lParam 
        If *NotifyMsgInfos\hdr\code = #HDN_ITEMCHANGING
          Result = 1
        EndIf
  EndSelect
  ProcedureReturn Result
EndProcedure

If OpenWindow(#MainWindow, 0, 0, 300, 300, "", #PB_Window_ScreenCentered | #PB_Window_SystemMenu) 
  CreateGadgetList(WindowID(0))
  ListIconGadget(#ListIconGadget1,1,1,299,299,"Colonne 1", 298/4.0 ,#PB_ListIcon_FullRowSelect)
    AddGadgetColumn(#ListIconGadget1, 1, "Colonne 2", 295/4.0)
    AddGadgetColumn(#ListIconGadget1, 2, "Colonne 3", 296/4.0)
    AddGadgetColumn(#ListIconGadget1, 3, "Colonne 4", 296/4.0)
  For I = 1 To 10
     AddGadgetItem(#ListIconGadget1, -1, "111"+Chr(10)+ "222"+Chr(10)+"333"+Chr(10)+ "444") 
  Next
  SetWindowCallback(@WindowCallBack()) 
EndIf

Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow

[Anonyme]

Bienvenu(e).

[Sami]

Est-il possible de faire la même chose sous Linux ou MacOs? Car la fonction Set WindowCallBack c'est pas portable!
Merci de vos réponses.