Simon,

Do it in code like this:

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

function Init()
with this
   .TabOrientation=3
   .PageCount=2
   .top=0
   .left=0
   .Width=500
   .Height=500
endwith
endfunc

EndDefine

>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.