>>>>When you layout a pageframe in the class designer it is always rendered in the
>>>>live form approximately 5 pixels shorted. So to get the look you want in the live
>>>>form you must make the pageframe longer in the class designer sometimes actually
>>>>overlapping the controls below it. This makes it difficult to actually design the
>>>>class visually because it does not look the same when rendered in the instance
>>>>object.
>>>
>>>I'm not seeing this, Simon: I just created a pgf class that was 100 by 200. When I
>>>dropped it onto a form and ran it, it was still 100 by 200. The Pages within the pgf
>>>were only 196 wide: I assume there's a 2 pixel border on each side.
>>
>>Can you try putting a control on the form below the pageframe in the class designer and
>>then see if the pageframe is further away from the control when the form is initiated?
>
>Oh, that's interesting: I didn't realize that you meant to create a Form class with a pageframe
>on it instead of a Pageframe class on a form. When I did that, my 150-pixel-high pageframe ended
>up being 154 pixels, instead of shorter, which you're reporting. An editbox placed outside the
>pgf overlapped the pgf: an editbox put on the bottom edge of a page had space below it.
Repro code:
loform = CREATEOBJECT("Form")
loForm.Show()
loform.AddObject("pgf1", "Pageframe")
loForm.pgf1.Visible = .t.
loform.pgf1.PageCount = 2
loform.pgf1.Height = 100
ACTIVATE SCREEN
? loform.pgf1.Height
loform.SaveAsClass("c:\temp\pgfTest.vcx", "form2")
loform.Release()
loform = NEWOBJECT("form2", "c:\temp\pgftest.vcx")
loform.Show()
ACTIVATE SCREEN
? loform.pgf1.Height
Results:
100
104