Hola amigo susviela
Prueba , haber si funciona
REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
HB_SetCodePage( "PT850" )
HB_LANGSELECT("PT")
Añade
SET CODEPAGE TO UNICODE
salva el Prg como "UTF-8"
Saludos
Mustafa
*-----------------------------------------------------------------*
Olá meu amigo
Teste, se funcionar
REQUEST HB_LANG_PT
REQUEST HB_CODEPAGE_PT850
hb_StrToUtf8( sData, sCodepageIN ) Translation sData of sCodepageIN in utf8
hb_Utf8ToStr( sData, sCodepageOUT ) Translation sData from utf8 to sCodepageOUT
hb_Utf8Len( sData ) This and the following functions are analogs of
hb_utf8Chr( n ) the standard string functions Len(),
hb_utf8Asc( sData ) Chr(), Asc (), etc., but for rows in a
hb_utf8Substr( sData, n1, n2 ) utf8 encoding. As it is known, in utf8
hb_utf8Left( sData, n1 ) one character may be encoded with more
hb_utf8Right( sData, n1 ) than one byte. These functions operate with
hb_utf8Stuff( sData, n1, n2, cNew ) the number of symbols rather than bytes.
hb_utf8Peek( sData, n1 )
hb_utf8Poke( sData, n1, n )