WRITETXTFILE
Материал из Фабиус wiki
(перенаправлено с «WriteTxtFile»)
WRITETXTFILE - это процедура ( QrAddFn.pas TQREvWriteTxtFile )
Создает текстовый файл и заполняет его массивом строк
WRITETXTFILE( <StrArr>, <fname>, [<fpath>], [no_msg], [NeedAppend], [Convert='OEM/UTF8'] )
Convert = "OEM" - преобразование в OEM кодировку
Convert = "UTF8" - преобразование в UTF8 кодировку
Создает текстовый файл, заполняя его массивом строк из первого параметра
Второй аргумент - имя файла
Третий ( необязательный параметр ) - путь к файлу (по умолчанию с:\)
Четвертый - не задавать вопросы после формирования файла
Примеры
writetxtfile( { xml }, 'out.xml', temppath, true,, 'utf8' )
WRITETXTFILE( { 'файл-флаг' }, 'pos_f_1.spr', '\\Terminal\D\Fabius\Frontol', true )
WRITETXTFILE( { Date() + ' ' + Time() + ' начало заполнения документа AND за ' + data }, name, tmp_path, true )