Hola a todos!
¿Alguien puede ayudarme para saber como puedo convertir un archivo .TXT a UTF-8?
Mil gracias de antemano
Laurel
CODIFICACION UTF-8
Re: CODIFICACION UTF-8
puedes usar AnsiToWide() para ello .
Sería algo asi.
Sería algo asi.
Code: Select all
Function TxttoUtf( cFile ,cNewfile)
memowrite( cNewFile , AnsitoWide( Memoread( cFile ) ) )
Return nil
Re: CODIFICACION UTF-8
Code: Select all
REQUEST HB_CODEPAGE_PTISO //-> Para UTF8
LOCAL cUTF8, cStrUtf8, cAsc, cUTF8Fin
cStrUtf8 := "Texto em caracteres UTF-8: (dígrafo BR)'ção',(dígrafo espanhol-enhe)'ñ',(trema)'Ü',(ordinais)'ªº',(ligamento s+z alemão)'ß'."
cUTF8 := HB_STRTOUTF8( cStrUtf8 ) // funcao do XHARBOUR
cAsc := HB_UTF8TOSTR( cUtf8 )
cUTF8Fin := cAsc
? cUTF8Fin
Saludos
João Santos - São Paulo - Brasil