FWH 8.06 Class TXBrowse fix

[Antonio Linares]

These changes are required in FWH 8.06 class TXBrowse. Tomorrow we will publish a new FWH 8.06 build including these changes:

Code: Select all  Expand view

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