>PUBLIC x >x = CREATEOBJECT("Mainform") >x.Show() > >*- > >DEFINE CLASS MainForm as Form > SContainer = NULL > width = 700 > Height = 400 > > ADD OBJECT Pgf AS PageFrame WITH left = 5, Top =210, Width = 690, Height = 180, pagecount = 2, TabStyle = 1, Anchor = 14 > > FUNCTION Init > THIS.sContainer = CREATEOBJECT("SContainer") > ACTIVATE WINDOW (THIS.sContainer.Name) IN WINDOW (THIS.Name) > THIS.sContainer.Show() > THIS.Resize() > ENDFUNC > > FUNCTION resize > THIS.sContainer.Move(0,0, THIS.Width - SYSMETRIC(5), THIS.Height - 200 - SYSMETRIC(6)) > ENDFUNC >ENDDEFINE > >*- > >DEFINE CLASS Scontainer as Form > Scrollbars = 3 > TitleBar= 0 > BorderStyle = 0 > > ADD OBJECT Explanation as Label WITH Caption = "This is the scrollable container", left = 100, top = 100, autosize = .t. > ADD OBJECT FarObject as commandbutton WITH Left = 1000, top = 1000 >ENDDEFINE >With this solution,