FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Problemas xbrowse 2210 (xharbour)
Posts: 1818
Joined: Wed Oct 26, 2005 02:49 PM
Problemas xbrowse 2210 (xharbour)
Posted: Tue Nov 15, 2022 04:55 PM
Hola buenos d铆as para todos

Estamos intentando actualizar la versi贸n de fw, hasta ahora sin 茅xito, intentamos con harbour, pero nada que logramos solucionar el tema de los caracteres especiales, tildes y e帽es.

Por esta raz贸n quisimos intentar con la versi贸n 2210 pero con xharbour, para ver si ten铆amos menos inconvenientes, pero no podemos cargar un xbrowse que esta vac铆o.

Este mismo c贸digo funcionaba bien con la versi贸n 1909.

Con un array
Code (fw): Select all Collapse
Application
===========
聽 聽Path and name: C:\DLYMA\hymlyma.exe (32 bits)
聽 聽Size: 8,469,504 bytes
聽 聽Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20201212)
聽 聽FiveWin 聽version: FWH 22.10
聽 聽C compiler version: Borland/Embarcadero C++ 7.3 (32-bit)
聽 聽Windows 11 64 Bits, version: 6.2, Build 9200 

聽 聽Time from start: 0 hours 2 mins 12 secs 
聽 聽Error occurred at: 15/11/2022, 11:07:36
聽 聽Error description: Error BASE/1068 聽Error de argumento: acceso al array
聽 聽Args:
聽 聽 聽[ 聽 1] = A 聽 {TXBRWCOLUMN,TXBRWCOLUMN,TXBRWCOLUMN,TXBRWCOLUMN,TXBRWCOLUMN,TXBRWCOLUMN,TXBRWCOLUMN,TXBRWCOLU ... } length: 10
聽 聽 聽[ 聽 2] = U 聽 

