Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Multi-User Grids.
Message
From
13/12/1999 15:41:41
 
 
To
13/12/1999 15:33:53
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00302917
Message ID:
00302932
Views:
23
Here's my load event. With private data session.

SET TALK OFF
SET REFRESH TO 0
SET REPROCESS TO 1
SET SAFETY OFF
SET EXCLUSIVE OFF
SET EXACT ON
SET DELETED ON
SET MULTILOCKS ON
SET STATUS BAR OFF
SET ESCAPE ON
SET CENTURY ON
ON ESCAPE


DIME thisform.r_openfile(3,2)
*!* opened files
STORE "child1" TO thisform.r_openfile(1,1)
STORE "child2" TO thisform.r_openfile(2,1)
STORE "parent1" TO thisform.r_openfile(3,1)

*!* defaulted order
STORE "key" TO thisform.r_openfile(1,2)
STORE "key" TO thisform.r_openfile(2,2)
STORE "key" TO thisform.r_openfile(3,2)


USE parent1 ORDER key IN 0 SHARE
USE child1 ORDER key IN 0 SHARE
USE child2 ORDER key IN 0 SHARE
USE rcount IN 0 SHARE


=CURSORSETPROP("BUFFERING",5,"PARENT1")
=CURSORSETPROP("BUFFERING",5,"CHILD1")
=CURSORSETPROP("BUFFERING",5,"CHILD2")
Previous
Reply
Map
View

Click here to load this message in the networking platform