QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
用什么代码能让工程图中“时间”和“文件名”自动填写?
2 V2 n& H1 s" r( l: I5 ~) }5 t1 }: _7 ]! j& j' v. J0 U
每次都得改时间和文件名 怎么能自动搞定?
发表于 2010-9-2 10:22:47 | 显示全部楼层 来自: 中国安徽合肥
文件名: $PRP:"SW-File Name"
发表于 2010-9-2 12:16:10 | 显示全部楼层 来自: 中国江苏无锡
本帖最后由 votasee 于 2010-9-2 12:19 编辑 - ]/ N- j1 @! H' w

: A) G* M9 c" l! U* j恩.不错.:victory:
5 F- |& C' u8 S1 F4 C
+ D- s, `  C. M7 x---比较好的办法是在工程图建立一个自定义属性名称::$ O. U7 ^2 T/ w2 C. a$ F
名称就用DRAWNDATE,数值=$PRP:"SW-短日期(Short Date)"" O! Q" x+ A1 ^6 N; P
这样之后,你的工程图上就会自动显示出日期...(文件名称吗,同此操作)# G. [" E  L* T0 j/ s
至于自动操作吗.可以用下面的代码:hug:
  1.         Dim swdoc As DrawingDoc' u% r6 _) {2 [* p7 @) M; U
  2.     Set swdoc = swApp.ActiveDoc
    / V- ~2 u7 o* A' X
  3.     Dim swcpm As CustomPropertyManager! h3 c, H1 c* v' U4 G  A
  4.     Set swcpm = swdoc.Extension.CustomPropertyManager(""  K: |$ j# X( C6 e& L
  5.     retVal = swcpm.Add2("drawndate", 30, "$PRP:""SW-短日期(Short Date)"""
复制代码
---另外一种方法是:想办法使图纸中的注,,即($PRP:"DrawnDate")这个注解文字.+ r! O, i. H/ @* N7 z; t) n
链接到本文件属性中的短日期即可...5 {' i4 w! ~2 Q- t) H# M: x
注:($PRP:"DrawnDate")这个注解虽然字面上已经显示了日期属性,但是它是不会自动显示的.
9 f: t' w. S8 \即它可能只是一个TIPS(或者叫REMARK)所以你必需手动链接才有效...
; u; f8 b8 l! ]0 _当然这应该也可以用代码实现.不过.我暂时不懂...
' w4 k. @* O& H3 n' K3 z% I6 u8 f
----------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 )

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