Stack Calls
===========
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:COLATPOS( 4637 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => (b)TXBROWSE:TXBROWSE( 728 )
聽 聽Called from: 聽=> TXBROWSE:SELECTEDCOL( 0 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINT( 2235 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DISPLAY( 2180 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1823 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12232 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3689 )
聽 聽Called from: 聽=> DIALOGBOXINDIRECTW( 0 )
聽 聽Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 307 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => ERRORDIALOG( 449 )
聽 聽Called from: .\source\function\ERRSYSW.PRG => (b)ERRORSYS( 24 )
聽 聽Called from: .\source\classes\IMAGE.PRG => LOADFREEIMAGE( 505 )
聽 聽Called from: .\source\classes\IMAGE.PRG => FREEIMAGEISLOADED( 519 )
聽 聽Called from: .\source\function\IMGTXTIO.PRG => MEMORYBUFFERTYPE( 1935 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:ADJUST( 13242 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:ADJUST( 1536 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:INITIATE( 1378 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:CREATEFROMCODE( 1219 )
聽 聽Called from: z:\prg\R32_fact.prg => FFACTURAS( 429 )
聽 聽Called from: z:\prg\R32_fact.prg => R32_FACT( 57 )
聽 聽Called from: z:\prg\Alyma.prg => (b)TLYMA:AUTORIZA( 1505 )
聽 聽Called from: z:\prg\Alyma.prg => TLYMA:AUTORIZA( 1505 )
聽 聽Called from: z:\prg\R32_menu.prg => (b)VTNAPRINCIPAL( 518 )
聽 聽Called from: .\source\classes\TRBTN.PRG => TRBTN:CLICK( 717 )
聽 聽Called from: .\source\classes\TRBTN.PRG => TRBTN:LBUTTONUP( 920 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1847 )
聽 聽Called from: .\source\classes\TRBTN.PRG => TRBTN:HANDLEEVENT( 1578 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3689 )
聽 聽Called from: 聽=> WINRUN( 0 )
聽 聽Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1114 )
聽 聽Called from: z:\prg\R32_menu.prg => VTNAPRINCIPAL( 613 )
聽 聽Called from: z:\prg\R32_menu.prg => MAIN( 109 )

System
======
聽 聽CPU type: Intel(R) Core(TM) i5-9400F CPU @ 2.90GHz 2904 Mhz
聽 聽Hardware memory: 8105 megs

聽 聽Free System resources: 90 %
聽 聽 聽 聽 GDI 聽 聽resources: 90 %
聽 聽 聽 聽 User 聽 resources: 90 %

聽 聽Windows total applications running: 3
聽 聽 聽 1 , 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 
聽 聽 聽 2 , C:\DLYMA\hymlyma.exe 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽
聽 聽 聽 3 GDI+ Window (hymlyma.exe), C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.22621.819_none_21dd7a56301966e
con un recorset
Code (fw): Select all Collapse
Application
===========
聽 聽Path and name: C:\dlyma\hymlyma.exe (32 bits)
聽 聽Size: 8,469,504 bytes
聽 聽Compiler version: xHarbour 1.2.3 Intl. (SimpLex) (Build 20201212)
聽 聽FiveWin 聽version: FWH 22.10
聽 聽C compiler version: Borland/Embarcadero C++ 7.3 (32-bit)
聽 聽Windows 11 64 Bits, version: 6.2, Build 9200 

聽 聽Time from start: 0 hours 0 mins 42 secs 
聽 聽Error occurred at: 15/11/2022, 11:52:37
聽 聽Error description: Error ADODB.RecordSet:FIELDS/9 聽El valor de BOF o EOF es True, o el actual registro se elimin贸; la operaci贸n solicitada requiere un registro actual.: VALUE
聽 聽Args:

Stack Calls
===========
聽 聽Called from: 聽=> TOLEAUTO:VALUE( 0 )
聽 聽Called from: z:\prg\R32_coin.prg => (b)FCOMPINVEN( 337 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBRWCOLUMN:ERASEDATA( 15328 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:ERASEDATA( 3281 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:PAINT( 2545 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:DISPLAY( 2180 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1823 )
聽 聽Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12232 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3689 )
聽 聽Called from: 聽=> UPDATEWINDOW( 0 )
聽 聽Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 1091 )
聽 聽Called from: .\source\classes\MDICHILD.PRG => TMDICHILD:ACTIVATE( 269 )
聽 聽Called from: z:\prg\R32_coin.prg => FCOMPINVEN( 364 )
聽 聽Called from: z:\prg\R32_coin.prg => R32_COIN( 54 )
聽 聽Called from: z:\prg\R32_menu.prg => (b)VTNAPRINCIPAL( 305 )
聽 聽Called from: .\source\classes\TRBTN.PRG => TRBTN:CLICK( 717 )
聽 聽Called from: .\source\classes\TRBTN.PRG => TRBTN:LBUTTONUP( 920 )
聽 聽Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1847 )
聽 聽Called from: .\source\classes\TRBTN.PRG => TRBTN:HANDLEEVENT( 1578 )
聽 聽Called from: .\source\classes\WINDOW.PRG => _FWH( 3689 )
聽 聽Called from: 聽=> WINRUN( 0 )
聽 聽Called from: .\source\classes\WINDOW.PRG => TMDIFRAME:ACTIVATE( 1114 )
聽 聽Called from: z:\prg\R32_menu.prg => VTNAPRINCIPAL( 613 )
聽 聽Called from: z:\prg\R32_menu.prg => MAIN( 109 )

System
======
聽 聽CPU type: Intel(R) Core(TM) i5-9400F CPU @ 2.90GHz 2904 Mhz
聽 聽Hardware memory: 8105 megs

聽 聽Free System resources: 90 %
聽 聽 聽 聽 GDI 聽 聽resources: 90 %
聽 聽 聽 聽 User 聽 resources: 90 %

聽 聽Windows total applications running: 4
聽 聽 聽 1 , 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 
聽 聽 聽 2 , C:\WINDOWS\WinSxS\x86_microsoft.windows.common-controls_6595b64144ccf1df_6.0.22621.608_none_f0f1837 
聽 聽 聽 3 Conmutaci贸n de tareas, C:\dlyma\hymlyma.exe 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽 聽
聽 聽 聽 4 GDI+ Window (hymlyma.exe), C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.22621.819_none_21dd7a56301966e
Saludos
LEANDRO AREVALO
Bogot谩 (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 44162
Joined: Thu Oct 06, 2005 05:47 PM
Re: Problemas xbrowse 2210 (xharbour)
Posted: Wed Nov 16, 2022 08:13 AM

Estimado Leandro,

El Sr. Rao lo est谩 revisando

El error viene de aqui:

oCol := ::aCols[ ATail( ::aDisplay ) ]

Parece que ATail( ::aDisplay ) esta devolviendo nil

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 10733
Joined: Sun Nov 19, 2006 05:22 AM
Re: Problemas xbrowse 2210 (xharbour)
Posted: Wed Nov 16, 2022 09:08 PM
I tested with an empty array here and did not get any errors.
This is my test program:
Code (fw): Select all Collapse
#include "fivewin.ch"

function Main()

聽 聽local aData := {}

聽 聽XBROWSER aData COLUMNS 1,2,3,4,5,6 ;
聽 聽 聽 TITLE VERSION() + " : " + FWVERSION

return nil


Can you please provide a small example to test here?
Regards



G. N. Rao.

Hyderabad, India

Continue the discussion