WriteTxtFile - это процедура ( 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( { Date() + ' ' + Time() + ' начало заполнения документа AND за ' + data }, name, tmp_path, true )

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