WRITELINETOFILE - История изменений

Hisava в 07:45, 14 октября 2025

2025-10-14T07:45:33Z

2018-09-04T04:50:33Z

‎Текст программы

2017-05-05T04:50:25Z

2017-01-18T05:47:32Z

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

2016-11-13T19:49:39Z

‎Пример

2016-11-13T19:48:42Z

‎Пример

2016-11-13T19:48:19Z

‎Пример

2016-11-13T19:48:09Z

‎Пример

2016-11-13T19:47:59Z

‎Пример

2016-11-13T19:47:49Z

‎Пример

@@ Строка 47: / Строка 47: @@
    aa := '|}'
    '''WriteLineToFile'''( aa, file_name, TempPath, false )
 = Смотрите также =

@@ Строка 48: / Строка 48: @@
    '''WriteLineToFile'''( aa, file_name, TempPath, false )
-= Текст программы =
+= Текст =
   parameters str_line, name, path, no_msg := true
@@ Строка 89: / Строка 89: @@
   [[WriteTxtFile]]( aa, name, path, no_msg )
 = Смотрите также =
 [[Полезные функции]]
 [[Функции Delphi]]

@@ Строка 1: / Строка 1: @@
-WrieLineToFile - это программа из справочника [[R266]]
+[[WRITELINETOFILE]] - это программа из справочника [[R266]]
+ Запись строки в файл
-WRITELINETOFILE( str_line,  name,  path  [, no_msg := true] )
+[[WRITELINETOFILE]]( str_line,  name,  path  [, no_msg := true] )
-−
-Запись строки в файл
 str_line - строка
@@ Строка 91: / Строка 89: @@
   [[WriteTxtFile]]( aa, name, path, no_msg )
 [[Функции Delphi]]

@@ Строка 93: / Строка 93: @@
 = Смотрите также =
 [[Функции Delphi]]
 [[Полезные функции]]

@@ Строка 31: / Строка 31: @@
    file_name := r169_kod + r166_lvl + '.txt'
-   [[WriteLineToFile]]( '{| class = "wikitable"', file_name, TempPath )
+   '''WriteLineToFile'''( '{| class = "wikitable"', file_name, TempPath )
-   [[WriteLineToFile]]( '|-', file_name, TempPath )
+   '''WriteLineToFile'''( '|-', file_name, TempPath )
-   [[WriteLineToFile]]( '! Идентификатор реквизита || Наименование ', file_name, TempPath )
+   '''WriteLineToFile'''( '! Идентификатор реквизита || Наименование ', file_name, TempPath )
    fld := { 'IDENT', 'PNAME' }
@@ Строка 40: / Строка 40: @@
    aa := [[SqlToArr]]( sql, fld, ReflisPath )
-   if !IsEmpty( aa )
+   if ![[IsEmpty]]( aa )
      for i := 1 to len( aa )
-       WriteLineToFile( '|-', file_name, TempPath )
+       '''WriteLineToFile'''( '|-', file_name, TempPath )
-       WriteLineToFile( '|' + aa[i,1] + ' || ' + StrTran( StrTran( aa[i,2], ';', ' ' ), '|', '' ), file_name, TempPath )
+       '''WriteLineToFile'''( '|' + aa[i,1] + ' || ' + StrTran( StrTran( aa[i,2], ';', ' ' ), '|', '' ), file_name, TempPath )
      next
    endif
    aa := '|}'
-   WriteLineToFile( aa, file_name, TempPath, false )
+   '''WriteLineToFile'''( aa, file_name, TempPath, false )
 = Текст программы =

@@ Строка 25: / Строка 25: @@
    // выбор уровня
    r166_lvl := [[ChoiceRefr]]( 'R166', 'LVLNUM', { 'LVLNUM', 'PNAME' }, [ KINDDOC = '] + r169_kod + [' ], ~Title := 'Выберите уровень' )
-   if Empty( r166_lvl )
+   if [[Empty]]( r166_lvl )
      return
    endif

@@ Строка 19: / Строка 19: @@
    // выбор документа
    r169_kod := [[ChoiceRefr]]( 'R169', 'KOD', { 'KOD', 'PNAME' }, ~Title := 'Выберите один документ' )
-   if Empty( r169_kod )
+   if [[Empty]]( r169_kod )
      return
    endif