Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Xfrx drill down double click on link
Message
From
19/12/2008 11:28:27
 
 
To
18/12/2008 16:49:11
General information
Forum:
Visual FoxPro
Category:
Third party products
Miscellaneous
Thread ID:
01368687
Message ID:
01368863
Views:
8
Hi Jack.

(Would you be arrested if you said that in an airport?)

>In the xfrx drill down example double click on a link runs the link twice. Anyone have any idea on how to get it to run just once?

I've submitted this to Martin but also made the change myself. In XFRX.PRG, find _xf_handleMessage and add the indicated code:
CASE msg=273 &&mouse click
  lcVariableName = "__xf_g_ch"+ALLTRIM(STR(lParam))
  IF "O" = TYPE(lcVariableName)
*** DH 07/12/2007: ignore a click if we haven't returned from the previous one
    loObject = evaluate(lcVariableName)
    if not pemstatus(loObject, 'lInClick', 5) or not loObject.lInClick
      if not pemstatus(loObject, 'lInClick', 5)
        addproperty(loObject, 'lInClick')
      endif not pemstatus(loObject, 'lInClick', 5)
      loObject.lInClick = .T.
*** DH 07/12/2007: end of new code
      &lcVariableName->m_click(0)
*** DH 07/12/2007: rest of the new code
      loObject.lInClick = .F.
    endif not pemstatus(loObject, 'lInClick', 5) ...
*** DH 07/12/2007: end of new code
  ENDIF
Doug
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform