Compilar en xHarbour una vieja aplicación Clipper

[gsabattino]

Saludos a Todos...

Quiero compilar en xHarbour una vieja aplicación hecha en Clipper puro...
Hace bastantico tuve la misma necesidad y creo que fue en este foro que me dieron los tips para hacerlo, pero buscando y buscando no di con ellos...

Lei una nota (en este mismo foro) donde decian que en el script del linker solo debia cambiarse COW32.obj por COX32.obj, quitar las libs de FiveWin, y listo!!! pero no ha sido asi de facil... el programa se carga en memoria (se ve en la lista del administrador de tareas) pero no hace nada de nada...

Alguien me puede indicar que me esta sobrando??, o faltando??
a continuación los scripts que estoy usando:

Code: Select all

.PRG .OBJ:
  set include=c:\BCC55\INCLUDE;c:\xBase\xHarbour\$(xHversion)\include;c:\xBase\Clipper5\include;$(Fuentes);$(makepath[.PRG]);$(Pendrive)\xBase\Clip&Win
  c:\xBase\xHarbour\$(xHversion)\bin\Harbour $** /m /n /w /es2 /o$(makepath[.OBJ])\$*.C >$(makepath[.OBJ])\Error.log
  C:\BCC55\BIN\BCC32 -c -o$(makepath[.OBJ])\$*.OBJ $(makepath[.OBJ])\$*.C >$(makepath[.OBJ])\Error.log
  if exist $(makepath[.OBJ])\$*.C del $(makepath[.OBJ])\$*.C

Pases.iLink:

Code: Select all

-aa -Tpe -s +
-I.\Obj32 +
-Lc:\xBase\xHARBOUR\0.993\LIB;C:\BCC55\LIB +
-j.\Obj32;C:\BCC55\LIB +
C:\BCC55\LIB\C0X32.OBJ +
Pases.obj +
Archivos.obj +
Procs.obj +
Report01.obj +
Report02.obj +
Report03.obj +
Utils.obj +
FileStru.obj +
ClMenu.obj +
ClBrow.obj +
oGets.obj +
tXLS.obj +
ScrnMngr.obj +
PrntMngr.obj +
Errores.obj, +
.\Pases32.exe, +
.\Obj32\Pases.map, +
rtl.lib +
vm.lib +
codepage.lib +
common.lib +
gtwvt.lib +
gtstd.lib +
lang.lib +
macro.lib +
debug.lib +
rdd.lib +
dbfntx.lib +
dbfdbt.lib +
dbfcdx.lib +
dbffpt.lib +
pp.lib +
c:\bcc55\lib\CW32.LIB +
c:\bcc55\lib\IMPORT32.LIB,,

Notas:
* No uso herramientas de compilación, sino que lo hago por medio de un clásico archivito .bat
* Scripts del ultimo intento con xHarbour 0.993... los resultados fueron igual con xHarbour 1.2001

Gracias de antemano por la orientación.

Giancarlo J. Sabattino S.
Valencia, Venezuela

[Antonio Linares]

Giancarlo,

Prueba a quitar -aa y opcionalmente no enlaces gtwvt.lib

[gsabattino]

Gracias Antonio...
Hice ambas cosas...

Tengo ahora otro problema que me tocara ver como se resuelve...
El manejo de video no atiende a los clasiscos @ x,y Say como en el Clipper 5, y nada que ver con los SetColor()... al menos es lo que se percibe a primera vista... o sea, que la migrar de Clipper a xHarbour no es tan directo como parece...
El caso es que debo poner a funcionar el programa en el tiempo mas corto posible mientras lo migro a FW...

Gracias de Nuevo y acepto mas sugerencias...

Giancarlo J. Sabattino S.

[Antonio Linares]

Giancarlo,

Este ejemplo se construye bien con FWH/samples/build.bat y funciona correctamente:

Code: Select all

function Main()

   SET COLOR TO "W/B"
   CLEAR
   @ 10, 10 SAY "Hello world"

return nil

[gsabattino]

Antonio, Gracias de nuevo...

El caso es que el programa en cuestion no lo hice yo, y no se que brujeria hay dentro de el... lo que si te puedo garantizar es que el mismo fuente compilado con Clipper5 y con xHarbour tienen comportamientos en pantalla/teclado distintos... Pareciera que las funciones SetColor() y Scroll() no se comportan igual, así como tambien los comandos Clear y @x,y Say... al menos con xHarbour 0.993... mañana compilare con xHarbour 1.2001 a ver como se comporta y comento...