Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
DblClick event in a Grid
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00247422
Message ID:
00247539
Vues:
30
*--
* This program make the DblClick event of a Grid Object
* respond to the DblClick of each Texbox in the grid.
*
* To use: Select the grid in the Foxpro Form Designer,
* and the run this program.
*--
Local lacl(1), lccr, logrd, lcmeth

lccr=chr(13)+chr(10)

If Aselobj(lacl) > 0
logrd=lacl(1)
Release lacl

If logrd.Baseclass = 'Grid'
lcmeth ="*-- Delegate DoubleClick to Grid method"+lccr+;
"Local oGrdObj"+lccr+;
"oGrdObj = this.parent.parent"+lccr+;
"oGrdObj.DblClick()"
For Each oCol In logrd.Columns
oCol.text1.Writemethod('DblClick',lcmeth)
EndFor
Else
MessageBox("No Grid Selected")
Endif
Else
MessageBox("No Grid Selected")
Endif

Return

Just an opinion... Not a fact.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform