Errores caracteres especiales en nombre de archivo

Posts: 302

Joined: Fri Apr 23, 2010 04:30 AM

Errores caracteres especiales en nombre de archivo
Posted: Tue Jun 12, 2012 12:20 AM

Esta pasando esto con Harbour con las nuevas versiones de HARBOUR con BCC, MVC y MINGW cuando uso caracteres acentuados para crear archivos estos se cambian por otros por lo cual cuando intento abrirlos no puedo hacerlo por que el nombre ha cambiado, por lo que he tenido que volver a las versiones 17025 para Bcc y Mvc y 17003 para mingw.

Ejemplo:

Code (fw): Select all Collapse

     cFilename :="PÓLIZA DIRECTORES Y ADMINISTRADORES.pdf"

      oQryFind = TDolphinQry():New( "select file from files where id=" + ClipValue2Sql( uValue ), oQry:oServer )

      nHandle := FCreate( cFilename  )

      IF FError() # 0
         MsgInfo( "Error grabando Archivo " + AllTrim( cfilename ) )
         RETURN
      ENDIF

      FWrite( nHandle, oQryFind:file, Len( oQryFind:file ) )
      FClose( nHandle )

      ShellExecute(,"Open","'"+cFilename+"'",,,3) // al tratar de abrirlo no lo abre porque el nombre del archivo creado no tiene los mismos caracteres

El nombre que crea es "P╙LIZA DIRECTORES Y ADMINISTRADORES.pdf" donde la Ó se cambia por ╙ y asi pasa con los demas caracteres tildados con la Ñ y ñ.

Por favor notificarle al equipo de Harbour para que revisen.

Slds,

Nicanor Martinez M.
Auditoria y Sistemas Ltda.
MicroExpress Ltda.
FW + FWH + XHARBOUR + HARBOUR + PELLES C + XDEVSTUDIO + XEDIT + BCC + VC_X86 + VCC_X64 + MINGW + R&R Reports + FastReport + Tdolphin + ADO + MYSQL + MARIADB + ORACLE
nnicanor@yahoo.com

nnicanor

Posts: 302

Joined: Fri Apr 23, 2010 04:30 AM

(Resuelto) Errores caracteres especiales en nombre de archiv
Posted: Tue Jun 19, 2012 02:08 AM

Después de buscar en los grupos de desarrollo de Harbour encuentro la respuesta, en las nuevas versiones se debe seleccionar el Codepage correcto, aqui esta el ejemplo para usar caracteres acentuados en español en los nombres de archivos.

REQUEST HB_LANG_ES
REQUEST HB_CODEPAGE_ESWIN

Function Main()

SET( _SET_CODEPAGE, "ESWIN" )
...
...

Saludos,

Nicanor

Nicanor Martinez M.
Auditoria y Sistemas Ltda.
MicroExpress Ltda.
FW + FWH + XHARBOUR + HARBOUR + PELLES C + XDEVSTUDIO + XEDIT + BCC + VC_X86 + VCC_X64 + MINGW + R&R Reports + FastReport + Tdolphin + ADO + MYSQL + MARIADB + ORACLE
nnicanor@yahoo.com

Patricio Avalos Aguirre

Posts: 1074

Joined: Fri Oct 07, 2005 01:56 PM

Re: Errores caracteres especiales en nombre de archivo
Posted: Thu Jun 21, 2012 01:13 PM

hola

Se agradece la información

Saludos
Patricio

__________________________________________________________________
Version: Harbour 3.2.0dev (r1307082134),Compiler: Borland C++ 5.8.2 (32-bit)
PCode version: 0.3, FWH 13.2
http://www.sialm.cl

FiveTech Support Forums

Continue the discussion