文本库需要添加f

AIberto · 发表于 2022-7-5 19:57:32

尊敬的Lisp大师

复活节快乐

一个文本库例程，每次，我都需要从文本库向列表添加一些文本。然后把它们写在图纸上。花了很多时间。

我想了很长时间。我希望能尽快把文字添加到列表中。所以，我想到了使用快捷键。

我修改了Dcl文件，但无法编写lisp程序。我只知道基本的，例如“命令”，

亲爱的lisp大师，你能帮我吗？我真的很感谢你的帮助。

Lisp和DCL文件在附件中。

这是tcf。INI文件，（INI文件是文本库）


Parts to remove oxide skin 
Remove burrs
Bending radius control within the R2 
Solder joint to uniform 
Can't virtual welding 
Chamfer are C0.5

哦我差点忘了。作者是cabinsummer。这个例程是开源的。
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=92135
tcf。lsp
tcf。dcl

tombu · 发表于 2022-7-5 20:02:03

你能把这个链接贴到你找到代码的地方吗？它可以有一个描述或其他有用的信息。

AIberto · 发表于 2022-7-5 20:05:27

嗨，汤布，谢谢你提醒我。
我补充道。

pBe · 发表于 2022-7-5 20:08:02

当你点击“常用”栏上的按钮时会发生什么？或者我应该说，会发生什么？还有“选择”按钮？

顺便说一句，好主意：[对作者说]

DuanJinHui · 发表于 2022-7-5 20:12:14

cabinsummer是论坛的主持人。看起来好久没露面了。
好主意，但我无能为力。
祝你好运

AIberto · 发表于 2022-7-5 20:16:05

嗨，pBe，很高兴认识你。我想联系作者。但没有消息。所以我在论坛上发帖。

每一次
当我画的是机械零件。所以我需要添加


Parts to remove oxide skin
Remove burrs
Chamfer are C0.5
etc.

从库中删除列表。然后从列表中插入到图形中

登录/注册后可看大图

当我绘制的是钣金零件时，我需要添加


Bending radius control within the R2 
Solder joint to uniform 
Can't virtual welding 
etc.

从库中删除列表。然后从列表中插入到图形中

所以，我想到了使用快捷键。
当我点击“加工零件”按钮时
这些字符串


Parts to remove oxide skin
Remove burrs
Chamfer are C0.5
etc.

将自动添加到列表中

文本库（tcf.ini）的内容只是其中的一部分，有很多字符串没有添加进去

pBe · 发表于 2022-7-5 20:19:11

这里有一个想法，为什么不将加工零件的字符串添加到tcf中。伊尼？这将是最简单、最快的方法。这对你有用吗？

Tharwat · 发表于 2022-7-5 20:22:09

我无法将list_box属性的背景颜色设置为（绿色），如上面发布的对话框所示！

AIberto · 发表于 2022-7-5 20:23:45

你好，pBe。
我想需要四个*。ini文件，
文本库是一个

列表可以保存到xxxx。ini公司
当我点击“加工零件”按钮时，读取“加工零件.ini”文件，然后写入列表

AIberto · 发表于 2022-7-5 20:27:16

嗨，塔尔瓦特。很高兴认识你！！！
列表框属性的颜色为绿色，与计算机设置有关

控制面板-->显示-->外观-->高级-->项目（窗口）-->颜色-->其他
色调-->85
Sat--->90
Lum-->205
添加自定义颜色-->确定-->确定-->确定

这种设置可以缓解眼睛疲劳

[编程交流] 文本库需要添加f