To anyone who can help,
I created a pageframe class and named it xpgf. The pageframe has a pagecount of 0
I created a page class and named it xPage
Within init method of a form, I do the following:
thisform.AddObject('PageFrame1','xPgf')
thisform.pageFrame1.AddObject('TestPage1','xPage')
thisform.pageFrame1.AddObject('TestPage2','xPage')
thisform.PageFrame1.Visible=.T.
When I run the form, no objects appear to be on the form. If I move the mouse to a position where one of the tabs should be, the one tab over which my mouse is located appears. Note that my mouse has to point the tab itself, pointing to where the page should be has no effect. Also, it is only the tab itself that appears, its associated page remains invisible. If I move the mouse to the second tab, the first tab disappears and the second appears. If I move the mouse away from all tabs, all tabs are invisible. If I click where one of the tabs should appear, the entire pageframe with all its pages become visible!
I tried setting Themes=.F. on the pageframe class. This had the effect of not displaying the tabs even if I move the mouse to their location. If I click on the position where they should be, the entire pageframe then appears.
If I modify the pagecount of the pageframe class to 1, the pageframe and the 3 page tabs (the one from the class plus the two added at runtime) are visible with Page1 completely visible. However, this does not meet my needs since the first page does not have the functionality built into my Page class.
I even tried to click on one of the pages at runtime by doing thisform.pageFrame1.TestPage1.Click() to no avail.
I am presently attempting this with Visual Foxpro 8. This worked perfectly in Visual Foxpro 6!
Please help!
Thanks,
Bruno Di Lalla
Bruno Di Lalla
Consultant
BDL Computer Consulting