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

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

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


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



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

楼主程序强大，但也有大缺陷：如楼上几位提到的 缺少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:56

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

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

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

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

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

这个跟清华天河的蛮像。

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

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

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

楼主好功力！谢谢！

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

程序不错，好用。

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

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

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

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

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

顶楼主，学习反应器

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

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

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

为何我显示宽度系数老是整数位，无小数显示？
页: [1] 2
查看完整版本: 带双击反应器的单行文本书写和修改