![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
добавить строку в конец txt файла [D5, Win95/98]
ZPS © (2002-02-27 20:51:00)Вопрос ламерский, но что-то у меня не получается.
В файле несколько сотен строк.
Нужно добавить в конец ещё одну.
Как это сделать ?
Aleks1 (2002-02-28 03:28:00) [1]> Юрий Зотов
А стоит ли сначала читать куда-то, создавая новый буфер, потом записывать из него в файл, если для текстовых файлов есть функция Append?
ZPS (2002-02-27 21:12:00) [2]Ой, дурак....
Я забыл про append(f). спать надо бальше :)
Юрий Зотов, а такого я не знал.
Всем спасибо!
Юрий Зотов (2002-02-27 21:02:00) [3]with TStringList.Create do
try
LoadFromFile("C:\MyFile.txt");
Add("New string");
SaveToFile("C:\MyFile.txt")
finally
Free
end;
oomneeq (2002-02-27 21:01:00) [4]var
f: TextFile;
begin
if OpenDialog1.Execute then
begin { open a text file }
AssignFile(f, OpenDialog1.FileName);
Append(f);
Writeln(f, "I am appending some stuff to the end of the file.");
{ insert code here that would require a Flush before closing the file }
Flush(f); { ensures that the text was actually written to file }
CloseFile(f);
end;
end;
(C) Delphi Help File - very usefull for Ламер
try it!