DELPHI中如何编写COM组件
元旦闲来无事，学习一下DELPHI怎样编写COM组件。结果一试才发现问题多多，要么是找不到接口，要么是找不到方法。查了很多资料，发现说的都不清楚。现在把我所学到的和大家分享一下，希望新学的人能少走弯路。
什么是COM
COM是微软定的一种组件编写的规范，目的是为了实现组件的重用，不管你是用C、DELPHI、VB什么语言写的，只要遵守这种规范就是COM组件，就能相互之间调用。那这个规范是什么呢，最简单的，就是按规定使用接口，微软定了个IUnkown接口，只要实现了这个接口的类，就可以称为COM组件。在此基础上可以加上自己的接口，实现特定的功能，这就成了有用的COM组件了。
DELPHI中如何创建COM组件
两个步骤：
（1）创建一个ActiveX Library，这是个DLL。
（2）创建一个COM Object或者Automation Object，二者选其一，这两者都是COM组件，但是当然还是有区别的，差在调用的方法上，这个后面再说。
DELPHI中如何调用COM组件
两种方法，分别是用接口来调和用名称来调，第一种适用于支持接口的语言，如C、DELPHI，VB就不行了，好处是速度快，因为不用根据名称去查找了，还有开发时编译器能检查，缺点是要导入类型库。第二种适用于所有的语言，好处是不用导入类型了，缺点是调用的速度慢，还有开发时编译器不检查。
前面说的COM Object只能通过第一种方法调，Automation Object两种方法都可以调。举例如下：
我创建了一个ActiveX Library，名叫mylib。一个Automation Object，名叫myobj。并且编译注册过了。
用第一种方法调用时，需要如下操作：在use里加上mylib_TLB类型库（如果不是自己开发的没有TLB可以从DLL导入生成的），代码是var myobj:Imyobj; myobj:;之后就可以用了。如果有兴趣可以看看类型库的代码里，里调用了CreateComObject，这函数返回的是IUnkown接口，再用as操作转成你需要的Imyobj接口。
用第二种方法不需要类型库了，代码是var myobj:variant; myobj:CreateOleObject('');之后就可以用了，这个方便吧。其实为了实现用名字调用，需要加上IDispatch接口，不过delphi都自动给我们加好了，不用管直接用就行。
版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。
