乐筑天下

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

[编程交流] 想知道如何制作

[复制链接]
CadFrank

56

主题

259

帖子

213

银币

后起之秀

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

铜币
270
发表于 2022-7-6 09:07:46 | 显示全部楼层 |阅读模式
您好，我有一个常规，我想添加一个行动。
 
此例程是一个动态块计数器，计数结果显示在命令提示行中，因此我希望在计数结束时打开此命令提示。
 
这段代码不是我写的，因为我对autolisp很陌生。
我不确定那个人是不是伦德曼，但他就是给我的那个人。
 
就是这样。
 
[code]（defun c:BCD（）（c:BlockCountDynamic））（defun c:BlockCountDynamic（/ss item val valList）（vl load com）（princ“\r块计数：DYNAMIC”）|（if（setq ss（ssget“_x”（list）（0。“INSERT”）'（2“*U*”）；
回复

使用道具 举报

pBe

32

主题

2722

帖子

2666

银币

后起之秀

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

铜币
211
发表于 2022-7-6 09:15:22 | 显示全部楼层
（文本选择）？
 
（2。“`U*”）而不是（2。“*U*”）
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

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

铜币
270
发表于 2022-7-6 09:17:33 | 显示全部楼层
嗯，我不完全确定，但我认为变化不大。但我想要的是在计数结束时执行f2快捷方式。AutoCad将该窗口称为“AutoCad文本窗口”
 
我可以留下一张照片，这可能有助于理解你想要什么。
 
100750zbyu19ma1zqiu96z.jpg
 
因此，希望它能帮助理解我想要什么。
回复

使用道具 举报

pBe

32

主题

2722

帖子

2666

银币

后起之秀

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

铜币
211
发表于 2022-7-6 09:23:24 | 显示全部楼层
将该（textscr）粘贴到命令提示符上，您将看到
 
或将（textscr）放在最后一个结尾之前“”
 
[code]（提示“\n**未选择任何内容**”）（princ）（textscr））；
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

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

铜币
270
发表于 2022-7-6 09:26:49 | 显示全部楼层
好的，非常感谢你的帮助！我会让你知道它是否有效。
回复

使用道具 举报

BlackBox

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2022-7-6 09:32:51 | 显示全部楼层
 
CadFrank-当你对另一个线程中提供的代码有疑问时，最好在原始线程中回答你的问题。
 
 
我（RenderMan）是您的问题涉及的代码的作者。
 
回答你的问题。。。（textscr）和（textpage）都将打开AutoCAD文本窗口（F2），（graphscr）将焦点返回到主应用程序。
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

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

铜币
270
发表于 2022-7-6 09:36:29 | 显示全部楼层
嗯，它很有效，所以一切都很好！我想知道你是否知道任何可以帮助我理解autolisp语言的好书。
回复

使用道具 举报

CadFrank

56

主题

259

帖子

213

银币

后起之秀

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

铜币
270
发表于 2022-7-6 09:38:52 | 显示全部楼层
Sry我认为这是在名单上很远的人看到它，因为我是新的福隆我还不理解他们，但在未来我会。
回复

使用道具 举报

BlackBox

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2022-7-6 09:44:30 | 显示全部楼层
 
Visual LISP开发者的圣经，2011版
回复

使用道具 举报

BlackBox

44

主题

3166

帖子

2803

银币

中流砥柱

Rank: 25

铜币
557
发表于 2022-7-6 09:48:04 | 显示全部楼层
 
别担心；现在你知道了。。。
 
100753max75476v4d77an8.jpg
回复

使用道具 举报

12下一页
返回列表 发帖

发表回复

高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

精选推荐

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-7 04:53 , Processed in 0.419682 second(s), 74 queries .

© 2020-2025 乐筑天下

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