Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Vfp50 - DataEnvironment
Message
De
10/03/1997 17:21:30
 
 
À
10/03/1997 08:22:41
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00023147
Message ID:
00023629
Vues:
27
> >>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
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform