田草博客

互联网田草博客网友交流QQ群：11740834 需注明申请加入原因微信公众号：ByCAD 邮箱：tiancao1001x126.com
首页 \| 普通 \| 电脑 \| AutoCAD \| VB/VB.NET \| FLash \| 结构 \| 建筑 \| 电影 \| BIM \| 规范 \| 软件 \| ID

评论列表

所有评论

[132] [133] [134] [135] [136] [137] [138] [139] [140] [141] ... [143]

田草于 2007-08-25 09:10 PM 发表评论：

在百度空间上还看到一位网友的做法是

   '重新指定原点，防止漂移
    ThisDrawing.ModelSpace.Layout.PlotOrigin = originalValue
…………

    '必须保存原始原点，否则打印会随机飘动？
    Dim originalValue As Variant
    originalValue = ThisDrawing.ModelSpace.Layout.PlotOrigin

他所说的随机漂移肯定是错的，但是他的方法不知道可行否，回去验证一下，再告诉大家。

查看所评论的日志：CAD VBA 实现图纸的快速打印

田草于 2007-08-25 08:43 PM 发表评论：

VBA中GetPoint以及GetBoundingBox返回的是都是世界坐标(WCS),而ThisDrawing.ModelSpace.Layout.SetWindowToPlot中使用的却是显示坐标(DCS),
我们可以使用ThisDrawing.Utility.TranslateCoordinates(PtMax, acWorld, acDisplayDCS, False)将世界坐标转换成显示坐标，这样就不会出现打印的时候图像出现偏移。

查看所评论的日志：CAD VBA 实现图纸的快速打印

yitian0172 于 2007-08-24 09:25 PM 发表评论：

放大发达放大

查看所评论的日志：今天开始博客支持HTML语言

田草于 2007-08-24 09:11 PM 发表评论：

有了鼠标滚轮谁还用Pan命令啊我看把P给print得了。

查看所评论的日志：CAD 快捷命令

田草于 2007-08-21 05:55 PM 发表评论：

谢谢大家的支持

查看所评论的日志：看看人家的咨询中心多牛

dylan_sue 于 2007-08-21 00:07 AM 发表评论：

你现在有专业粉丝了啊