明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2918|回复: 11

[求助]请教怎样获单行字符串长度

  [复制链接]
发表于 2004-2-18 08:48:00 | 显示全部楼层 |阅读模式
本帖最后由 作者 于 2004-2-18 9:52:41 编辑

正在学,请教用什么函数及怎样获取单行字符串长度?目的是想在文字下画与字符串等长的直线,劳驾高手举例指点一二,不胜感激!
发表于 2004-2-18 09:46:00 | 显示全部楼层
文字結合 %%u         即可
 楼主| 发表于 2004-2-18 09:49:00 | 显示全部楼层
在下刚迈进门槛,实在太菜,请楼上的说具体些好吗,能给点code最好了,谢谢?
发表于 2004-2-18 10:00:00 | 显示全部楼层
用 textbox 涵數
发表于 2004-2-18 10:01:00 | 显示全部楼层
(setq txt "abcdefg")
(setq txt (strcat "%%u" txt)) (command "text" ....... 寫出文字時自動畫出底線
 楼主| 发表于 2004-2-18 10:24:00 | 显示全部楼层
to4楼 它返回的是2对角点,如果文字是斜的,要比较长的code才能取得字符串的长度对吗?不知还有什么比较简便的办法没有?谢谢你!


to5楼         你的方法是写文字时直接加下划线对吗?我是想要知道长度最好,因为可以调整线与文字之间的相对距离。谢谢!


我真是菜,还有点笨,还请各位多多指教!
发表于 2004-2-18 10:45:00 | 显示全部楼层
你如果這樣寫就好的. LISP程序如下. 呵呵 (defun c:test(/ a s ss )
(setq a(entsel"請選要加下劃線的TEXT:"))
(setq s(car a))
(setq ss(textbox (list(assoc 1 (entget s)))))
(command "ucs" "ob" s)
(command ".line" (car ss) (list (car (cadr ss)) (cadr (car ss)) ) "")
(command "ucs" "")
(princ))
 楼主| 发表于 2004-2-18 11:15:00 | 显示全部楼层
thanks BDYCAD版主!
发表于 2004-2-18 11:26:00 | 显示全部楼层
用strlen 获得长度

评分

参与人数 1明经币 +1 收起 理由
bzhjl + 1

查看全部评分

发表于 2004-2-18 12:22:00 | 显示全部楼层
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-6-9 04:06 , Processed in 0.168402 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表