He borrado entera la instalación primera que había hecho de las versiones descargadas de la Web.
La he vuelto a instalar.
He sustituido la versión de xHarbour de la Web por la nueva que me has indicado en este hilo.
He modificado los métodos NEW de las clases para añadir SELF a los Return de esos métodos.
He cambiado una función para el método END de la clase TBCOMCLASS para comunicaciones serie debido a algunos cambios entre la librería HBCOMM.LIB antigua que tenía y la nueva de la última construcción de xHarbour.
Y con todo esto uno de los programas parece que va bien a falta de unas pruebas más exahustivas que tengo pendientes de hacer.
Sin embargo en el otro programa me da unos errores que no deberían de darse por lo sencillo del código fuente que no logro entender el porqué, son líneas de código que no se han alterado en años:
ERROR 1: Wges.prg(16280) Error E0030 Syntax error: "syntax error at 'ON'"
- Code: Select all Expand view
- if ResulCalc[1]=.t.
USE (ResulCalc[2]) new ALIAS 'KK_CALC'
if nRdb3=2
[b]INDEX ON TOTALES TO &ResulCalc[2] DESCENDING[/b] [color=#FF0000]// línea del error[/color]
endif
ERROR 2:Wges.prg(19527) Error E0030 Syntax error: "syntax error at '&'"
- Code: Select all Expand view
- // Importa los datos desde el fichero antigüo.
[b]use &(aFilesNew[k]) new[/b] [color=#FF0000]// línea del error[/color]
forigen:=substr(aFilesNew[k],2)
if FILE(forigen)
APPEND FROM &(forigen)
endif
use