Lectura de un archivo plano
 

Hola amigos.

Tengo un archivo Texto plano que requiero leer para incorporarlo a un TMemo.

El punto es que al leer las lineas de este archivo .. con las instrucciones..
***
if SeekEoln(f) then
Readln;
Read( f, sLineas );
***

.. me trunca los espacios en blanco iniciales del texto. Con lo cual me queda todo el texto indentado a la isquierda.

"**El efecto es el mismo que el que le ocurre al trozo de codigo incorporado en este mensaje., el cual lo escribi con espacios hacia la derecha. Y aun asi lo pego a la isquierda."

alguien save como hacer para que el "READ()" concidere los espacios en blanco iniciales.

Gracias


Saludos
Jose Miguel B.

Por qué no utilizas el método "LoadFromFile" del Tmemo.

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Lines.LoadFromFile('E:\Seguro\CCT_0606\datos.txt');
end;

Un Saludo.

Funciono de maravillas..

Gracias.
Saludos
Jose Miguel B.