如何使用& quotAutoCAD可停靠容器& quot?
如何使用“AutoCAD可停靠容器”参考:http://www.jrl-e.com/index.htm
谁能给我举个好例子
下面是一个VB实现的IRetrieveDockableContainer的示例:
全局变量,以便在以后需要时使用该接口
Dim dockContainer As AcadDockableContainer
实现IRetrieveDockableContainer
私有子IRetrievenDockablecontainer_SetDockContainer(ByVal newVal As IAcadockableContainer)
“通过将此接口分配给全局变量来保持此接口的完整性。”
设置dockContainer=newVal
仅允许在AutoCAD的左侧和右侧停靠。EnableDockPositions=acDockLeft+acDockRight
我们希望窗口第一次显示为浮动窗口
浮动窗口的大小如下所示
Dim rect(0到3)为整数
rect(零)=50'左
rect(1)=50'-顶部
rect(2)=300'右
直肠(3)=300'-底部
dock容器。SetPreferredLockPosition acFloating,rect<br>结束子<br>
**** Hidden Message *****
页:
[1]