Текущая версия на 16:23, 29 марта 2019

WRITELINETOTXTFILE - это программа из справочника R266

Запись строки в текстовый файл

WRITELINETOTXTFILE( path, name, str_line )

path - путь к файлу

name - имя файла

str_line - строка

Смотрите также

@@ Строка 8: / Строка 8: @@
 str_line - строка
-= Текст =
- parameters path, name, str_line
- local aa, log_file
- aa := {}
- try
-   log_file := [[AssignFile]]( path + name )
-   if [[Empty]]( log_file )
-     return
-   endif
-   [[TextReset]]( log_file )
-   while ![[TextEof]]( log_file )
-     [[Aadd]]( aa, [[ReadLn]]( log_file ) )
-   end
- finally
-   if ![[Empty]]( log_file )
-     [[CloseFile]]( log_file )
-   endif
- end
- [[Aadd]]( aa, [[Date]]() + ' ' + [[Time]]() + ' ' + str_line )
- [[WriteTxtFile]]( aa, name, path, true )
 = Смотрите также =
 [[Полезные функции]]