Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Xfrx drill down double click on link
Message
De
19/12/2008 11:28:27
 
 
À
18/12/2008 16:49:11
Jack Liebschutz
Black Mountain Software
Polson, Montana, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Produits tierce partie
Divers
Thread ID:
01368687
Message ID:
01368863
Vues:
7
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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform