[此贴子已经被作者于2005-10-2 10:57:04编辑过]
LOCAL fown
fown = NEWOBJECT('Form')
WITH fown
.Width = 600
.Height = 500
.Caption = '打印预览'
.AutoCenter = .T.
.Name = SYS(2015)
ENDWITH
REPORT FORM 打印.frx PREVIEW WINDOW (fown.Name) NOCONSOLE
fown.Release
RETURN