Hi Doug, Brett again. Got it all working.
Add the following line of code to the Drawgauges method in the Dashboard form immediately before the NEXT lnI that closes out the FOR ENDFOR loop.
BINDEVENT(THIS.&lcname, "Click", THIS, "m_click_gauges")
Then create a new method in the form called "m_click_gauges" with the following code. When you run the form and click on one of the gauges you will be able to pick up the click and the clicked gauge name will be displayed.
AEVENTS(laevents, 0)
IF PEMSTATUS(laevents[1,1],[Name],5)
obj_name=laevents[1,1].NAME
=MESSAGEBOX(EVALUATE("thisform."+obj_name+".NAME"))
ENDIF
↧