usando TTxtFile() como crear archivo Texto UTF8 SIN BOM

[lubin]

Buenas noches

Estoy usando la clase TTxFile() y necesito crear un archivo texto de varias líneas pero debe ser con formato: UTF8- NO BOM

Como se puede hacer con esta clase o de que otro modo se puede crear usando Harbour

Gracias

Lubin

[lubin]

Buen dia con todos

Alguna idea como crear este archivo texto con formato UTF8-SIN BOM, por favor,

Quizas creando el archivo y luego convertirlo, ?' o usando alguna función

Gracias por el salvavidas que puedan lanzar...

Lubin

[karinha]

haga una busqueda por TXTFILE.

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=31456&p=182756&hilit=TXTFILE#p182756

Saludos.

[lubin]

Gracias Karinha.

Si manejo el TXTFILE pero necesito que al generar el archivo, debe ser grabado en formato UTF8-NO BOM para enviarlo a una webservice
de lo contario me lo rechaza. la verdad no tengo ni idea como lograrlo en FW

haga una busqueda por TXTFILE.

http://forums.fivetechsupport.com/viewtopic.php?f=3&t=31456&p=182756&hilit=TXTFILE#p182756

Saludos.

[karinha]

UTF8 - BOM(Byte order mark) no lo sé. Saludos.

[csincuir]

Hola Lubin,
Has probado con la funcion de Harbour hb_strToUTF8()

Yo lo hago de esta forma:

Code: Select all  Expand view

   cXml := hb_strToUTF8( cXml )
   cArchivo = cFilePath( GetModuleFileName( GetInstance() )) + "Xmls\archivo"+".xml"
   Ferase(cArchivo)
   oFile := TFile():Create(cArchivo)
   oFile:PutStr( cXml )
   oFile:End()
 

Espero te sirva.

Carlos.

[lubin]

Carlos

Utilice el StrToutf8 pero no grabe asi el archivo, Voy a probarlo hoy, espero que salga bien

Gracias por el tip!!!!

Lubin