图文并茂:delphi 编写你的com程序
作者 凌众技术
来源 互联网
浏览
发布时间 2012-01-14
| DELPHI菜单: File\New\Other… 按确定[ok]按钮 点击File\Save菜单保存: 输入工程名MyCOM,按保存按钮 再打开菜单File\New\Other… 按[OK}按钮 在CoClassName打入MyObject，按OK 在IMyObject上按MOUSE右键，ImyObject\New\Method。 在Name处输入Test 切换到Parameters页次，按Add两下，将第一个Parameters的Name改成PsParam1, Type打入BSTR，将第二个Parameters的Name改成PsResult, Type打入BSTR*，将MOUSE点到第二个Parameters的Modifier字段处，按 “…” 按键。 将RetVal打勾，按OK (原来的[in]变成了[out,retval], 表示这个是要回传的, 其型态为字符串)，关掉这个窗口。 (你会看到它帮你建好了CODE的模型)。 File\Save，输入文件名MyObject，按保存。 改一下CODE，按一下Ctrl+S保存，Project\Build MyCOM。 就可以看到生成了一个MYCOM.DLL文件 这就是你要的COM组件了，用Regsvr32命令注册这个组件后就可使用了。 下面再讲调用这个COM组件的方法： New 一个新的Application 在uses 中加一个Comobj 放一个button在FORM中 在button的onClick事件中打入以下的Code: 代码: var MyObject: OleVariant; begin MyObject:=CreateOleObject('MyCOM.MyObject'); try ShowMessage(MyObject.Test('黎明')); finally VarClear(MyObject); end; end; 执行.....并按Button1按键, 你会看到一个Message...那就是执行COM对象的Test方法的回传值。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
上一篇: Delphi 编程技巧常见实例问下一篇: 手把手教delphi:写你的dll文件(1)
关于图文并茂:delphi 编写你的com程序的所有评论
