I just find the CanvasGadget(), it's very nice ! Thank you to Fred and The Team, i'm begin my 100 program this week !!!
In CanvasGadget when you listing the #PB_EventType_MouseMove, the event stop when you push the Alt key down and up.
And the event restart when you push Alt key a second time.
Have a nice day.
Code: Select all
  If OpenWindow(0, 0, 0, 220, 220, "CanvasGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    CanvasGadget(0, 10, 10, 200, 200)
    
    Repeat
      event = WaitWindowEvent()
      
      If event = #PB_Event_Gadget And EventGadget() = 0 
        Select EventType()
          Case #PB_EventType_MouseMove; ;Or (EventType() = #PB_EventType_MouseMove And GetGadgetAttribute(0, #PB_Canvas_Buttons) & #PB_Canvas_LeftButton)
            Debug "MouseMove"
            
            
            
        EndSelect
        
      EndIf    
      
    Until event = #PB_Event_CloseWindow
  EndIf

