Pc-dmis的二次开发简单介绍_______连接pc-dmis程序
应用COM方式:1.1引用——浏览——软件安装目录中(D:\Program Files\Hexagon\PC-DMIS 2018 R1 64-bit\INTEROP.PCDLRN.DLL)的INTEROP.PCDLRN.DLL
1.2 引用pc-dmis的命名空间:Imports PCDLRN
image.pngimage.pngimage.pngimage.png
1.3 获取正在运行的pc-dmis程序:
Dim pcdApp As PCDLRN.Application = GetObject("", "PCDLRN.Application")
Dim commands As Commands = pcdApp.ActivePartProgram.Commands
1.4 创建pc-dmis程序:
Dim pcdApp AsNew PCDLRN.Application
Dim commands As Commands = pcdApp.ActivePartProgram.Commands
2.后期绑定:CreateObject
Dim pcdApp As Object
pcdApp = CreateObject ("PCDLRN.Application")
Dim commands As Object
commands= pcdApp.ActivePartProgram.Commands
页:
[1]