new bug in FW 13.05 RibbonBar

[lucasdebeltran]

Hello,

in samples\ribbon3.prg

Code: Select all  Expand view

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.

[nageswaragunupudi]

Please apply this fix.
In \fwh\source\classes\tribbon.prg
Change line 1958
Instead of

Code: Select all  Expand view

  local nRound := If( ::l2013, 0, 5 )
 

Change as

Code: Select all  Expand view

local nRound := 5

Please let us know if you find any other issue

[Antonio Linares]

It gets fixed adding:

DATA l2013 INIT .F.

to CLASS TBackStageOption in tribbon.prg

Added for next revised build or new build

[lucasdebeltran]

Antonio,

Thank you.

And what about please

Also, in the style 2013 the blue is not this one:

[Antonio Linares]

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

[lucasdebeltran]

Antonio,

Can you please include in the revised build?.

Thanks.