Como se extrae texto Unicode

[Bael_Balzac]

Como se extrae texto Unicode de un archivo de bloc de notas,ejemplo:
&$%2りゅうじ)=(は/*´´うごけないçÇ.-
para que se vea como:
りゅうじ
は
うごけない
El archivo contiene cuatro lineas de longitudes diferentes,9000 a 12000 caracteres aproximadamente cada uno.

[[duilioisola]]

¿A qué te refieres con extraer?
¿Quieres leerlo en una variable?
¿Quieres copiarlo a un memo?

Normalmente creas un TStrings o algo parecido y utilizas LoadFromFile(Archivo);

Código Delphi [-]
Memo.Lines.LoadFromFile('C:\Text.txt');