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 )

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