Aplicación se cierra al ejecutar HB_HashIni()

Aplicación se cierra al ejecutar HB_HashIni()

Postby MarioG » Thu May 11, 2017 11:10 pm

Hola Gente
Tengo una aplicación que hace lo siguiente:
Al ejecutarse verifica que exista un archivo hash.ini, si es no, pide para introducir parámetros varios, como por ej. el camino de las BD
Esta aplicación tiene sus años, la última compilación es de OCT'16 y la compile con FW 1204 y xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 9421)
Ahora pretendo hacer un modificación y zas! me salta el error del título
Los pasos para verificar e intentar detectar el error son:
- borro el archivo hash.ini; ejecuto la app, pide los datos a incluir, se ejecuta la linea HB_WriteIni(...), salgo y el archivo se generó
- ejecuto la app, Verifica mediante File(...hash.ini) y por T, antes de ejecutar HB_ReadIni(...), incluí a modo de prueba, FOpen(), devuelve el nHandle, luego hago FClose( nHandle) devuelve T. En la linea siguiente ejecuta HB_ReadIni(...) y zas!! hasta luego sin mas. Lo puse dentro de un TRY CATCH, no captura error alguno
Se me agotaron las ideas!
Alguna pista?

muchas gracias
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR

Re: Aplicación se cierra al ejecutar HB_HashIni()

Postby Antonio Linares » Fri May 12, 2017 7:01 am

Mario,

> incluí a modo de prueba, FOpen(), devuelve el nHandle, luego hago FClose( nHandle)

Prueba a quitar esas llamadas
regards, saludos

Antonio Linares
www.fivetechsoft.com
User avatar
Antonio Linares
Site Admin
 
Posts: 41858
Joined: Thu Oct 06, 2005 5:47 pm
Location: Spain

Re: Aplicación se cierra al ejecutar HB_HashIni()

Postby MarioG » Fri May 12, 2017 1:49 pm

Antonio;
mucas gracias por ocuparte
Esas llamadas las incluí despues de encontrar que el fallo se daba en HB_RedIni()
Acabo de comentar todo. Se sale de app en HB_ReadIni()

Tambien incluí Memoread, el error sigue en HB_ReadIni()
Code: Select all  Expand view
     try
         ? "camino",scPathSiGeCo+scIniFile
         ? (n:= FOpen( scPathSiGeCo+scIniFile ))
         ? FClose( n )
         ? cVar:=MEMOREAD("d:\mgideas\sigeco\mgigo32.cfg")
         ? File( scPathSiGeCo+scIniFile )
         ? FileAttr( scPathSiGeCo+scIniFile )
         WQout({ cVar })
         shIni:= HB_ReadINI( (scPathSiGeCo+scIniFile),,,FALSE ) //scPathSiGeCo+
      catch oErr
         ? oErr:Description
      end
 
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
User avatar
MarioG
 
Posts: 1380
Joined: Fri Oct 14, 2005 1:28 pm
Location: Resistencia - Chaco - AR


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 29 guests