FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour FWH 8.06 Class TXBrowse fix
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
FWH 8.06 Class TXBrowse fix
Posted: Tue Jul 01, 2008 11:31 PM
These changes are required in FWH 8.06 class TXBrowse. Tomorrow we will publish a new FWH 8.06 build including these changes:
Lines 5085 and 5108
change
      if Abs( ::oHeaderFont:nEscapement % 1800 ) == 900
as
      if ! Empty( ::oHeaderFont:nEscapement ) .and. Abs( ::oHeaderFont:nEscapement % 1800 ) == 900

Line 5361
change
   if Abs(oFont:nEscapement % 3600) == 900
as
   if ! Empty( oFont:nEscapement ) .and. Abs(oFont:nEscapement % 3600) == 900

Line 5372
   elseif Abs( oFont:nEscapement % 3600 ) == 2700
as
   elseif ! Empty( oFont:nEscapement ) .and. Abs( oFont:nEscapement % 3600 ) == 2700
regards, saludos

Antonio Linares
www.fivetechsoft.com

Continue the discussion