Write Ax Data to Txt in various Format

Public void sendTo_file(Editor  e)

{

    Filename filename;

    TextIo io;

    int i = strFind(e.path(), '\\', strLen(e.path()), -strLen(e.path()));

    str defaultName = subStr(e.path(), i+1, strLen(e.path()));

    ;

    filename = WinAPI::getSaveFileName(0, ['Text','*.txt'], '', "@SYS56237", 'txt', defaultName );

    if (filename)

    {

        // BP deviation documented

        io = new TextIo(filename, 'W', 65001); // Write the file in UTF8

        io.write(EditorScripts::getSelectedText(e));

    }

}

> File for our future reference.

/*

UTF Encoding Format

*/

#define.utf7Format (65000)

#define.utf8Format (65001)

#define.utf16Format (1200)

#define.utf32format (12000)

#define.usascii (20127)