Hola alquimista.
Probá si con la función
UTF8ToAnsi se muestra correcto:
Código Delphi
[-]
...
with TStringList.Create do
try
LoadFromFile('Tu_Archivo_UTF8.txt');
ListBox1.Items.Text := UTF8ToAnsi(Text);
finally
Free;
end;
...
Lamentablemente tengo que salir ahora y no puedo probarlo
Saludos.
