CODIFICACION UTF-8

Post Reply
Laurel
Posts: 65
Joined: Fri Oct 21, 2005 8:07 pm
Location: México

CODIFICACION UTF-8

Post by Laurel »

Hola a todos!

¿Alguien puede ayudarme para saber como puedo convertir un archivo .TXT a UTF-8?

Mil gracias de antemano

Laurel :)
Laurel
User avatar
mastintin
Posts: 1502
Joined: Thu May 27, 2010 2:06 pm

Re: CODIFICACION UTF-8

Post by mastintin »

puedes usar AnsiToWide() para ello .
Sería algo asi.

Code: Select all


Function TxttoUtf( cFile ,cNewfile)
       memowrite( cNewFile , AnsitoWide( Memoread( cFile ) ) )
Return nil

 
User avatar
karinha
Posts: 4882
Joined: Tue Dec 20, 2005 7:36 pm
Location: São Paulo - Brasil

Re: CODIFICACION UTF-8

Post by karinha »

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
 
http://www.pctoledo.com.br/forum/viewto ... _STRTOUTF8

Saludos
João Santos - São Paulo - Brasil
Post Reply