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 ........