乐筑天下

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

[编程交流] DCL检索val的帮助

[复制链接]

5

主题

1334

帖子

1410

银币

限制会员

铜币
-20
发表于 2022-7-5 13:55:33 | 显示全部楼层
@德拉诺
 
通过键入:
你错过了BigAl子函数的全部目的。。。它适用于提供给子功能的任何长度的列表。。。所以val50理论上是可能的,你们只对作为例子提供的列表BigAl作出反应,而不是显式的必须。。。
回复

使用道具 举报

0

主题

946

帖子

978

银币

限制会员

铜币
-3
发表于 2022-7-5 13:58:11 | 显示全部楼层
 
@马尔科·里巴
你误解了。添加的代码只是为了显示我是如何通过将数据作为列表返回来确认DCL输出的 142129qdntqqovidv7q7dt.png
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 14:04:31 | 显示全部楼层
感谢您的回答
 
我很确定这就是我要说的(action\u tile keynum(strcat“(setq val”(itoa y)“$value)”)并且正如所指出的那样,除非你点击一个框,否则它不会返回默认值,但有趣的是,如果你将action\u tile硬编码成多行,它只会按ok返回默认值。将研究(if(=x\u val 1)(setq ans(list val1 val2 val3 val4)),但作为可以循环条目数的CON。 
 
我一有戏就再发一次。
 
回复

使用道具 举报

0

主题

946

帖子

978

银币

限制会员

铜币
-3
发表于 2022-7-5 14:05:03 | 显示全部楼层
如果放弃每个编辑框的动作分幅,并尝试构造和设置变量,则可以在“接受”(确定)动作分幅中发出(完成对话框)之前收集列表中的所有分幅值。
 
按顺序(编辑框键1)->(编辑框键(n))返回所有编辑框的值列表
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 14:09:41 | 显示全部楼层
Dlanort你试过代码了吗?它所做的只是锁定了我的autocad无法退出dcl,并尝试了“ok”。
 
它是如此令人沮丧,所有的工作和改变,然后失去了解决方案。
 
回复

使用道具 举报

0

主题

946

帖子

978

银币

限制会员

铜币
-3
发表于 2022-7-5 14:14:37 | 显示全部楼层
 
是的,在我的2012版本中测试了它,但我可以从代码片段中看到它缺少一行(开始对话框)。很抱歉,我不知道它是怎么被删除的。
 
应该是这样的
 
  1. 10
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 14:16:20 | 显示全部楼层
谢谢,会测试等等,这只是一件简单的事情。
回复

使用道具 举报

0

主题

946

帖子

978

银币

限制会员

铜币
-3
发表于 2022-7-5 14:20:21 | 显示全部楼层
如果有帮助的话,这是我使用的完整代码。最后是用来测试它的defun。
 
  1. 11
回复

使用道具 举报

106

主题

1万

帖子

101

银币

顶梁支柱

Rank: 50Rank: 50

铜币
1299
发表于 2022-7-5 14:24:11 | 显示全部楼层
感谢dlanorh的代码工作,我从局部变量中删除了V\u lst,这允许将其作为全局变量传递到另一个程序,仍然不是百分之百类似于当我把代码搞砸时的问题,如果运行多次,它不会覆盖V\u lst尝试了几件事,将发挥更不幸的是,我目前时间不足,可能会使V\u lst部分成为非lambda函数等。
 
Ok fixed从变量定义中删除V\u lst,在开始时添加(setq V\u lst’()),以便每次运行时重置。
 
下面是dcl和一个简单的3d家具桌子生成器的工作示例。
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-3-15 03:34 , Processed in 1.363372 second(s), 70 queries .

© 2020-2025 乐筑天下

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