>Hi Hugo,
>
>How do I modify your sample code to "instroduce" a PageFrame. I just want to see if it will change how it works in your sample code.
>
>I added a new (empty) PageFrame to my "complicated" form and dropped two Edit boxes on this empty PageFrame. And the anchor DOES NOT work correctly. Then I dropped two Edit boxes on the same form, away from the PageFrame. And this time the Anchor WORKS.
>I would like to see if this is just my form where PageFrame "acts up" or in a sample form it will do the same.
Hi Dmitry,
Something like this, I added a label in between the edit boxes, but is basically the same thing.
loForm = createobject('myForm')
loForm.show(1)
define class myForm as form
height = 480
add object myPageFrame as myPageFrame with top =0, left = 0, width = 260, height = 460, anchor = 15
function init()
this.myPageFrame.Page1.newobject('myContainer', 'myContainer')
this.myPageFrame.Page1.myContainer.visible = .t.
endfunc
enddefine
define class myContainer as container
top = 0
left = 0
width = 260
height = 460
anchor = 15
backcolor = rgb(0, 192, 192)
add object myTopEditBox as editbox with top = 3, width = 245, height = 200, left = 5, anchor = 75
add object myLabel as label with caption = 'This is some caption', top = 207, autosize = .t., backstyle = 0, anchor=80
add object myBotEditBox as editbox with top = 225, width = 245, height = 200, left = 5, anchor = 30
enddefine
define class myPageFrame as pageframe
pagecount = 2
enddefine
"The five senses obstruct or deform the apprehension of reality."
Jorge L. Borges?
"Premature optimization is the root of all evil in programming."
Donald Knuth, repeating C. A. R. Hoare
"To die for a religion is easier than to live it absolutely"
Jorge L. Borges