zoukankan      html  css  js  c++  java
  • VB中对AutoCAD控制窗口界面

    窗口界面控制包括AutoCAD应用程序窗口界面控制和AutoCAD绘图窗口控制,以及VB窗口界面和AutoCAD窗口界面的相互切换。

    利用AutoCAD应用程序对象的属性,可以控制或查询AutoCAD窗口界面的现实状态。

    acadapp.WindowState = acMax
    acadapp.WindowState = acMin
    acadapp.WindowState = acNorm
    acadapp.Visible = False

    上语句分别将AutoCAD窗口设置为最大、最小和一半状态,最后一句将AutoCAD窗口设置为不可见。

    利用Document对象属性可以控制或查询AutoCAD绘图窗口的现实状态。

    acadapp.ActiveDocument.Width = acadapp.Width / 2
    acadapp.ActiveDocument.Height = acadapp.Height / 2
    acadapp.ActiveDocument.WindowState = acMax
    acadapp.ActiveDocument.WindowState = acMin
    acadapp.ActiveDocument.WindowState = acNorm

    上语句设置AutoCAD绘图窗口的宽高为AutoCAD窗口界面的一半,设置AutoCAD的绘图窗口显示为最大、最小、一般状态。

    使用VB的AppActivate语句,可以实现VB程序界面切换到AutoCAD界面,语法如下。

    AppActivate title(,wait)

    参数title表示所要激活的应用程序窗口标题,wait表示在激活另外一个应用程序之前调用的应用程序是否具有焦点,如果为false,即使调用的应用程序没有焦点,也直接激活指定的应用程序如果为true,则调用的应用程序会在等到具有焦点后,才激活指定的应用程序。

    将VB程序窗口切换到AutoCAD界面语句如下。

    AppActivate AcadApp.Caption

    执行该语句后,AutoCAD将获得焦点,AutoCAD窗口界面的大小保持先前的状态,若AutoCAD窗口界面先前的状态不为最小化,VB窗口将最小化,屏幕显示AutoCAD窗口界面,若要重新使VB获得焦点并显示VB界面,单击屏幕下方的最小化VB窗口即可。

    作者:codee
    文章千古事,得失寸心知。


  • 相关阅读:
    Linux服务器使用tar加密压缩文件
    ssh-copy-id使用非默认22端口
    Nginx日志分割脚本
    MySQL的yum源
    vSphere Client开启虚拟机提示:出现了常规系统错误: 由于目标计算机积极拒绝,无法连接。
    ESXi主机遗忘密码重置密码
    扩容swap交换分区空间
    ESXi上的固态硬盘识别为非SSD
    VMware Vcenter Server 6.0忘记密码
    Centos6与Centos7区别
  • 原文地址:https://www.cnblogs.com/bimgoo/p/2503124.html
Copyright © 2011-2022 走看看