如何在pb中加入自己的com组件
我自己做了一个com组件，我想插入到pb中该怎样调用 问题点数：0、回复次数：8Top
1 楼lzp_lrp（lzp）回复于 2004-12-02 16:14:56 得分 0
OLEObject EmpObj
Integer li_rc
EmpObj = CREATE OLEObject
li_rc = EmpObj.ConnectToNewObject("pb80.COM名")
IF li_rc < 0 THEN
DESTROY EmpObj
MessageBox("Connecting to COM Object Failed", "Error: " + String(li_rc))
Return
END IF
然后引用 empobj.函数名即可Top
2 楼sbks（hwnd,&rect）回复于 2004-12-02 20:16:15 得分 0
学习Top
3 楼wulengbing（沧生笑）回复于 2004-12-03 01:03:42 得分 0
学习Top
4 楼mackly（）回复于 2004-12-03 15:23:03 得分 0
OLEObject EmpObj
Integer li_rc
EmpObj = CREATE OLEObject
li_rc = EmpObj.ConnectToNewObject("f:\cximagecrt.dll")
IF li_rc < 0 THEN
DESTROY EmpObj
MessageBox("Connecting to COM Object Failed", "Error: " + String(li_rc))
Return
END IF
报错连接出错 -2 是什么错误Top
5 楼mnsiii（水流花谢两无情）回复于 2004-12-03 16:42:35 得分 0
大哥你这样写肯定出错误，-2的意思是你调用的com+组件名没有找到
f:\cximagecrt.dll?你的组建名实这样的吗？你这是个dll文件呀！应该是你的com组建名，你打开mts看看你的组件名叫什么！你在ConnectToNewObject（）
中写上组件名！我想应该是pb80.cximagecrt才对
Top
6 楼yuantianwen（）回复于 2005-03-28 11:12:41 得分 0
mts什么Top
7 楼lzheng2001（１加１）回复于 2005-03-28 12:57:30 得分 0
应该:
OLEObject EmpObj
Integer li_rc
EmpObj = CREATE OLEObject
li_rc = EmpObj.ConnectToObject("f:\cximagecrt.dll","类名")
IF li_rc < 0 THEN
DESTROY EmpObj
MessageBox("Connecting to COM Object Failed", "Error: " + String(li_rc))
Return
END IF
如果不行,应该在系统上注册后再运行. 注册方法: REGSVR32 cximagecrt.dllTop
8 楼magictxh123（华）回复于 2005-03-28 16:27:17 得分 0
使用Magic eDeveloper来操作COM组件，太方便了，方法、属性完全是可视化的，参数一目了然。www.magic-sw.com.cnTop
