田草博客

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

评论列表

所有评论

[131] [132] [133] [134] [135] [136] [137] [138] [139] [140] ... [142]

田草于 2007-08-26 03:47 PM 发表评论：

不是世界坐标，至于是用户坐标还是显示坐标或者空间布局坐标我也说不清楚。

设置ThisDrawing.ModelSpace.Layout.PlotOrigin 这个是不行的。

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

0527 于 2007-08-26 03:46 PM 发表评论：

???

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

田草于 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 发表评论：

你现在有专业粉丝了啊

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

[131] [132] [133] [134] [135] [136] [137] [138] [139] [140] ... [142]