易语言自绘方法

花舞灬花丶落泪

注意，我说的这个方法shi 传统意义上的方法。   额 我突然觉得方法这个词很陌生....


                             用易语言的童鞋们知道,易语言子程序的参数必须是{必须是基本数据类型，且不能为字节集}
这不难办,只是多小一小小步.   

             两个API
                      RtlMoveMemory()
                                          位于：kernel32
                                           三个参数,
                                          {
                                                数据类型    目标数据地址
                                                    整数型    源数据
                                                    整数型    结构尺寸
                                             }

                      LocalSize()
                                          位于：kernel32
                                           一个参数,
                                          {
                                                数据类型    目标
                                             } 返回 整数型   该函数返回目标结构的尺寸

先使用 LocalSize() 取得目标的结构大小, 然后使用 RtlMoveMemory   复制该结构即可,




实际操作：

花舞灬花丶落泪

源码在这里...........
.版本 2

.DLL命令 拷贝内存, 整数型, "kernel32", "RtlMoveMemory", , , RtlMoveMemory
    .参数 目标数据地址, 对应类型, 传址, lpvDest
    .参数 源数据, 整数型, , lpvSource
    .参数 尺寸, 整数型, , cbCopy

.DLL命令 取结构尺寸, 整数型, "kernel32.dll", "LocalSize"
    .参数 参数, 对应类型


.版本 2
.支持库 spec

.子程序 SetUserDrawBG, 对应类型
.参数 pFun, 子程序指针
.局部变量 对应类型

Dima.a ＝ 真
Dima.s ＝ { 0, 0, 1, 1, 2, 2, 3, 3, 4, 4 }
Dima.d ＝ “I Love You”
Dima.f ＝ 521
调用子程序 (取子程序地址 (pFun), , , 到整数 (“52052052110”), Dima)
返回 (Dima)

.子程序 dddddd, 逻辑型
.参数 phEle, 整数型
.参数 pDrawItem, 整数型
.局部变量 TS, 对应类型

拷贝内存_Cx (TS, pDrawItem, 取结构尺寸_Cx (TS))
调试输出 (TS.d)
返回 (真)

.版本 2

.子程序 _按钮1_被单击

SetUserDrawBG (&dddddd)





需要把对应类型更改为自己的类型..............  好了 众爱卿都退下吧  退朝