QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

全站
3天前
查看: 3467|回复: 5
收起左侧

[求助] 用什么代码能让工程图中“时间”和“文件名”自动填写?

[复制链接]
发表于 2010-9-1 21:57:06 | 显示全部楼层 |阅读模式 来自: 中国天津

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
用什么代码能让工程图中“时间”和“文件名”自动填写?
2 J3 I) _% v# P
6 e6 ^# {5 f4 D9 _' [9 {7 B每次都得改时间和文件名 怎么能自动搞定?
发表于 2010-9-2 10:22:47 | 显示全部楼层 来自: 中国安徽合肥
文件名: $PRP:"SW-File Name"
发表于 2010-9-2 12:16:10 | 显示全部楼层 来自: 中国江苏无锡
本帖最后由 votasee 于 2010-9-2 12:19 编辑
4 x9 v/ N# \4 K
9 F- O# p+ i& P2 l; z* z0 J4 u2 Q: I( E恩.不错.:victory:
7 m* B  e3 B4 V- \& G0 ]
+ l5 t; L" Y2 f8 _7 @---比较好的办法是在工程图建立一个自定义属性名称::
0 Q2 F* W3 ^: \4 y$ q* o 名称就用DRAWNDATE,数值=$PRP:"SW-短日期(Short Date)"
) i' t8 U, A% u3 d) o! K- o; {这样之后,你的工程图上就会自动显示出日期...(文件名称吗,同此操作)3 X5 A  g" z, H) L* b
至于自动操作吗.可以用下面的代码:hug:
  1.         Dim swdoc As DrawingDoc) d5 z5 `+ b7 |9 z. {
  2.     Set swdoc = swApp.ActiveDoc
    $ ~5 q% Y8 x% M. E4 I1 \
  3.     Dim swcpm As CustomPropertyManager
    , |6 u, O' C. l% q* r1 z$ i/ R
  4.     Set swcpm = swdoc.Extension.CustomPropertyManager(""3 e4 j1 b) e; u8 a
  5.     retVal = swcpm.Add2("drawndate", 30, "$PRP:""SW-短日期(Short Date)"""
复制代码
---另外一种方法是:想办法使图纸中的注,,即($PRP:"DrawnDate")这个注解文字.7 C/ Y1 e2 n* D7 Z
链接到本文件属性中的短日期即可...5 t0 Z, Y% I7 X9 y& U
注:($PRP:"DrawnDate")这个注解虽然字面上已经显示了日期属性,但是它是不会自动显示的.& Q4 r$ H8 W; Y7 }8 O! [
即它可能只是一个TIPS(或者叫REMARK)所以你必需手动链接才有效...
! d6 |" b  K/ v8 X0 k' h: D# f当然这应该也可以用代码实现.不过.我暂时不懂...
, l9 A9 y+ {/ m; v1 H6 u, n6 t% ]' C; D) {6 v, |
----------PS:这个分号后面的括号怎么会自动变成哭泣的图标..

评分

参与人数 1三维币 +5 收起 理由
★新手★ + 5 技术讨论

查看全部评分

 楼主| 发表于 2010-9-5 10:09:35 | 显示全部楼层 来自: 中国天津
对不起 能详细说明一下么 我不太明白 谢谢
发表于 2010-9-5 16:09:44 | 显示全部楼层 来自: 中国重庆
第一,可以设置图纸格式,在工程图空白处右键,选择“编辑图纸格式”,在标题栏插入注释,连接到属性。
发表于 2010-9-5 20:14:39 | 显示全部楼层 来自: 中国江苏南通
呵呵,慢慢来,不然很头痛的!
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表