Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Fire code on each Page Activate
Message
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Environment versions
Visual FoxPro:
VFP 8 SP1
OS:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01187872
Message ID:
01187875
Views:
18
This message has been marked as the solution to the initial question of the thread.
>Hi everybody,
>
>I have a pageframe class and I don't have a page class. What would be the easiest way to fire some code when the individual page is activated (in particular, I'd like to change its font properties)?
>
>Thanks in advance.
FOR EACH oPage IN thisform.PageFrame1.Pages
    BINDEVENT(oPage,[Activate],thisform,[ActivatePage],1)
NEXT


**** thisform.ActivatePage code
LOCAL laoEvent[1]
AEVENTS(laoEvent,1)
FOR EACH oPage IN thisform.PageFrame1.Pages
    IF UPPER(oPage.Name) == UPPER(laoEvent[1].Name)
       oPage.Font...... = [aaaaaaaa] 
    ELSE
       oPage.Font...... = [default one] 
    ENDIF
NEXT
(not tested at all)
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform