好友
阅读权限10
听众
最后登录1970-1-1
|
阿狸、不哭
发表于 2013-1-26 21:11
本帖最后由 阿狸、不哭 于 2013-1-26 21:18 编辑
com组件:简单来说就是用来和其他程序交互的 比如asp和易语言,注意这里的交互 并不是那些 post get 之类的.而是通过 creatobject 来创建对象。
而在于易语言中, 有个数据类型为 对象 。 通过该命令就可以调用 com组件. 在易语言中,并没有提供com操作引导,而且无 注册模块.
研究了几天资料,最后放弃了用api操作 做com组件.后来想想 vb 编译出来的 dll 不就是 com组件了吗?于是乎,带着兴奋,研究了一晚 果然可以 ...毕竟我也不熟悉vb 只能马马虎虎的随便做了下。
不废话了 直接进入思路。
现在易语言 调用VirtualAlloc 函数 来申请内存,之后 在 要公开的易语言dll内插入一个参考的 整数型 参数(我是这样做的,你可以可以直接把申请到的 内存地址 返回,切记公开的函数必须是整数型),然后把易语言函数要返回的数据写到刚才申请的内存地址上 ,然后 VB端 和平常引用 dll 一样 ,然后 定一个 整数型参数来获取易语言的 参考的那个内存地址。 然后vb就可以利用RtlMoveMemory 复制内存 获得 返回的数据!思路就这么简单, 还有 有个地方必须注意,否则你们会像我那样的。在vb开头定义时候要注意
下面的红色一定要是 long MyApi_app 返回的是指针.而不是函数的返回值,刚开始我就是犯了这个错误,这个引用dll还是易语言好使些 ... 直接获得返回值 ...
Private Declare Function MyApi_app Lib "GetStr.dll" Alias "GetStrLong" (ByVal 写入文本 As String, 返回地址 As Long) As Long
这个是我写的一个小程序,利用对象来获得 编辑框内的 文本长度, 核心的都是易语言做的，只有跳板vb做的 那个只起数据传输作用.
|
免费评分
-
查看全部评分
|
发帖前要善用【论坛搜索】功能，那里可能会有你要找的答案或者已经有人发布过相同内容了，请勿重复发帖。 |
|
|
|
|
|
|
[复制链接]
