[公告]：晓东工具箱BUG专题。

eachy

如果你发现工具箱中的BUG或者建议，请跟帖，论坛将及时提供SP版。:9 :9

xzg_hello

xdrx_string_mid

功    能：返回字符串从中间指定位置开始，指定长度的字符串(类似 Basic 语言的MID$)

调用格式：(xdrx_string_mid <字符串> <开始位置> <长度>)

说    明：字符串位置从0开始

返 回 值：字符串

示    例：a="建筑设计"
          (xdrx_string_mid a 4 2)="计"


应该是“设”

XDSoft

最初由 xzg_hello 发布
[B]xdrx_string_mid

功    能：返回字符串从中间指定位置开始，指定长度的字符串(类似 Basic 语言的MID$)

调用格式：(xdrx_string_mid <字符串> <开始位置> <长度>)

说    明：字符串位置从0开始

返 回 值?.. [/B]

命令: (setq a "建筑设计")
"建筑设计"

命令: (xdrx_string_mid a 4 2)
"设"

没有问题啊。

XDSoft

有空去看看XDRX_API的LISP方面的通用函数库，在XDLSP.LSP里面，下面介绍下关于文字的处理。

;|
   判断一个字符串里面是否包含汉字
|;
$xdlsp_text_hashz

;|
  判断一个字符串里面是否包括英文字符
|;
$xdlsp_text_hasEn

;|
   获得字符串的长度（识别汉字，作为一个）
   
|;
$xdlsp_text_strlen

;|
   获得字符串的长度（识别汉字,连续英文作为一个）
   
|;
$xdlsp_text_wordlen

...................好多好多，现在处理文字就用一个遍历结构就可以了，下面给你举个例子：

2. 
   
3. [FONT=courier new]
   
4. (setq str "建筑CAD技术")
   
5. ($XDLSP_Text_ToDb str)
   
6. (while (setq cha ($XDLSP_Text_GetWord))
   
7.    (setq el (cons cha el))
   
8. )
   
9. (setq el (reverse el))
   
10. 
    
11. 执行完毕后，命令: !el
    
12. [color=blue]("建" "筑" "CAD" "技" "术")[/color]
    
13. 
    
14. [/FONT]

<br /> [FONT=courier new]<br /> (setq str "建筑CAD技术")<br /> ($XDLSP_Text_ToDb str)<br /> (while (setq cha ($XDLSP_Text_GetWord))<br />    (setq el (cons cha el))<br /> )<br /> (setq el (reverse el))<br /> <br /> 执行完毕后，命令: !el<br /> [color=blue]("建" "筑" "CAD" "技" "术")[/color]<br /> <br /> [/FONT]

再如：

2. 
   
3. [FONT=courier new]
   
4. (setq str "建筑CAD技术")
   
5. ($XDLSP_Text_ToDb str)
   
6. (while (setq cha ($XDLSP_Text_GetStr))
   
7.    (setq el (cons cha el))
   
8. )
   
9. (setq el (reverse el))
   
10. 
    
11. 执行完毕后，
    
12. 
    
13. 命令: (setq el (reverse el))
    
14. [color=blue]("建" "筑" "C" "A" "D" "技" "术")[/color]
    
15. 
    
16. [/FONT]

<br /> [FONT=courier new]<br /> (setq str "建筑CAD技术")<br /> ($XDLSP_Text_ToDb str)<br /> (while (setq cha ($XDLSP_Text_GetStr))<br />    (setq el (cons cha el))<br /> )<br /> (setq el (reverse el))<br /> <br /> 执行完毕后，<br /> <br /> 命令: (setq el (reverse el))<br /> [color=blue]("建" "筑" "C" "A" "D" "技" "术")[/color]<br /> <br /> [/FONT]

通过上面例子可以看到，就用一个循环就可以处理，自动判断是否处理完毕，循环里面也不用你处理字符指针位置，$XDLSP_Text_GetStr 和 $XDLSP_Text_GetWord 一次读出一个需要的文字，直到末尾返回NIL，循环结束，XDLSP.LSP里面还定义了很多实用的函数，对文字处理配合上XDRX_API可以说到极致了。除了文字，还有其他方面的函数。

VIVID

标注------标注样式  在cad2002下不可用，提示如下：
XDimstyle 未知命令“XDIMSTYLE”。按 F1 查看帮助

