乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 22|回复: 10

[编程交流] 布局选项卡之间的链接,文件

[复制链接]

26

主题

210

帖子

184

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
130
发表于 2022-7-6 00:50:02 | 显示全部楼层 |阅读模式
大家好
是否有任何方法可以通过lisp在布局选项卡、文件名和文本字符串之间进行链接?
回复

使用道具 举报

22

主题

272

帖子

254

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2022-7-6 00:59:50 | 显示全部楼层
要将布局选项卡重命名为文件名,请执行以下操作:
 
  1. (defun c:ltdn (/)
  2. (or *AcadDoc* (setq *AcadDoc* (vla-get-activedocument (vlax-get-acad-object))))
  3. (vlax-for l (vla-get-layouts *AcadDoc*)
  4.    (if (eq 1 (vla-get-taborder l))
  5.      (vl-catch-all-apply (function vla-put-name) (list l (vl-filename-base (getvar 'dwgname))))
  6.    )
  7. )
  8. )

 
是否需要以文本格式在图形中的某处插入文件名?
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-6 01:03:39 | 显示全部楼层
请提供更多信息。3个不同的变量加在一起,标签布局?
回复

使用道具 举报

51

主题

481

帖子

457

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
262
发表于 2022-7-6 01:13:04 | 显示全部楼层
阅读此
http://www.cadtutor.net/forum/showthread.php?79387-重命名-layout-tab-with-2-titleblock-attributes&p=549765&viewfull=1#post549765
回复

使用道具 举报

26

主题

210

帖子

184

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
130
发表于 2022-7-6 01:14:09 | 显示全部楼层
大家好
当我更改文件名时,我希望它们之间的链接自动更改
布局选项卡和文本字符串
回复

使用道具 举报

51

主题

481

帖子

457

银币

后起之秀

Rank: 20Rank: 20Rank: 20Rank: 20

铜币
262
发表于 2022-7-6 01:21:40 | 显示全部楼层
对于文本使用字段,但对于布局,您应该使用lisp,请参见第4篇文章中的链接
回复

使用道具 举报

26

主题

210

帖子

184

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
130
发表于 2022-7-6 01:26:59 | 显示全部楼层
MDB设计
我在等你的答复
回复

使用道具 举报

22

主题

272

帖子

254

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2022-7-6 01:34:10 | 显示全部楼层
 
好的,等等。。。
 
我的建议是:
-使用rtext(柴油机)作为文本字符串,它很旧,但工作起来像匹马
  1. $(substr,$(getvar,dwgname),1,$(-,$(strlen,$(getvar,dwgname)),4))

 
要更改布局选项卡,需要使用lisp代码创建按钮,或者只要键入lisp命令调用,并在更改文件名时手动更新。
除非有人写反应堆来做。
回复

使用道具 举报

22

主题

272

帖子

254

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
111
发表于 2022-7-6 01:39:55 | 显示全部楼层
莫斯塔法,你在哪里?
回复

使用道具 举报

26

主题

210

帖子

184

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
130
发表于 2022-7-6 01:45:39 | 显示全部楼层
mdbdesign,非常感谢我向你致敬
 
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-3-10 21:09 , Processed in 0.558183 second(s), 72 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表