@G-Rom - Avec ou sans le debug ça ne fonctionne pas.
Je ne vois tout de même pas pourquoi ça ne fonctionnerai pas ainsi.
Voilà la boucle "complète" avec le minimum de contenu.
Je viens d'essayer en vérifiant les event en debut de boucle mais ça ne marche toujours pas !
Code : Tout sélectionner
; --------------------------------------------------------------------------------------------
; ----------- BOUCLE ------------ PRINCIPALE
; --------------------------------------------------------------------------------------------
Repeat
EvWIN = WaitWindowEvent()
EvGAD = EventGadget()
EvTYPE = EventType()
EvMENU = EventMenu()
 
  Select EvWIN
    ; ///////////////////
    
; --------------------------------------------------------------------------------------------
; ----------- EVENT ------------ MENU (raccourcis clavier)
; --------------------------------------------------------------------------------------------
      Case #PB_Event_Menu
            Select EvMenu
                  Case #TOUCHE_ESC
                        Quite = 1
            EndSelect
; --------------------------------------------------------------------------------------------
; ----------- EVENT ------------  GADGETS
; --------------------------------------------------------------------------------------------
       Case #PB_Event_Gadget
            Select EvGAD
                  Case #ROOT
  
                  Case #EXP
                  If EvTYPE =  #PB_EventType_LeftDoubleClick
                   
DEBUG "DOUBLE CLICK ?! " + str(EvTYPE)
                   
           
             EndIf  
            
            EndSelect
    ; ////////////////////////
EndSelect  
Until Quite = 1
Au niveau de la syntaxe je ne vois rien qui cloche.
P.S : perdre du (beaucoup de) temps pour ce genre de chose me gonfle à un point !
 
			
			
													
					Dernière modification par 
Ar-S le sam. 15/juin/2013 13:49, modifié 1 fois.