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;
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;