FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Xbrowse :SetStyle( 2018 ) ERROR
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Xbrowse :SetStyle( 2018 ) ERROR
Posted: Mon Jan 14, 2019 08:36 AM
I have this error when click on one column header of xbrowse

Code (fw): Select all Collapse
Application
===========
   Path and name: C:\Work\Errori\test_ordine\test.Exe (32 bits)
   Size: 3,840,512 bytes
   Compiler version: Harbour 3.2.0dev (r1712141320)
   FiveWin  version: FWH 18.12
   C compiler version: Borland/Embarcadero C++ 7.3 (32-bit)
   Windows version: 6.1, Build 7601 Service Pack 1

   Time from start: 0 hours 0 mins 4 secs 
   Error occurred at: 14-01-2019, 09:35:18
   Error description: Error BASE/1005  Message not found: TMENU:_L2018
   Args:
     [   1] = O   TMENU

Stack Calls
===========
   Called from:  => __ERRRT_SBASE( 0 )
   Called from: ../../../tobject.prg => TMENU:ERROR( 0 )
   Called from: ../../../tobject.prg => (b)HBOBJECT( 0 )
   Called from: ../../../tobject.prg => TMENU:MSGNOTFOUND( 0 )
   Called from: ../../../tobject.prg => TMENU:_L2018( 0 )
   Called from:  => __OBJSENDMSG( 0 )
   Called from: .\source\function\HARBOUR.PRG => OSEND( 291 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:SETCOLUMNS( 8515 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:RBUTTONDOWN( 5089 )
   Called from:  => TWINDOW:HANDLEEVENT( 0 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1801 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 11121 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3541 )
   Called from:  => DIALOGBOXINDIRECT( 0 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 304 )
   Called from: test.prg => TEST( 84 )
   Called from: test.prg => MAIN( 24 )
Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: Xbrowse :SetStyle( 2018 ) ERROR
Posted: Tue Jan 15, 2019 09:48 AM

I think we must change the METHOD SetColumns( nRow, nCol, nFlags ) of Xbrowse class or wait when add l2018 to tMenu class

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Xbrowse :SetStyle( 2018 ) ERROR
Posted: Tue Jan 15, 2019 02:05 PM
Right.
Fixed for next release.

Request you to change line 8515 of xbrowse.prg:
Existing:
Code (fw): Select all Collapse
         OSend( oMenu, "_L" + Str( ::n2KStyle, 4 ), .t. )


Change this line as:
Code (fw): Select all Collapse
         OSend( oMenu, "_L" + Str( Min( 2015, ::n2KStyle ), 4 ), .t. )
Regards



G. N. Rao.

Hyderabad, India
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: Xbrowse :SetStyle( 2018 ) ERROR
Posted: Tue Jan 15, 2019 02:37 PM

thanks

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com
Posts: 7317
Joined: Thu Oct 18, 2012 07:17 PM
Re: Xbrowse :SetStyle( 2018 ) ERROR
Posted: Wed Jan 16, 2019 12:23 PM

Nages,
Ithink we must change also the bar (graphics) or add a new as MARQSTYLE_HIGHLWIN10
not blue but green clear

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

Continue the discussion