Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Dataenvironment
Message
De
31/03/2005 04:40:53
 
 
À
31/03/2005 04:22:42
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Versions des environnements
Visual FoxPro:
VFP 7 SP1
Divers
Thread ID:
01000201
Message ID:
01000203
Vues:
14
This message has been marked as the solution to the initial question of the thread.
Hi,

You can loop through DataEnvironment.Objects. Here is a sample code:
x = CreateObject("dataenvironment")
x.AddObject("test","cursor")
lnCount = 0
For each oObject in x.Objects
	If Upper(oObject.BaseClass) = "CURSOR"
		lnCount = lnCount + 1
	EndIf
EndFor
? lnCount
Hope this helps.

>is there a property which returns the number of cursors contained in the dataenvironment ?
>I'd like to use a code like this
>
>for lcI = 1 to Dataenvironment.cursorcount
> .............
>endfor
>
>I know cursorcount does not exit :-)
>
>Thx Alessio
Grigore Dolghin
Class Software.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform