Hi Shlomo,

>Is there a way where I can change the report preview percentage to go over 100%?

Yes, but it doesn't look pretty.

Public oOuter, oInner
Create Report Test from Sys(2005)
oOuter = CreateObject("OuterForm")
oInner = CreateObject("InnerForm")
Activate Window (oInner.Name) in (oOuter.Name)
oOuter.Show()
oInner.Show()
Keyboard "Z" Plain
Report Form Test Preview in Window (oInner.Name) Window (oInner.Name) Nowait Name oOuter.oEnvironment

Define Class OuterForm as Form
	oEnvironment = NULL
	ScrollBars = 3
	Add Object Dummy as Label with Top=4000, Left=2000
	Add Object tmr as Timer with interval = 500
	Width = 600
	Height = 600
	Procedure Scrolled(tnDirection)
		oInner.Move( -This.ViewPortLeft, -This.ViewPortTop )
	Endproc
	Procedure oEnvironment_Assign
	LParameter toEnvironment
		If IsNull(toEnvironment)
			oInner.Release()
			oOuter.Release()
		Endif 
	Endproc 
EndDefine

Define Class InnerForm as Form
	BorderStyle = 0
	TitleBar = 0
	Width = 2000
	Height = 4000 
EndDefine 

--
Christof