Ejemplo de Diucl (UclDecompres)

[jangel_ramirezm]

hola Saludos a todos y gracias por leer este hilo

Bueno solo para ampliar un poco mas la información que puse anteriormente
necesito exportar los datos de un query a un archivo y que lo "Encripte"(no se si sea el termino correcto)eso ya lo solucioné usando un ClientDataset,un datasetprovider,un TStringlist y la funcion uclcompress, que mostré en el código de arriba.

mi problema es cuando quiero obtener de vuelta esos datos al usar
ucldecompress pierde los datos esto lo hago con uclddecompress y un Tstringlist

gracias por su ayuda y tiempo. ojalá alguien que hay trabajado con Diucl me pudiera ayudar

[[egostar]]

Desconozco el componente al que haces mención pero de entrada no me hace lógica lo que estas haciendo con esta porción de código:

Código Delphi [-]
muestra:= UclDecompressStrW ('c:\PRUEBA2.ENC');;
lista.Text := muestra;

Me imagino que el problema está en que estas pasando la información a un string y luego a un TStringList, no me suena lógico porque no de forma directa.....

Código Delphi [-]
lista.Text := UclDecompressStrW ('c:\PRUEBA2.ENC');;

Salud OS

Edito: Aunque tampoco sé si la asignación que se hace sea la correcta ........

[jangel_ramirezm]

gracias egostar por tu comentario

esa porción de código solo está asi para yo enterderme un poco mas;
aunque si dejo la asignación directa hace lo mismo, se pierden los datos
tal vez es eso que la signacion de un widestring a string pierde datos.
pero lo malo que ucl solo trabaja con Wstring y Astring.

gracias de Nuevo.