Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Vfp50 - DataEnvironment
Message
From
10/03/1997 17:21:30
 
 
To
10/03/1997 08:22:41
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00023147
Message ID:
00023629
Views:
35
> >>Not sure what you mean by this?? > > > >you can create dataenvironment object outside of forms and instantiate > them > >in form when you need > > > >Arnon > > Hi Arnon... > How would I do this? here is a short (very basic and simple) example (generated with the latest version of my DEExtractor) otCursor and otDataEnvitonment are the base cursor and DE classes I use
FUNCTION createDE
LPARAMETER tcDEName
LOCAL lode
	loDE=createobject(tcDEName)
RETURN loDE

DEFINE CLASS Cursor1 AS otCursor
Left = 10
Top = 20
Width = 95
Height = 90
Alias = "title"
Database = "..\data\zoom.dbc"
CursorSource = "title"
Name = "Cursor1"
ENDDEFINE

DEFINE CLASS Cursor2 AS otCursor
Left = 149
Top = 10
Width = 95
Height = 90
Alias = "customers"
Database = "..\data\zoom.dbc"
CursorSource = "customers"
Name = "Cursor2"
ENDDEFINE

DEFINE CLASS rptde AS otDataEnvironment
Left = 98
Top = 344
Width = 520
Height = 200
Name = "rptde"
   ADD OBJECT oCursor1 AS Cursor1
   ADD OBJECT oCursor2 AS Cursor2
ENDDEFINE

DEFINE CLASS srchde AS otDataEnvironment
Left = 1
Top = 220
Width = 520
Height = 200
Name = "srchform"
   ADD OBJECT oCursor1 AS Cursor1
ENDDEFINE
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform