易语言插件授权源码

系统结构:检测授权状态,GetNewInf,ProcessNotifyLib,取易模块目录,运行功能通知,初始化易模块列表,添加子夹,引用易模块,Call_3,数组_取数据指针,数组_取指针,变量_取数据指针,变量_取指针,时间_取日期时间,PathFindFileNameA,GetLocalTime,GetDateFormatA,GetTimeFormatA,

======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ 检测授权状态
           |  |
           |  |------ GetNewInf
           |  |
           |  |------ ProcessNotifyLib
           |  |
           |  |------ 取易模块目录
           |  |
           |  |------ 运行功能通知
           |  |
           |  |------ 初始化易模块列表
           |  |
           |  |------ 添加子夹
           |  |
           |  |------ 引用易模块
           |  |
           |  |------ Call_3
           |  |
           |  |------ 数组_取数据指针
           |  |
           |  |------ 数组_取指针
           |  |
           |  |------ 变量_取数据指针
           |  |
           |  |------ 变量_取指针
           |  |
           |  |------ 时间_取日期时间
           |  |
           |  |
======窗口程序集_窗口1
           |  |
           |  |------ _窗口1_创建完毕
           |  |
           |  |------ _窗口1_尺寸被改变
           |  |
           |  |------ _超级列表框1_左键单击表项
           |  |
           |  |------ _超级列表框1_右键单击表项
           |  |
           |  |------ _添加模块_被选择
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   PathFindFileNameA
           |  |
           |  |---[dll]------   GetLocalTime
           |  |
           |  |---[dll]------   GetDateFormatA
           |  |
           |  |---[dll]------   GetTimeFormatA

调用的DLL命令:

.DLL命令 PathFindFileNameA, 文本型, "shlwapi.dll", "PathFindFileNameA", , 成功返回路径文本指针地址
    .参数 pszPath, 文本型

.DLL命令 GetLocalTime, , "kernel32.dll", "GetLocalTime", 公开, 获取当前本地时间，这个函数没有返回值或提供扩展的错误信息。
    .参数 lpSystemTime, SYSTEMTIME, , 系统时间结构变量，用于保存当前系统日期和时间。

.DLL命令 GetDateFormatA, 整数型, "kernel32.dll", "GetDateFormatA", 公开, 对一个系统日期进行格式化，返回格式化后lpDateStr缓冲区中的字符数量(当cchDate为0时返回所需缓冲区长度)，零表示出错。
    .参数 Locale, 整数型, , 区域ID
    .参数 dwFlags, 整数型, , 格式化标志，如果指定了lpFormat参数，那么本参数应该为零。参考常量：DATE_
    .参数 lpDate, SYSTEMTIME, 传址, 被转换的系统日期结构。
    .参数 lpFormat, 文本型, , 特定的日期格式文本，如果没有特定的日期格式，请提供“字符(0)”。（大写HH表示24小时格式，小写hh表示12小时格式）
    .参数 lpDateStr, 文本型, , 转换后的日期文本缓冲区
    .参数 cchDate, 整数型, , 日期文本缓冲区长度，如果为零则函数会返回需要缓冲区的大小。

.DLL命令 GetTimeFormatA, 整数型, "Kernel32.dll", "GetTimeFormatA", 公开, 对一个系统时间进行格式化，返回格式化后lpTimeStr缓冲区中的字符数量(当cchTime为0时返回所需缓冲区长度)，零表示出错。
    .参数 Locale, 整数型, , 区域ID
    .参数 dwFlags, 整数型, , 格式化标志，如果指定了lpFormat参数，那么本参数应该为零。参考常量：DATE_
    .参数 lpTime, SYSTEMTIME, 传址, 被转换的系统时间结构。
    .参数 lpFormat, 文本型, , 特定的时间格式文本，如果没有特定的时间格式，请提供“字符(0)”。
    .参数 lpTimeStr, 文本型, , 转换后的时间文本缓冲区
    .参数 cchTime, 整数型, , 时间文本缓冲区长度，如果为零则函数会返回需要缓冲区的大小。