动态画粗糙度源码

18112600842 · 发表于 2024-7-8 11:37:54

本帖最后由 18112600842 于 2024-7-8 16:20 编辑

ayFile2List 没找到这个函数

lch8526 · 发表于 2024-11-26 17:41:52

18112600842 发表于 2024-7-8 11:37
ayFile2List 没找到这个函数

;读取文件并写入表
(defun ayFile2List (xFileName / fp xRec sList)
  (setq fp (open xFileName "r"))
  (while (setq xRec (read-line fp))
(setq sList (cons (read xRec) sList))
  );end_while
  (close fp)
  sList
);end_defun

冒个烟圈 · 发表于 2025-3-17 09:27:58

Error: no function definition: LCH:GETFILE
未找到这个函数

xudongchu · 发表于 2025-6-9 00:32:24

LCH:GETEXTENTS未找到这个函数

阿猪蛋 · 发表于 2025-6-9 07:51:10

LCH:GETEXTENTS未找到这个函数

kozmosovia · 发表于 2025-6-9 10:04:36

用SLD有一堆文件？可以改成用SLB，一个文件搞定。
嫌文件多不用SLD，改用DAT，不也还是一堆文件？本质上不还是一回事。
用DAT每次读一下重画一下，远比直接显示SLD多好几个步骤，慢好多。

kozmosovia · 发表于 2025-6-9 10:11:56

lch8526 发表于 2018-7-9 21:19
是DCL的控件，请问怎加载shx字体文件？有没有实例？

在DCL上显示SHX，就需要解析SHX，效率上就不要想了，一般的汉字SHX文件都在1M以上，lisp读取上兆文件，还是要点时间的，再加上自己写解析SHX的逻辑，太累，太复杂，效果估计也就一般般。
另类的实现方式：http://bbs.mjtd.com/thread-192920-1-1.html

账号		自动登录	找回密码
密码			注册

[源码] 动态画粗糙度源码