Preview look 2007

Preview look 2007

Postby stefano » Mon May 12, 2008 9:41 pm

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
FWH 14.11 + xHarbour + bcc582
stefano
 
Posts: 80
Joined: Tue Mar 25, 2008 9:03 pm
Location: ITALIA

Postby stefano » Mon May 12, 2008 10:15 pm

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
FWH 14.11 + xHarbour + bcc582
stefano
 
Posts: 80
Joined: Tue Mar 25, 2008 9:03 pm
Location: ITALIA


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 92 guests