• VB中对AutoCAD图形对象进行缩放操作


    用AutoCAD应用程序对象的ZoomExtents方法,可以显示图形的全部,使绘制的图形最大限度地充满绘图区域,代码ZoomExtents或AcadApp.ZoomExtents。

    当某一部分绘制图形在显示区域之外,可以用ZoomAll方法,使图形全部显示出来,但是图形并不最大限度地充满绘图区域,代码ZoomAll或AcadAPP.ZoomAll。

    利用ZoomCenter方法可以将绘制图形中的一个指定点移动到新的视口的中央并按之指定的倍率缩放,语法object.ZoomCenter Center,Magnify,object指代Application对象,Center图形中的指定点,Magnify缩放倍率。

    利用ZoomWindow方法,可以缩放一个指定区域内的图形,语法object.ZoomWindow LowerLeft,UpperRight。

    利用ZoomPickWindow方法,可以缩放一个指定区域内的图形,该区域由用户点取两点指定,语法object.ZoomPickWindow。

    利用ZoomScaled方法,可以将绘制的图形中的一个指定点移动到新的视口中央,并按指定倍率缩放,语法object.ZoomScaled Scaled,ScaledType,object指代Application对象,Scale缩放比率,ScaleType代表缩放类型,它有三个可选参数,AcZoomScaledAbsolute与图形界面相关,AcZoomScaledRelative与当前视图相关,AcZoomScaledRelativePSpace与图纸空间相关。

    下面的代码将当前图形放大两倍。

    Private Sub Command9_Click()
        Dim scalefactor As Double
        Dim scaletype As Integer
        scalefactor = 2
        scaletype = acZoomScaledRelative
        acadapp.ZoomScaled scalefactor, scaletype
    End Sub

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


  • 相关阅读:
    单元测试、TDD和BDD的差别
    关于程序员的发展方向
    forin为什么不按照顺序遍历对象
    CSS BEM 书写规范
    c#基础知识20问
    单个编译c#中的cs文件
    c#排序算法(待续)
    (转)getElementByID getElementsByName getElementsByTagName用法详解
    安装SQL Server 2005 性能计数器错误的解决方法
    创建和使用c#DLL(摘自MSDN)
  • 原文地址:https://www.cnblogs.com/bimgoo/p/2503122.html
Copyright © 2020-2023  润新知