[<Sergio>]

Empezado por roman

Podrías usar un StringList:

Código Delphi [-]
 var
   Archivo: TStringList;
 
 begin
   Archivo := TStringList.Create;
   Archivo.LoadFromFile('C:\X Muestra\Layout.txt');
 
   {
     Aquí accedes a las líneas del archivo por índice:
 
     Archivo[0], Archivo[1], Archivo[2],...
 
     y puedes cambiar cada una por separado
   }
 
   Archivo.SaveToFile('C:\X Muestra\Layout.txt');
   Archivo.Free;
 end;

// Saludos

Pues es una de las mejores respuestas que he visto, realmente le has simplificado las cosas.