FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour new bug in FW 13.05 RibbonBar
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
new bug in FW 13.05 RibbonBar
Posted: Thu Jun 06, 2013 12:55 PM
Hello,

in samples\ribbon3.prg

Code (fw): Select all Collapse
Application
===========
聽 聽Path and name: C:\FWH\samples\RIBBON3.exe (32 bits)
聽 聽Size: 2,875,904 bytes
聽 聽Compiler version: Harbour 3.2.0dev (Rev. 18881)
聽 聽FiveWin 聽Version: FWH 13.04
聽 聽Windows version: 5.1, Build 2600 Service Pack 3

聽 聽Time from start: 0 hours 0 mins 7 secs 
聽 聽Error occurred at: 06/06/13, 14:53:53
聽 聽Error description: Error BASE/1004 聽Message not found: TBACKSTAGEOPTION:L2013
聽 聽Args:
聽 聽 聽[ 聽 1] = O 聽 TBACKSTAGEOPTION

Stack Calls
===========
聽 聽Called from: 聽=> __ERRRT_SBASE( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:ERROR( 0 )
聽 聽Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:MSGNOTFOUND( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:L2013( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGEOPTION:PAINT( 1958 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => (b)TBACKSTAGE_PAINT( 1853 )
聽 聽Called from: 聽=> AEVAL( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGE:PAINT( 1853 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => (b)TBACKSTAGE( 1614 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGE:DISPLAY( 0 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TBACKSTAGE:HANDLEEVENT( 1695 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3180 )
聽 聽Called from: 聽=> SYSREFRESH( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 512 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 405 )
聽 聽Called from: 聽=> TWINDOW:HANDLEEVENT( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 892 )
聽 聽Called from: 聽=> DIALOGBOXINDIRECT( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 274 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => ERRORDIALOG( 426 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => (b)ERRORSYS( 31 )
聽 聽Called from: 聽=> __ERRRT_SBASE( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:ERROR( 0 )
聽 聽Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:MSGNOTFOUND( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:L2013( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGEOPTION:PAINT( 1958 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => (b)TBACKSTAGE_PAINT( 1853 )
聽 聽Called from: 聽=> AEVAL( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGE:PAINT( 1853 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => (b)TBACKSTAGE( 1614 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGE:DISPLAY( 0 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TBACKSTAGE:HANDLEEVENT( 1695 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3180 )
聽 聽Called from: 聽=> SYSREFRESH( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 512 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 405 )
聽 聽Called from: 聽=> TWINDOW:HANDLEEVENT( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 892 )
聽 聽Called from: 聽=> DIALOGBOXINDIRECT( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 274 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => ERRORDIALOG( 426 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => (b)ERRORSYS( 31 )
聽 聽Called from: 聽=> __ERRRT_SBASE( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:ERROR( 0 )
聽 聽Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:MSGNOTFOUND( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:L2013( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGEOPTION:PAINT( 1958 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => (b)TBACKSTAGE_PAINT( 1853 )
聽 聽Called from: 聽=> AEVAL( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGE:PAINT( 1853 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => (b)TBACKSTAGE( 1614 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGE:DISPLAY( 0 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TBACKSTAGE:HANDLEEVENT( 1695 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3180 )
聽 聽Called from: 聽=> SYSREFRESH( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 512 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 405 )
聽 聽Called from: 聽=> TWINDOW:HANDLEEVENT( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 892 )
聽 聽Called from: 聽=> DIALOGBOXINDIRECT( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 274 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => ERRORDIALOG( 426 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => (b)ERRORSYS( 31 )
聽 聽Called from: 聽=> __ERRRT_SBASE( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:ERROR( 0 )
聽 聽Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:MSGNOTFOUND( 0 )
聽 聽Called from: ../../../tobject.prg => TBACKSTAGEOPTION:L2013( 0 )
聽 聽Called from: .\source\classes\TRIBBON.PRG => TBACKSTAGEOPTION:PAINT( 1958 )



Also, in the style 2013 the blue is not this one:
http://i44.tinypic.com/2wh194w.png

Thanks a lot.
Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: new bug in FW 13.05
Posted: Fri Jun 07, 2013 05:41 AM
Please apply this fix.
In \fwh\source\classes\tribbon.prg
Change line 1958
Instead of
Code (fw): Select all Collapse
   local nRound := If( ::l2013, 0, 5 )

Change as
Code (fw): Select all Collapse
local nRound := 5

Please let us know if you find any other issue
Regards



G. N. Rao.

Hyderabad, India
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: new bug in FW 13.05
Posted: Fri Jun 07, 2013 05:59 AM

It gets fixed adding:

DATA l2013 INIT .F.

to CLASS TBackStageOption in tribbon.prg

Added for next revised build or new build

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: new bug in FW 13.05 RibbonBar
Posted: Fri Jun 07, 2013 09:32 AM
Antonio,

Thank you.

And what about please
Also, in the style 2013 the blue is not this one:

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: new bug in FW 13.05 RibbonBar
Posted: Fri Jun 07, 2013 12:07 PM

El azul oscuro es RGB( 43, 87, 154 ) y el azul del bot贸n es RGB( 194, 213, 242 )

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1303
Joined: Tue Jul 21, 2009 08:12 AM
Re: new bug in FW 13.05 RibbonBar
Posted: Fri Jun 07, 2013 01:29 PM

Antonio,

Can you please include in the revised build?.

Thanks.

Muchas gracias. Many thanks.



Un saludo, Best regards,



Harbour 3.2.0dev, Borland C++ 5.82 y FWH 13.06 [producci贸n]



Implementando MSVC 2010, FWH64 y ADO.



Abandonando uso xHarbour y SQLRDD.

Continue the discussion