Buenas tardes.
tengo una rutina que usa un listbox definido por WorkShop y funciona correctamente.
en otra funcion en la cual copie el listbox en el prg .
asi lo defini
REDEFINE LISTBOX oLbx FIELDS str(_CoLiAux->Locatario,4,0) , ;
str(_CoLiAux->Propiedad,4,0) ;
ID _CLV_Lbx ;
FIELDSIZES {50,50} ;
HEADERS "Loc.","Prop" ;
Font oLetra ;
UPDATE ;
OF oDlg
oLbx:aJustify = {.t.,.t.}
al ejecutarlo me sale el siguiente error:
Error Base/1081 Argument error: +
Application
===========
Path and name: C:\AFuentes\AdmProp\Sistema.exe (32 bits)
Size: 3,243,008 bytes
Compiler version: Harbour 3.1.0dev (Rev. 17222)
FiveWin Version: FWH 12.06
Windows version: 6.1, Build 7601 Service Pack 1
Time from start: 0 hours 0 mins 4 secs
Error occurred at: 24-03-2024, 19:23:58
Error description: Error BASE/1081 Argument error: +
Args:
[ 1] = N 0
[ 2] = A { ... }
Stack Calls
===========
Called from: .\source\classes\WBROWSE.PRG => TWBROWSE:RESIZE( 656 )
Called from: => TWINDOW:HANDLEEVENT( 0 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1700 )
Called from: .\source\classes\WBROWSE.PRG => TWBROWSE:HANDLEEVENT( 1635 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3154 )
Called from: => SENDMESSAGE( 0 )
Called from: .\source\classes\WINDOW.PRG => (b)TWINDOW( 555 )
Called from: .\source\classes\WINDOW.PRG => TWBROWSE:SENDMSG( 0 )
Called from: .\source\classes\WINDOW.PRG => TWBROWSE:SETFONT( 2769 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:INITIATE( 381 )
Called from: .\source\classes\WBROWSE.PRG => (b)TWBROWSE( 182 )
Called from: .\source\classes\WBROWSE.PRG => TWBROWSE:INITIATE( 0 )
Called from: => __OBJSENDMSG( 0 )
Called from: .\source\function\HARBOUR.PRG => OSEND( 210 )
Called from: .\source\function\HARBOUR.PRG => ASEND( 178 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:INITIATE( 630 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:HANDLEEVENT( 870 )
Called from: => DIALOGBOX( 0 )
Called from: .\source\classes\DIALOG.PRG => TDIALOG:ACTIVATE( 270 )
Called from: ABMBASES.prg => MOVALIQVS( 3643 )
Called from: Sistema.prg => (b)BARBOTONES( 749 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:CLICK( 465 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:LBUTTONUP( 656 )
Called from: .\source\classes\CONTROL.PRG => TCONTROL:HANDLEEVENT( 1690 )
Called from: .\source\classes\BTNBMP.PRG => TBTNBMP:HANDLEEVENT( 1408 )
Called from: .\source\classes\WINDOW.PRG => _FWH( 3154 )
Called from: => WINRUN( 0 )
Called from: .\source\classes\WINDOW.PRG => TWINDOW:ACTIVATE( 980 )
Called from: Sistema.prg => MAIN( 327 )
ya he probado cambiando hasta los campos y nada.
Alguna sugerencia?
Gracias