ANTICHAT — форум по информационной безопасности, OSINT и технологиям

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils, Classes;

var
text: TStringList;

begin
text:=TStringList.Create;
text.LoadFromFile('e:\1.txt'); //путь к файлу
text.Delete(12-1); // -1 потому, что нумерация строк начинается с 0, а не с 1
text.Insert(12-1, 'Новая строка');
text.SaveToFile('e:\1.txt'); //путь к файлу
text.Free;
end.