2 replies to this topic

[razadi]

Amigos, buen día.

Tengo el siguiente problema, en una base de datos de firebird, se guarda una archivo blob como texto, en este guardo cierta información, donde últimamente han esta metiendo texto como "BAÑOS DE DORMITORIO...". etc. ñ, acentos...

esta información la bajo en un archivo de texto, de la siguiente manera:

delphi

var
   lista: TStringList;
begin
   lista := TStringList.Create;
   try
      lista.add({Valor recuperado por un query}) ;
      lista.SaveToFile(archivo.txt);
   finally
      lista.free;
   end

y el archivo al abrirlo me da esta salida

...BAЏS  DE DORMITORIO...

donde esta mi error????

de antemano gracias....

[Héctor Randolph]

Hola Razadi

Seguramente tienes problemas de codificación.

Lo primero es investigar el juego de caracteres del texto.

Por ejemplo, si el texto fue codificado como UTF8 entonces tendrás que recurrir a las funciones UTF8Decode.

Saludos

[razadi]

Ya esta solucionado, buscando y buscando, encontré este link del buen amigo egostar http://www.delphiacc...nsi-como-utf-8/


Lo que pasa es que la información viene en ANSI, y así tal cual se graba con el SaveToFile; sólo habría que cambiar a UTF8 y listo.

gracias nuevamente