Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Pageframe refresh
Message
 
To
02/06/1998 11:25:38
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00102937
Message ID:
00104033
Views:
31
Actually, you can solve this problem for all of your pages in your base pageframe class. 1st, create a line object named linPageRefresher with code in the following methods as follows:

Init:
This.BorderColor = This.Parent.BackColor

UIEnable
LPARAMETERS lEnable
IF lEnable
This.Parent.Refresh()
ENDIF

Then in the init method of your pageframe class add this code:

FOR lnI = 1 TO This.PageCount
WITH This.Pages(lnI)
.AddObject("oRefresher","linPageRefresher")
.oRefresher.Visible = .T.
ENDWITH
NEXT
Mike Feltman

F1 Technologies
Previous
Reply
Map
View

Click here to load this message in the networking platform