QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

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

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

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

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

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

x
用什么代码能让工程图中“时间”和“文件名”自动填写?& u& q/ N; k8 f  l, {6 i9 U

! i0 D- U( k/ [每次都得改时间和文件名 怎么能自动搞定?
发表于 2010-9-2 10:22:47 | 显示全部楼层 来自: 中国安徽合肥
文件名: $PRP:"SW-File Name"
发表于 2010-9-2 12:16:10 | 显示全部楼层 来自: 中国江苏无锡
本帖最后由 votasee 于 2010-9-2 12:19 编辑
4 D/ u; _" d2 j3 X- _6 K& u/ _% b) \! A2 c' ]
恩.不错.:victory:+ a; P  _9 @! W: t
& R3 Y+ u$ v& w) J
---比较好的办法是在工程图建立一个自定义属性名称::
9 G: o+ K. f2 O( ]- f5 m2 `9 ` 名称就用DRAWNDATE,数值=$PRP:"SW-短日期(Short Date)") b( z! I: Y, L/ S+ ~* b  X" I6 `# M
这样之后,你的工程图上就会自动显示出日期...(文件名称吗,同此操作)! b3 @1 g5 X! r- R+ k! r( R
至于自动操作吗.可以用下面的代码:hug:
  1.         Dim swdoc As DrawingDoc  ]; I% q$ F$ L2 O
  2.     Set swdoc = swApp.ActiveDoc2 @1 r* H8 m* D3 J7 a" n) K2 p4 K
  3.     Dim swcpm As CustomPropertyManager; ~6 Z0 x* ~, k
  4.     Set swcpm = swdoc.Extension.CustomPropertyManager(""" d6 q4 b  {7 G% i
  5.     retVal = swcpm.Add2("drawndate", 30, "$PRP:""SW-短日期(Short Date)"""
复制代码
---另外一种方法是:想办法使图纸中的注,,即($PRP:"DrawnDate")这个注解文字.
- J) q% Z! u. ?& ]% R链接到本文件属性中的短日期即可...
7 y- ]  y0 O: g4 S注:($PRP:"DrawnDate")这个注解虽然字面上已经显示了日期属性,但是它是不会自动显示的.
; i+ r4 B( d% W0 y! _6 k9 {$ |5 x即它可能只是一个TIPS(或者叫REMARK)所以你必需手动链接才有效...! i: ~- |( S9 N1 U' y) Y# w
当然这应该也可以用代码实现.不过.我暂时不懂...) {3 k1 @' }) b8 E# b7 V$ J
4 [1 R* z9 e# O( G8 G  C" [
----------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 )

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