乐筑天下

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

[编程交流] DCL action\u tile string太

[复制链接]

49

主题

177

帖子

130

银币

后起之秀

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

铜币
243
发表于 2022-7-5 16:25:37 | 显示全部楼层 |阅读模式
我对我制作的DCL对话框的lisp代码有问题。似乎我的字符串对于action\u tile“accept”来说太长了,我得到了错误“错误的参数类型:lselsetp nil”。问题是,显然,我有太多的输入值,这使得它很长。如果我删除一行或两行,它可以工作,但我需要将它们全部放入,存储它们并进行验证检查。
 
有没有办法让它像吐字符串一样工作,或者更好地重写它来缓解问题?
 
如有任何建议,我们将不胜感激。
 
这是我要说的部分。
 
如果您愿意,可以使用:
在每个图块中调用的误差函数可以如下所示:
当然,您必须设置误差函数以满足您的需要。
 
默认情况下,“accept”退出值为1,“cancel”退出值为0,但将操作分配给这些互动程序并没有错。
我更愿意使用此模式:
  1. (action_tile "lfm" "(setq lfm_ $value) (err $key $value)")
  2. (action_tile "lfv" "(setq lfv_ $value) (err $key $value)")
  3. .
  4. .
回复

使用道具 举报

66

主题

1552

帖子

1514

银币

后起之秀

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

铜币
325
发表于 2022-7-5 16:32:36 | 显示全部楼层
@Grrr,
 
谢谢你们,你们的第一个建议非常有效,它帮助我理解了如何稍微整合我的代码。然而,你的第二个建议,我更喜欢,似乎不起作用。我替换了vl排序块,但我就是无法使其工作。
 
@斯特凡,
非常感谢。您的方法的实现似乎更容易,但当我尝试这样做时,在使用atof转换为REAL时,我的变量出现了错误。
 
编辑:好的,我设法解决了这个问题,现在一切正常。
回复

使用道具 举报

0

主题

375

帖子

385

银币

限制会员

铜币
-7
发表于 2022-7-5 16:42:45 | 显示全部楼层
另一个未经测试的:
  1. 4
回复

使用道具 举报

49

主题

177

帖子

130

银币

后起之秀

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

铜币
243
发表于 2022-7-5 16:48:55 | 显示全部楼层
上帝啊有那么一刻,我以为你只是为了好玩而胡言乱语。
谢谢李。我也会试试你的方法。
回复

使用道具 举报

114

主题

1万

帖子

1万

银币

中流砥柱

Rank: 25

铜币
543
发表于 2022-7-5 16:52:56 | 显示全部楼层
我使用此DCL的主要问题是,在visual lisp编辑器中执行时无法遵循这些步骤。当我运行代码时,程序不会出错,我不知道出了什么问题。我是做错什么了还是DCL太差劲了?
回复

使用道具 举报

49

主题

177

帖子

130

银币

后起之秀

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

铜币
243
发表于 2022-7-5 16:57:59 | 显示全部楼层
@MJLM,
李的建议管用吗?
 
@李,
我知道您通常使用if函数,但请注意
  1. 5

可以稍微缩短为:
  1. 6

 
虽然这个建议很棒,但如果MJLM确认它有效,我会保留它。
回复

使用道具 举报

49

主题

177

帖子

130

银币

后起之秀

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

铜币
243
发表于 2022-7-5 17:03:49 | 显示全部楼层
我试图实现Lee的方法,但我认为模式(“*[~0-9]*,*`.*.'.'*[~0-9]*”)有问题。几乎所有的盒子都有“无效输入”。
回复

使用道具 举报

66

主题

1552

帖子

1514

银币

后起之秀

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

铜币
325
发表于 2022-7-5 17:12:21 | 显示全部楼层
模式检查十进制格式的数字输入。你的评论表明你正在以帝国主义的方式工作。
回复

使用道具 举报

49

主题

177

帖子

130

银币

后起之秀

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

铜币
243
发表于 2022-7-5 17:15:17 | 显示全部楼层
不,不是真的。我只研究实数和整数的度量。
回复

使用道具 举报

18

主题

1529

帖子

973

银币

中流砥柱

Rank: 25

铜币
649
发表于 2022-7-5 17:24:34 | 显示全部楼层
回复

使用道具 举报

发表回复

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

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

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

GMT+8, 2025-8-20 21:54 , Processed in 1.506157 second(s), 73 queries .

© 2020-2025 乐筑天下

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