FWH 8.06 Class TXBrowse fix

FWH 8.06 Class TXBrowse fix

Postby Antonio Linares » 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:
Code: Select all  Expand view  RUN
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
User avatar
Antonio Linares
Site Admin
 
Posts: 42122
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 58 guests