来个熟练使用汇编的,帮改一下回调函数.

洋Hay

  

子程序名	返回值类型	公开	备 注
stdcall_to_cdecl	整数型		解决易语言不支持cdecl（返回的是函数指针）
参数名	类 型	参考	可空	数组	备 注
lpfunction	整数型				子程序指针
param_nums	整数型				参数个数

变量名	类 型	静态	数组	备 注
i	整数型
lp	整数型
asm	字节集

asm ＝ { 85, 139, 236 }
asm ＝ asm ＋ { 184 } ＋ 到字节集 (lpfunction)
计次循环首 (param_nums, i)
asm ＝ asm ＋ { 255, 181 } ＋ 到字节集 (到整数 (4 �� (param_nums ��� (i － 1)) ＋ 4))
计次循环尾 ()
asm ＝ asm ＋ { 255, 208 }
asm ＝ asm ＋ { 93, 195 }
lp ＝ VirtualAlloc (0, 12 ＋ 6 × param_nums, 位或 ( #MEM_COMMIT, #MEM_RESERVE ), #PAGE_EXECUTE_READWRITE )
set_data (lp, asm, 12 ＋ 6 × param_nums)
返回 (lp)

.版本 2<br /> <br /> .子程序 stdcall_to_cdecl, 整数型, 公开, 解决易语言不支持cdecl（返回的是函数指针）<br /> .参数 lpfunction, 整数型, , 子程序指针<br /> .参数 param_nums, 整数型, , 参数个数<br /> .局部变量 i, 整数型<br /> .局部变量 lp, 整数型<br /> .局部变量 asm, 字节集<br /> <br /> asm ＝ { 85, 139, 236 }<br /> asm ＝ asm ＋ { 184 } ＋ 到字节集 (lpfunction)<br /> .计次循环首 (param_nums, i)<br />     asm ＝ asm ＋ { 255, 181 } ＋ 到字节集 (到整数 (4 × (param_nums － (i － 1)) ＋ 4))<br /> .计次循环尾 ()<br /> <br /> asm ＝ asm ＋ { 255, 208 }<br /> asm ＝ asm ＋ { 93, 195 }<br /> <br /> lp ＝ VirtualAlloc (0, 12 ＋ 6 × param_nums, 位或 (#MEM_COMMIT, #MEM_RESERVE), #PAGE_EXECUTE_READWRITE)<br /> set_data (lp, asm, 12 ＋ 6 × param_nums)<br /> 返回 (lp)

这代码在lpcdecl ＝ stdcall_to_cdecl (&日志_回调, 2) 如果日志_回调函数是2个整数下没问题. 但是日志回调函数参数一是整数,参数二是文本型数据, 就导致接受不到文本数据,请帮修改一下这个函数, 可以单纯写死接受的回调参数一:整数型,参数二:文本型.


补充内容 (2025-9-14 12:03):
set_data函数就是 RtlMoveMemory

补充内容 (2025-9-14 12:15):
函数源码在6楼

zainex

测试后, 没发现问题:

例子.zip (93.04 KB, 下载次数: 6)

2025-9-14 15:59 上传

点击文件名下载附件

你应该检查一下, 是不是dll写错了, 或是编译成了64位的了, 易语言不支持调用64位dll

四叔

回调函数参数是文本,一般应该是收到指针,  \0  结束的字符串吧

萧楚楠

�� 是啥，把源码上传，记得带上set_data （）

洋Hay

萧楚楠 发表于 2025-9-14 11:36
�� 是啥，把源码上传，记得带上set_data （）

  

DLL命令名	返回值类型	公开	备 注
set_data
DLL库文件名:
kernel32.dll
在DLL库中对应命令名:
RtlMoveMemory
参数名	类 型	传址	数组	备 注
pDest	整数型
pSrc	字节集
ByteLen	整数型

.版本 2<br /> <br /> .DLL命令 set_data, , "kernel32.dll", "RtlMoveMemory"<br />     .参数 pDest, 整数型<br />     .参数 pSrc, 字节集, 传址<br />     .参数 ByteLen, 整数型

感谢提醒,其实set_data 就是 RtlMoveMemory

bysy

应该没事吧 易语言的子程序指针有函数包装 你传入 指针 将转换为文本型 不应该接不到文本

洋Hay

萧楚楠 发表于 2025-9-14 11:36
�� 是啥，把源码上传，记得带上set_data （）

cdecl回调函数处理.e (4.71 KB, 下载次数: 6)

2025-9-14 12:10 上传

点击文件名下载附件
这个易里面的简单模块函数源码

萧楚楠

远程吧，教你一招

洋Hay

zainex 发表于 2025-9-14 16:01
测试后, 没发现问题:

感谢测试和帮忙, 你的例子的确没问题, 有点奇怪了.我再检测一下原因,  我的dll用其他函数都正常, 确定是32位,调用这个函数, 也不闪退,就是不显示日志. 但如果用WonderWall用cdecl函数来处理运行是正常的.

洋Hay

zainex 发表于 2025-9-14 16:01
测试后, 没发现问题:

DllExport void test2(int num2, Fun fun)
{
    char str[] = "this message";
    fun(num2, str);
}


补充内容 (2025-9-14 18:08):
如果是这种函数,就出错了.

补充内容 (2025-9-14 18:08):
如果是这类型的DLL函数,就出错了.

补充内容 (2025-9-14 18:18):
弄错了.这种也没出错,我再检查是什么原因导致的.