带双击反应器的单行文本书写和修改

langjs · 发表于 2011-11-13 14:49

第一次练习反应器，终于成功了！开心

名称：单行文本书写和修改
功能：文本程序含有双击反应器，对单行文本有两个功能：
1、书写单行文本，命令：TR
2、修改单行文本，命令：TX 或者双击单行文本

zcsoft · 发表于 2022-8-2 22:00

楼主程序强大，但也有大缺陷：如楼上几位提到的缺少WZBZ.ini文件。十年了没有更正回复。经过我仔细研究：是缺少WZBZ.ini文件，起初还莫名其妙，心想楼主这么强大，怎么会犯这种小错误？  经过我编程完善，已解决。思路是：若找不到WZBZ.ini文件程序就会自动生成一个WZBZ.ini，方便调用。这样就不需要一个初始WZBZ.ini文件了，整个程序就好方便携带。

在原代码
(defun C:TR (/ bb cc dcl_pt dd ee ent file i index_value lst01 lst02 lst03 next pt t1 t40 t41 t50 t51 t71s t72s t73s)
  (setvar "cmdecho" 0) ; 关闭命令响应

下插入以下代码

   (if(not(setq file (open "c:\\WINDOWS\\temp\\WZBZ.ini" "r")))
   (progn (setq file (open "c:\\WINDOWS\\temp\\WZBZ.ini" "w"))
   (write-line "3" file)(write-line "0.7" file)(write-line "0" file)(write-line "0" file)(write-line "左对齐" file)
   (write-line "基线对齐" file)(write-line "standard" file)(write-line "0" file)(write-line "0" file)
   (close file)))

moranyuyan · 发表于 2022-9-7 16:29

zcsoft 发表于 2022-8-2 22:00
楼主程序强大，但也有大缺陷：如楼上几位提到的缺少WZBZ.ini文件。十年了没有更正回复。经过我仔细研究： ...

插件依然无法运行，求解答

zcsoft · 发表于 2022-8-2 20:24

ACAD2021 ; 错误: 参数类型错误: stringp nil

hnlgy · 发表于 2011-11-13 21:33

这个跟清华天河的蛮像。

wade320 · 发表于 2011-11-22 17:51

tr ; error: bad argument type: FILE nil
是什么原因，2006版本

USER2128 · 发表于 2011-11-22 20:21

楼主好功力！谢谢！

zbwei120 · 发表于 2011-11-22 21:13

程序不错，好用。

tianyi1230 · 发表于 2012-1-8 11:29

tr命令是否和CAD的命令重复呢？是否修改一下呢

hzj526 · 发表于 2012-1-9 22:23

有点像天河哦，可以学习下

xjf · 发表于 2012-1-9 23:29

顶楼主，学习反应器

xing979020 · 发表于 2012-1-9 23:48

对反应器，以前学了一下。但没有理会。
学习了

BUBUBA918 · 发表于 2012-11-4 20:31

为何我显示宽度系数老是整数位，无小数显示？

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

带双击反应器的单行文本书写和修改

本帖子中包含更多资源

点评

评分

相关帖子