Leer 4 Lineas de dos Archivo .txt

[ecfisa]

Empezado por wcbs

La cuarta y quinta linea son las que quiero que me muestre el programa

Hola wcbs.

Me parece que te estas complicando con algo que es muy simple.

Un ejemplo:

Código Delphi [-]
var
  linea4, linea5: string;
begin
  with TStringList.Create do
  try
    LoadFromFile('C:\RUTA\C2006.DAT');
    linea4 := Strings[3];
    Linea5 := Strings[4]; 
    // aquí ya tenes las lineas deseadas en las variables linea4 y linea5
  finally
    Free;
  end;
  ShowMessage(linea4+#10+linea5); // mostrarlas

Saludos.