eachy

最初由 VIVID 发布
[B]标注------标注样式  在cad2002下不可用，提示如下：
XDimstyle 未知命令“XDIMSTYLE”。按 F1 查看帮助 [/B]

释放到 XDSoft\Sys 目录下，用【菜单更新】命令或输入 (load  "xdsoft.mnl")

xzg_hello

最初由 XDSoft 发布
[B][QUOTE]最初由 xzg_hello 发布
[B]xdrx_string_mid

功    能：返回字符串从中间指定位置开始，指定长度的字符串(类似 Basic 语言的MID$)

调用格式：(xdrx_string_mid <字符串> <开始位置> <长度>)

... [/B]

帮助文件中的说明是错的

xzg_hello

最初由 XDSoft 发布
[B][QUOTE]最初由 xzg_hello 发布
[B]xdrx_string_mid

功    能：返回字符串从中间指定位置开始，指定长度的字符串(类似 Basic 语言的MID$)

调用格式：(xdrx_string_mid <字符串> <开始位置> <长度>)

... [/B]

帮助文件中的范例是错的

liull2

请问晓东：我的机子是WINXP操作系统；原先用R14安装了晓东和理正都使用正常；看论坛上的帖子很想玩R2002汉化的；安装后使用正常但在系统配置加上晓东和理正后就问题多多。贴上这个贴子请晓东帮助诊断一下。不胜感激。

XDSoft

最初由 liull2 发布
[B]请问晓东：我的机子是WINXP操作系统；原先用R14安装了晓东和理正都使用正常；看论坛上的帖子很想玩R2002汉化的；安装后使用正常但在系统配置加上晓东和理正后就问题多多。贴上这个贴子请晓东帮助诊断一下。不胜感激?.. [/B]

晓东工具箱和其他二次开发软件一起公用，在WIN2000下是没有问题的，我没有装XP，XP下情况不清楚，从理论上说，也不应该出问题。

你单独启动ACAD，别用其他二次开发软件，然后用“晓东工具箱”的2000＋上链接程序，链接过来。看看工具箱是否还有问题。

从API提示的版本来看，你没有下载最新的“晓东工具箱”0.24版。

VIVID

CAD2002加载晓东工具箱0.24版错误提示：
错误 ->  第 1114 行出现菜单语法错误。

另：标注------标注样式问题已解决，谢谢！

红苹果

问题如下，第一个自己已搞定，第二个请解决
http://www.xdcad.net/forum/showthread.php?threadid=13568

xzg_hello

能否将交点断开设定为两种方式，一种是现在的，可作为默认方式，另外一种定义为某图元与其他图元相交时，其他图元在交点处断开，基准图元默认自身不断开。

hzx

xdrx_gettch 说明如下：
功能：返回天正建筑安装路径+"子目录名"，如 (gettch "SYS\\"), 返回 "C:\\TCH\\SYS\\"。
调用格式：(xdrx_gettch  [子目录名]  [规则])

说明：1.若给参数[规则]，则忽略前面的[子目录名]。
      2.参数[规则]：0，1，返回天正建筑安装路径(最后一定带\\)。
                   2：返回天正建筑安装路径＋"SYS\\"。
                   3：返回天正建筑安装路径＋"LISP\\"。
                   4：返回天正建筑安装路径＋"DDBL\\"。
                   5：返回天正建筑安装路径＋"DDBLM\\"。
                  
返回值：成功返回路径，失败返回NIL.

但是我发现返回值有误，比如：
(gettch "SYS\\") 只返回"\SYS\\"   应返回"C:\\TCH\\SYS\\"
(gettch)         只返回""         应返回"C:\\TCH\\"
(gettch 2)       只返回"\SYS\\"   应返回"C:\\TCH\\SYS\\"
(gettch 3)       只返回"\SYS\\"   应返回"C:\\TCH\\LISP\\"

等等

柯寒

尺寸合并和尺寸断开还有问题：
1. 尺寸合并：对非自动标注的尺寸，合并后的尺寸非前两尺寸值的和。
2. 尺寸断开：对非自动标注的尺寸，断开后为按比例分配原尺寸。
以上两条都是针对手动修改后的尺寸而言。
希望今后予以修正！