Question

如何将自定义数据类型作为DLL参数

Answer 1

.版本 2

.子程序 TEST, , 公开
.参数 指针, 整数型
.局部变量 数据, 数据类型1

复制到类型 (数据, 指针, 取类型字节数 (数据))
信息框 (到文本 (数据.整数型), 0, )
信息框 (数据.文本型, 0, )
信息框 (到文本 (取指针数据_字节集 (数据.字节集)), 0, )
信息框 (到文本 (数据.小数型), 0, )
信息框 (到文本 (数据.长整数), 0, )
信息框 (到文本 (数据.双精度小数型), 0, )
' 不在需要使用了 释放字节集的内存
释放指针内存 (数据.字节集)
清空内存块 (数据, 取类型字节数 (数据))

.子程序 释放指针内存
.参数 指针, 整数型

.如果真 (IsBadReadPtr (指针, 4) ＝ 0)
GlobalFree (指针)
.如果真结束

.子程序 取指针数据_字节集, 字节集
.参数 指针, 整数型
.局部变量 Bin, 字节集
.局部变量 size, 整数型

检查 (指针 ＞ 0)
.如果真 (IsBadReadPtr (指针, 4) ＝ 0)
size ＝ 取字节集数据 (指针到字节集 (指针, 4), 3, )
Bin ＝ 指针到字节集 (指针 ＋ 4, size)
.如果真结束
返回 (Bin)