程 序 人 生

[每个人都是工程师,书写着属于自己的人生代码!--林海]
随笔 - 70, 文章 - 2, 评论 - 17
  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

PB调用COM组件

Posted on 2007-12-19 17:12  林海  阅读(2127)  评论(0编辑  收藏

pb7下可以使用com组件,而且方法非常的简单。

如果com组件被注册成: CSDN.Northsnow

组件中有一个public方法 为

add(x,y)

返回两个数的和。

那么在pb7中写入下代码 进行调用

 

string c
int   intValue   
oleobject   objOle   
objOle
=create   OLEObject   
intValue
=objOle.connecttonewobject("CSDN.Northsnow")
c
=string(objOle.add(9,5))
messagebox(
"结果",c)

得到的结果为:14