乐筑天下

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

[编程交流] 在我的

[复制链接]

14

主题

75

帖子

61

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 17:52:39 | 显示全部楼层 |阅读模式
我想在我的值成功完成后发送一个“取消”命令,如下所示;
 
  1. (defun c:`Q nil
  2.    (if (zerop (getvar 'opmstate))
  3.        (command "_.properties")
  4.        (progn (command "_.propertiesclose") [b](c:Q`)[/b] [color=red][b](command)[/b][/color])
  5.    )
  6.    (princ)
  7. )

 
 
然后把它放在我的(c:Q`)代码后面。这是一个代码,用于记录我的选择。
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 18:00:34 | 显示全部楼层
“Q或Q”或c:Q代码在哪里
回复

使用道具 举报

4

主题

2143

帖子

2197

银币

限制会员

铜币
-24
发表于 2022-7-5 18:12:21 | 显示全部楼层
我(再次)将您的帖子转移到AutoLISP、Visual LISP和DCL论坛。请在最相关的论坛上提问。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-5 18:16:58 | 显示全部楼层
 
如果你的问题与lisp有关,那么这个(AutoLISP…论坛)就是解决这个问题的合适地方,这并不需要天才。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-5 18:21:07 | 显示全部楼层
也许你应该慢一点。你的所有问题不必在24小时内被问到和回答。急什么?
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-5 18:29:10 | 显示全部楼层
这不是和你昨天发布的问题完全一样吗?
 
185240ax5mm7lbmrxlt990.jpg
 
为什么我相信是这样。
 
今天有没有可能是双重提问日?周围一定有虫子。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-5 18:37:21 | 显示全部楼层
 
请表现出一些耐心。
 
2.停止创建提出相同问题的线程。你只会引起一位主持人的愤怒。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-5 18:43:43 | 显示全部楼层
着手删除其中一个,但请尽量表现出一些耐心。非常感谢。
回复

使用道具 举报

14

主题

75

帖子

61

银币

初露锋芒

Rank: 3Rank: 3Rank: 3

铜币
70
发表于 2022-7-5 18:51:30 | 显示全部楼层
我想在我的值成功完成后发送命令的“取消”函数,并将其放在我的(c:Q`)代码之后。这是一个代码,用于记录我的选择。这是我在《阿卡多克》中之前准备的选择集的历史。lsp。这样地;
 
  1. (defun c:[color=royalblue][b]`Q[/b][/color] nil
  2.    (if (zerop (getvar 'opmstate))
  3.        (command "_.properties")
  4.        (progn (command "_.propertiesclose") [color=darkorange][b](c:Q`) [/b][/color][b][color=red](sssetfirst AWS)[/color][/b])
  5.    )
  6.    (princ)
  7. )
  8. (defun [color=darkorange][b]c:Q`[/b][/color] (); create a Selection Set in the SS/PP "system"
  9. (setq _ssinc_ (if _ssinc_ (1+ _ssinc_) 1))
  10. (set (read (strcat "_ss" (itoa _ssinc_) "_")) (ssget))
  11. (prompt (strcat "\nSelection set " (itoa _ssinc_) "."))
  12. (princ)
  13. )

 
 
如果我这样做正确吗?我在上面画了一条红线作为“取消”函数命令,但当我测试时,它没有发生任何事情。。
回复

使用道具 举报

10

主题

8258

帖子

8335

银币

初来乍到

Rank: 1

铜币
31
发表于 2022-7-5 18:54:55 | 显示全部楼层
前两次我们都听到了。真正地我们做到了。
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-13 00:36 , Processed in 0.387209 second(s), 74 queries .

© 2020-2025 乐筑天下

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