求教OLE对象用法
代码如下:
oleobject ole_acad
ole_acad=ConnectToNewObject('autocad.appliction')
在编绎就不通过!说无此函数,是拼写错误,还是语法错,是否要另外声明?
问题点数:10、回复次数:6Top
1 楼sincerity(sincerity)回复于 2001-12-30 11:28:09 得分 0
oleobject ole_acad
ole_acad = Create OLEObject
ole_acad.ConnectToNewObject('autocad.appliction')
Top
2 楼brightstar(反恐精英)回复于 2001-12-30 11:29:20 得分 0
可能性一
oleobject ole_acad
ole_acad=create oleobject
ole_acad=ConnectToNewObject('autocad.appliction')
Top
3 楼huangkc(软贱&henchman)回复于 2001-12-30 11:29:23 得分 10
看一下,这个如何
oleobject ole_acad
ole_acad=create oleobject
integer li_ret
li_ret = ole_object.ConnectToObject(…)
IF li_ret <> 0 THEN
//如果还没有打开,则新建。
li_ret = ole_object.ConnectToNewObject(…)
if li_ret <> 0 then
MessageBox('OLE错误','OLE无法连接!错误号:' + string(li_ret))
return 0
end if
ole_object.Visible = True
END IFTop
4 楼brightstar(反恐精英)回复于 2001-12-30 11:30:38 得分 0
这样吧?
oleobject ole_acad
ole_acad=create oleobject
ole_acad.object.ConnectToNewObject('autocad.appliction')
Top
5 楼wangks777(_wskun)回复于 2001-12-30 11:39:32 得分 0
通过了,谢谢!
但我在后面又加了一句
ole_acad.Visible = true
提示如下:
error accesing external object at line 8 in cliked .....
是连接未成功吗?如何检测成不成功呢?Top
6 楼wangks777(_wskun)回复于 2001-12-30 14:07:16 得分 0
谢了!huangkc(糊涂虫) Top




