Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Dataenvironment
Message
From
31/03/2005 04:40:53
 
 
To
31/03/2005 04:22:42
General information
Forum:
Visual FoxPro
Category:
Other
Title:
Environment versions
Visual FoxPro:
VFP 7 SP1
Miscellaneous
Thread ID:
01000201
Message ID:
01000203
Views:
15
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.
Previous
Reply
Map
View

Click here to load this message in the networking platform