FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Fix for FWH 7.11
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Fix for FWH 7.11
Posted: Fri Nov 16, 2007 11:56 PM
This is a necesary fix for FWH 7.11 in Class TMsgBar:
METHOD SetMsg( cText ) CLASS TMsgBar

   DEFAULT ::cMsg := ""
   
   if ::l2007
      ::cMsg = cText
      ::Refresh()
      return nil
   endif   
   
   ::GetDC()   // must be placed here!!!
   ...
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 357
Joined: Thu Nov 02, 2006 06:53 PM
Fix for FWH 7.11
Posted: Sat Nov 17, 2007 11:10 AM

I can't complite this source ( FWH 7.11 and xAHRBOUR.COM November 2007)

my log:
Type: C >>>xhb.exe -o"Obj\msgbar.c" -m -n -p -q -gc0 -B -D-w2 -I"C:\fwh\include" -I"R:\include" -I"R:\include\w32" "Source\Classes\msgbar.prg"<<<

xHarbour Compiler build 1.0.0 (SimpLex)
Copyright 1999-2007, http://www.xharbour.org http://www.harbour-project.org/

Source\Classes\msgbar.prg(304) Error E0020 Incomplete statement or unbalanced delimiters

Source\Classes\msgbar.prg(379) Warning W0003 Variable: 'NFLAGS' declared but not used in function: 'TMSGBAR_LBUTTONDOWN(364)'

1 error

No code generated

Type: C >>>Couldn't build: msgbar.obj<<<
Type: C >>>TMAKEOBJECT<<<
Type: C >>>TMAKEOBJECT:REFRESH<<<
Type: N >>> 1322<<<

best regards

kajot
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Fix for FWH 7.11
Posted: Sat Nov 17, 2007 12:42 PM

> Source\Classes\msgbar.prg(304) Error E0020 Incomplete statement or unbalanced delimiters

What source code do you have at line 304 ?

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 357
Joined: Thu Nov 02, 2006 06:53 PM
Fix for FWH 7.11
Posted: Sat Nov 17, 2007 01:28 PM

sorry, I leave one )

best regards

kajot
Posts: 246
Joined: Sat Mar 03, 2007 08:42 PM
Re: Fix for FWH 7.11
Posted: Wed Nov 21, 2007 07:18 PM
Antonio Linares wrote:This is a necesary fix for FWH 7.11 in Class TMsgBar:
METHOD SetMsg( cText ) CLASS TMsgBar

   DEFAULT ::cMsg := ""
   
   if ::l2007
      ::cMsg = cText
      ::Refresh()
      return nil
   endif   
   
   ::GetDC()   // must be placed here!!!
   ...


What goes wrong if we don't do this fix?

Patrick
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Fix for FWH 7.11
Posted: Wed Nov 21, 2007 07:19 PM

Patrick,

Its a bad memory leak, as a hDC is created everytime the mouse is moved, and it is not released!

That fix should be applied inmediately if 2007 clause is used

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 246
Joined: Sat Mar 03, 2007 08:42 PM
Fix for FWH 7.11
Posted: Thu Nov 22, 2007 10:40 AM
Antonio Linares wrote:Patrick,

Its a bad memory leak, as a hDC is created everytime the mouse is moved, and it is not released!

That fix should be applied inmediately if 2007 clause is used


Ok, thank you.

Patrick

Continue the discussion