Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   Сохранение (http://forum.oszone.net/showthread.php?t=30464)

Soldie 31-05-2003 14:18 208747

Кто нибудь напишите мне как сохранить поле memo в файл *.txt, но чтобы при следующим сохранении он не заменял файл, а продолжался.
Зараее спавибо.

DimSher 02-06-2003 05:54 208748

Soldier
Просто после команды Assign(file) пишешь не Write или Rewrite, а  Append(файловая переменная) - открытие файла на запись, указатель файла становится в его конец. (Файл должен существовать)
Почитай дядю Фаронова, он хорошо про Pascal/Delphi пишет

Song 07-06-2003 10:51 208749

Код:

Procedure MySave(FName: String; Str: TStrings);
Var Str2: TStringList;
Begin
 Str2:=TStringList.Create;
 With Str2 Do
  try
   LoadFromFile(FName);
   AddStrings(Str);
   SaveToFile(FName2);
  finally
   Free;
  end;
End;

....

MySave('1.txt',Memo1.Lines);



Время: 18:35.

Время: 18:35.
© OSzone.net 2001-