Процедура создает текстовый файл и заполняет его массивом строк

Процедура описана в файле QrAddFn.pas ( TQREvWriteTxtFile )

WriteTxtFile(<StrArr>, <fname>, [<fpath>], [no_msg], [NeedAppend], [Convert='OEM/UTF8'])

Convert = "OEM" - преобразование в OEM кодировку

Convert = "UTF8" - преобразование в UTF8 кодировку

Создает текстовый файл, заполняя его массивом строк из первого параметра

Второй аргумент - имя файла

Третий ( необязательный параметр ) - путь к файлу (по умолчанию с:\)

Четвертий - не задавать вопросы после формирования файла

Примеры

WriteTxtFile( { 'файл-флаг' }, 'pos_f_1.spr', '\\Terminal\D\Fabius\Frontol', true )

WRITETXTFILE