PureBasic Forums - English

Posted: **Fri May 03, 2002 7:06 pm**

Restored from previous forum. Originally posted by urland.

The EventMouseButton() function is not returning a value in my program.

Code: Select all

   flag = 1

   While flag
      event = WaitWindowEvent()
      Select event
         Case #PB_EventCloseWindow
            flag = 0
         Case #PB_EventRepaint
            Draw_Calendar(0,0,0,0)
         Default
            ;*Do nothing
      EndSelect
      mb = EventMouseButton()
      If mb = 1
         ;
      EndIf
   Wend

mb is always zero, including when any buttons are pressed.