Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form and Controls resize
Message
From
21/07/2006 11:29:40
 
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
01137804
Message ID:
01138539
Views:
12
thanks Terry. I'll give it a try. I'm not there yet but this and all the other responses will lead me in the right direction

thanks so much

>
>In this sample, the "p" is a name for a "PageFrame". One of the pages (Page 1) has an editbox.
PROCEDURE frmViews_Resize(oform)
>oform.p.Width=oform.Width
>oform.p.Height=oform.height
>Views_Editsize(oform.P.Page1.edit1)
>FOR nPage=2 TO oform.p.PageCount
>oPage=oform.p.Pages(nPage)
>Views_Gridsize(oPage.Grid1)
>ENDFOR
>oform.p.Pages(oform.p.ActivePage).refresh
>ENDPROC &&Views_Resize(oform)
>
>PROCEDURE Views_Gridsize(oGrid)
>oGrid.width=oGrid.parent.parent.width
>ogrid.height=ogrid.parent.parent.height-28 &&-ogrid.headerheight-SYSMETRIC(15)
>ENDPROC &&Views_Gridsize(oGrid)
>
>PROCEDURE Views_Editsize(oEdit)
>oEdit.width=oEdit.parent.parent.width
>oEdit.height=oEdit.parent.parent.height-28
>ENDPROC &&Views_Editsize(oEdit)
>HTH
Previous
Reply
Map
View

Click here to load this message in the networking platform