Текущий архив: 2004.09.05;
Скачать: CL | DM;

Вниз

Как удалить строку из файла?   Найти похожие ветки 

← →
Makssim   (2004-08-18 14:50) [0]

сабж. Файл текстовый

---

← →
ssk ©   (2004-08-18 14:52) [1]

примерно так:

function RemoveLine(FileName: Shortstring; LineNumber: integer): boolean;
var
 List: TStrings;
begin
 List:=TStringList.Create;
 try
   List.LoadFromFile(FileName);
   List.Delete(LineNumber);
   List.SaveToFile(FileName);
   Result:=True;
 except
   Result:=False;
 end;
 List.Free;
end;

нумерация строк начинается с 0

---

← →
Makssim   (2004-08-18 14:55) [2]

ssk ©   (18.08.04 14:52) [1]
благодарю

---

Страницы: 1 вся ветка

Текущий архив: 2004.09.05;
Скачать: CL | DM;

Наверх

Память: 0.46 MB
Время: 0.056 c