Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to add DblClick in a grid programatically
Message
 
 
À
01/08/2008 14:55:49
Raza Malik
Universal Accounting Software
Edgewater, New Jersey, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Versions des environnements
Visual FoxPro:
VFP 9 SP2
Divers
Thread ID:
01335920
Message ID:
01335926
Vues:
22
See if this Re: How to doubleclick a record in a grid to activate a form Thread #1334808 Message #1335742 can be a solution for you.

Check the whole thread for the alternative solution.

>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
If it's not broken, fix it until it is.


My Blog
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform