Page 1 of 1

Funciona enxHarbour pero no funciona en Harbour

PostPosted: Sun Mar 03, 2024 9:20 am
by JoseAlvarez
Hola Amigos.

en mis comienzos con MySql, aun usaba el LISTBOX y tenia esto:

Code: Select all  Expand view
Redefine ListBox oLbx fields iif( oQuery:Reccount() > 0 , oQuery:descripcion    , '' ) ,;  
                             iif( oQuery:Reccount() > 0 , oQuery:codigo_fabrica , '' ) ,;  
                             iif( oQuery:Reccount() > 0 , oQuery:nombre_modelo  , '' )  ;  
                             Id 10 of oDlg Headers 'Descripción','Código Fábrica',"Modelo" FieldSizes  410, 170, 100

  oLbx:SetArray( oQuery )


lo tengo con xHarbour y funciona bien, este código tiene años funcionando sin problemas.

Estoy comenzando a migrarlo a HARBOUR, pero ahora me da error:

Code: Select all  Expand view
Application
===========
   Path and name: C:\Neuro32\Neuro32.EXE (32 bits)
   Size: ********* bytes
   Compiler version: Harbour 3.2.0dev (r2104281802)
   FiveWin  version: FWH 23.07
   C compiler version: Borland/Embarcadero C++ 7.4 (32-bit)
   Windows 10 64 Bits, version: 6.2, Build 9200

   Time from start: 0 hours 0 mins 5 secs
   Error occurred at: 03/03/2024, 05:04:04
   Error description: Error DBCMD/2001  Area de trabajo no usada: RDDNAME


en la linea de activacion del dialogo:

Code: Select all  Expand view
Activate dialog oDlg_Articulos


Se que la solución más efectiva es cambiando a xBrowse, de hecho deje de usar Listbox hace 3 años, pero en este caso son muchos los PRG que tengo así y cambiarlos significa un trabajo largo, que a la final tendré que hacerlo a menos que haya una solución más simple, y ese el motivo de este hilo.

¿alguna idea?

Muchas gracias.