Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Is this a Bug in the PageFrame?
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Title:
Is this a Bug in the PageFrame?
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Network:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01156193
Message ID:
01156193
Views:
65
Hi

If you run the following code with the tabs set on the left or right the height of the pageframe is reduced by what appears to be the height of the tabs and the width is increased by the amount of the tab height so that they extend past the form border.

If you use the top or bottom tabs everything works fine. This seems to aonly happen when using code. If you build the form in the designer it works correctly.

Simon
Public oForm
oForm=CreateObject("Form")
oForm.Height=500
oForm.Width=500
oForm.AddObject("pageFrame","mypageframe")
oForm.pageFrame.Visible=.Y.
oForm.Show
Return
Define Class mypageFrame as PageFrame
   Width=500
   Height=500
   top=0
   left=0
   TabOrientation=3
   PageCount=2
EndDefine
Simon White
dCipher Computing
Next
Reply
Map
View

Click here to load this message in the networking platform