Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Xfrx drill down double click on link
Message
From
21/12/2008 11:30:33
 
 
To
19/12/2008 11:28:27
General information
Forum:
Visual FoxPro
Category:
Third party products
Miscellaneous
Thread ID:
01368687
Message ID:
01369022
Views:
8
Thanks Doug, I'll try it out.

>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
Reply
Map
View

Click here to load this message in the networking platform