Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to add DblClick in a grid programatically
Message
De
01/08/2008 14:55:49
Raza Malik
Universal Accounting Software
Edgewater, New Jersey, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Titre:
How to add DblClick in a grid programatically
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01335920
Message ID:
01335920
Vues:
60
Dear Experts...

Listed below is a sample code which creates a browse form on demand with a grid, Ok and Cancel button . Depending on parameters different column can have different control source when this function is called from different forms. I am having difficulty adding a Dbl Click event to the Textbox of a Column and then adding the following code: ThisForm.cmdOk.Click() to that event. Can someone tell me what and where to add the code. I will appreciate

Here is the code:


FUNCTION ShowBrowserForm(tcAlias, tcHeadings, tnWidth, tnHeight)
LOCAL loForm AS Form, loGrid AS Grid, lnRtnValue
loForm = CREATEOBJECT("aBrowseForm")
lnRtnValue = 0

WITH loForm
loGrid = .grdList
loGrid.RecordSource = tcAlias
.cAlias = tcAlias
IF TYPE("tcHeadings") = 'C'
.SetHeadings(tcHeadings)
ENDIF
IF TYPE("tnWidth") = 'N' AND tnWidth > 0
.SetWidth(tnWidth)
ENDIF
IF TYPE("tnHeight") = 'N' AND tnHeight > 0
.SetHeight(tnHeight)
ENDIF
.AutoCenter = .T.
.Show()
ENDWITH
RELEASE loForm

lnRtnValue = _Screen.nRTN_Value1
RETURN lnRtnValue

Thank you very much.

Raza Malik
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform