FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour xBrowse Horizontal scroll error with multiple listboxes 1501
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
xBrowse Horizontal scroll error with multiple listboxes 1501
Posted: Wed Feb 11, 2015 02:13 PM
To All

I have a form that has three xBrowse listboxes on one form. When I use the horizontal scroll on the bottom xBrowse I get an ugly run-time error. It only seems to occur when the cursor gets to the Labor column ( edit_get_button ).

Again .. this only occurs as you scroll right either with the right arrow key or the horizontal scroll bar and the cursor hits the Labor column.

Any help would be appreciated.
Rick Lipkin



Code (fw): Select all Collapse
Application
===========
   Path and name: C:\Fox\SaLite\Saw32.Exe (32 bits)
   Size: 5,128,704 bytes
   Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20131030)
   FiveWin  Version: FWHX 15.01
   Windows version: 5.1, Build 2600 Service Pack 3

   Time from start: 0 hours 0 mins 27 secs 
   Error occurred at: 02/11/2015, 08:45:59
   Error description: Error BASE/1070  Argument error: ==
   Args:
     [   1] = A   { ... } length: 1
     [   2] = N   16777215

Stack Calls
===========
   Called from: .\source\classes\BRUSH.PRG => TBRUSH:NEW( 132 )
   Called from: .\source\classes\WINDOW.PRG => TCONTROL:SETCOLOR( 2739 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:SETCOLOR( 1578 )
   Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTCELL( 10760 )
   Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTDATA( 10283 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DRAWLINE( 1927 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINT( 1590 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DISPLAY( 1368 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1699 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12607 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3450 )
   Called from:  => SYSREFRESH( 0 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:END( 526 )
   Called from: .\source\function\ERRSYSW.PRG => (b)ERRORDIALOG( 401 )
   Called from: .\source\classes\BUTTON.PRG => TBUTTON:CLICK( 175 )
   Called from: .\source\classes\CONTROL.PRG => TBUTTON:HANDLEEVENT( 1687 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3450 )
   Called from:  => SENDMESSAGE( 0 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:COMMAND( 403 )
   Called from:  => TWINDOW:HANDLEEVENT( 0 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 906 )
   Called from:  => DIALOGBOXINDIRECT( 0 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 286 )
   Called from: .\source\function\ERRSYSW.PRG => ERRORDIALOG( 420 )
   Called from: .\source\function\ERRSYSW.PRG => (b)ERRORSYS( 23 )
   Called from: .\source\classes\BRUSH.PRG => TBRUSH:NEW( 132 )
   Called from: .\source\classes\WINDOW.PRG => TCONTROL:SETCOLOR( 2739 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:SETCOLOR( 1578 )
   Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTCELL( 10760 )
   Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTDATA( 10283 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DRAWLINE( 1927 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINT( 1590 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DISPLAY( 1368 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1699 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12607 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3450 )
   Called from:  => DIALOGBOXINDIRECT( 0 )
   Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 286 )
   Called from: .\source\function\ERRSYSW.PRG => ERRORDIALOG( 420 )
   Called from: .\source\function\ERRSYSW.PRG => (b)ERRORSYS( 23 )
   Called from: .\source\classes\BRUSH.PRG => TBRUSH:NEW( 132 )
   Called from: .\source\classes\WINDOW.PRG => TCONTROL:SETCOLOR( 2739 )
   Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:SETCOLOR( 1578 )
   Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTCELL( 10760 )
   Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:PAINTDATA( 10283 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DRAWLINE( 1927 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINT( 1590 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DISPLAY( 1368 )
   Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1699 )
   Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12607 )
   Called from: .\source\classes\WINDOW.PRG => _FWH( 3450 )
   Called from:  => WINRUN( 0 )
   Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1152 )
   Called from: Main.prg => MAIN( 326 )
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: xBrowse Horizontal scroll error with multiple listboxes 1501
Posted: Wed Feb 11, 2015 04:09 PM

It appears you are using gradient and set oCol:lBtnTranparent to .T..
For now as a temporary solution, set oCol:lBtnTransparent to .F. ( that is the default ).

Please let us know if this is working well.

We shall provide a better way of painting the transparent button even on gradients by next release.

Regards



G. N. Rao.

Hyderabad, India
Posts: 2706
Joined: Fri Oct 07, 2005 01:50 PM
Re: xBrowse Horizontal scroll error with multiple listboxes 1501
Posted: Wed Feb 11, 2015 04:23 PM

Rao

YES !! I just rem'd out oLbxB3:aCols[ 6 ]:lBtnTransparent := .t. and it worked

Thanks
Rick Lipkin

Continue the discussion