En la Classe xBrowse en el Method Redefine, ocurre lo siguiente cuando desplazas el mouse sobre el browse, esto compilado con Harbour o xHarbour:
- Code: Select all Expand view RUN
- Application
===========
Path and name: C:\FWH\samples\xbrwalia.exe (32 bits)
Size: 1,846,784 bytes
Time from start: 0 hours 0 mins 0 secs
Error occurred at: 12/08/09, 15:06:38
Error description: Error BASE/1066 Argument error: conditional
Args:
[ 1] = U
Stack Calls
===========
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:MOUSEMOVE(3141)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT(1453)
Called from: .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT(9915)
Called from: .\source\classes\WINDOW.PRG => _FWH(3333)
Called from: => DIALOGBOX(0)
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE(273)
Called from: xbrwalia.prg => MAIN(20)
Y en TTBMenu de la toolbar, al ser compilada con Harbour (Con xHarbour no ocurre), arroja el siguiente error:
- Code: Select all Expand view RUN
- Application
===========
Path and name: C:\FWH\Pruebas\Phedido.exe (32 bits)
Size: 2,149,376 bytes
Time from start: 0 hours 0 mins 6 secs
Error occurred at: 08/12/2009, 15:09:52
Error description: Error BASE/1068 Argument error: array access
Args:
[ 1] = N 1
[ 2] = N 3
Stack Calls
===========
Called from: .\source\classes\TOOLBAR.PRG => TTOOLBAR:NOTIFY(260)
Called from: .\source\classes\WINDOW.PRG => TREBAR:NOTIFY(1428)
Called from: => TWINDOW:HANDLEEVENT(0)
Called from: .\source\classes\CONTROL.PRG => TREBAR:HANDLEEVENT(1453)
Called from: .\source\classes\WINDOW.PRG => _FWH(3333)
Called from: => WINRUN(0)
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE(952)
Called from: .\PHEDIDO.PRG => MAIN(132)
Esperando una pronta respuesta, envío mis saludos.