FiveTech Support Forums

I changed the class preview 2 points

1) ... no look 2007

METHOD BuildMenu() CLASS TPreview

if !l2007
MENU oMenu 2007
else
MENU oMenu
endif

2) ... error preview two page and zoom page 2

METHOD SetOrg2( nX, nY ) CLASS TPreview

if l2007
::obar:Refresh()
else
::oPage:Refresh()
endif

regards
Stefano

sorry
Review menu for 2007

1) ... no look 2007

static l2007 := .T.

METHOD BuildMenu() CLASS TPreview

if l2007
MENU oMenu 2007
else
MENU oMenu
endif

regards
Stefano