易语言取自身全路径源码

系统结构:系统_取运行全路径,系统_取运行全路径1,命令行缓冲区_,复制字符串_,取模板完整路径_,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |
======程序集1
           |  |
           |  |------ 系统_取运行全路径
           |  |
           |  |------ 系统_取运行全路径1
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   命令行缓冲区_
           |  |
           |  |---[dll]------   复制字符串_
           |  |
           |  |---[dll]------   取模板完整路径_

调用的DLL命令:

.DLL命令 命令行缓冲区_, 整数型, "kernel32", "GetCommandLineA"

.DLL命令 复制字符串_, 整数型, "kernel32.dll", "lstrcpyA", , lstrcpyA
    .参数 文本1, 整数型, , RetVal
    .参数 文本2, 整数型, , Ptr

.DLL命令 取模板完整路径_, 整数型, "kernel32.dll", "GetModuleFileNameA", , 获取一个已装载模板的完整路径名称  如执行成功，返回复制到lpFileName的实际字符数量；零表示失败。会设置GetLastError
    .参数 模块句柄, 整数型, , 一个模块的句柄。可以是一个DLL模块，或者是一个应用程序的实例句柄
    .参数 文件名缓冲区, 文本型, , 指定一个字串缓冲区，要在其中容纳文件的用NULL字符中止的路径名，hModule模块就是从这个文件装载进来的
    .参数 缓冲区大小, 整数型, , 装载到缓冲区lpFileName的最大字符数量;