WaitWindowEvent()
Posted: Wed Dec 01, 2004 3:43 am
				
				Hello,
Can anyone tell me if I am using this correctly
Thanks
Ken
			Can anyone tell me if I am using this correctly
Thanks
Ken
Code: Select all
;Capture mousedown and abort events
  CallFunction (0,"VCSetAlertAppDll",@iError,"Test","DrawLine",ALERT_APP_UTOOL_MOUSEDOWN)
    
;User tool prompt 
  CallFunction (1,"VCSetUserTool",2,"DrawLine","Enter lower left corner")
  CallFunction (1,"VCSetPrompt",1,"Enter lower right corner")
  
  
  Repeat 
    WaitWindowEvent() 
    Event = EventType()
  If Event = #PB_EventType_LeftClick
;Get 1st mouse down point  
  ;CallFunction (0,"VCGetUserToolLBDown",@iError,StartLine())
  MessageRequester("Test", "MouseClick1", 0)
  Else  
    Delay(1)  ; No event, let the others apps get some CPU time too ! 
  EndIf 
  Until ToolState  = 10