飘云阁

 找回密码
 加入我们

QQ登录

只需一步,快速开始

查看: 7057|回复: 1

[易语言] 求个易语言主线程调用call例子

[复制链接]
  • TA的每日心情
    无聊
    2018-3-5 16:45
  • 签到天数: 2 天

    [LV.1]初来乍到

    发表于 2018-4-6 22:44:08 | 显示全部楼层 |阅读模式
    10飘云币
    想找个主线程调用call的例子,不要用模块的

    PYG19周年生日快乐!
  • TA的每日心情
    开心
    2021-8-10 18:41
  • 签到天数: 419 天

    [LV.9]以坛为家II

    发表于 2018-4-7 12:27:57 | 显示全部楼层
    .版本 2

    .子程序 插件_调用DLL, 文本型
    .参数 DLL库文件名, 文本型
    .参数 调用命令名, 文本型
    .参数 参数1, 文本型, 可空
    .参数 参数2, 文本型, 可空
    .参数 参数3, 文本型, 可空
    .参数 参数4, 文本型, 可空
    .参数 参数5, 文本型, 可空
    .局部变量 标题文本, 文本型
    .局部变量 模块句柄, 整数型
    .局部变量 函数地址, 整数型
    .局部变量 返回数据, 文本型
    .局部变量 调用数组, , , "5"

    模块句柄 = LoadLibraryA (DLL库文件名)

    .如果真 (模块句柄 ≠ 0)
        函数地址 = GetProcAddress (模块句柄, 调用命令名)
        .如果真 (函数地址 ≠ 0)
            返回数据 = 指针到文本 (调用DLL (函数地址, 取文本型地址 (参数1), 取文本型地址 (参数2), 取文本型地址 (参数3), 取文本型地址 (参数4), 取文本型地址 (参数5)))
            FreeLibrary (模块句柄)

        .如果真结束

    .如果真结束
    返回 (返回数据)


    .版本 2

    .子程序 调用DLL, 整数型, , 动态调用DLL中的函数命令,支持传址参数,返回函数的返回值(变量地址)
    .参数 子程序地址, 整数型
    .参数 参数1, 整数型, 可空
    .参数 参数2, 整数型, 可空
    .参数 参数3, 整数型, 可空
    .参数 参数4, 整数型, 可空
    .参数 参数5, 整数型, 可空
    .参数 参数6, 整数型, 可空
    .参数 参数7, 整数型, 可空
    .参数 参数8, 整数型, 可空
    .参数 参数9, 整数型, 可空
    .参数 参数10, 整数型, 可空
    .参数 参数11, 整数型, 可空
    .参数 参数12, 整数型, 可空
    .参数 参数13, 整数型, 可空
    .参数 参数14, 整数型, 可空
    .参数 参数15, 整数型, 可空

    置入代码 ({ 86, 190, 15, 0, 0, 0, 141, 77, 8, 141, 76, 241, 252, 139, 65, 4, 133, 192, 116, 2, 255, 49, 78, 131, 233, 8, 133, 246, 117, 239, 255, 85, 8, 94, 201, 194, 124, 0 })
    返回 (0)

    是不是这个??

    PYG19周年生日快乐!
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 加入我们

    本版积分规则

    快速回复 返回顶部 返回列表