[求助]：如何获得 文本的数值?

yitian519

如何获得 文本的数值?在cad中如何获得已有文本的数值?
如何获得 文本的的坐标?
谢谢

wuhankp

同问，谢谢

zml84

模拟代码片段如下：

1. 
   
2. <CENTER><H1>tmp2.lsp</H1></CENTER>
   
3. <SCRIPT LANGUAGE="JavaScript">document.write("最后修改时间: " + document.lastModified)
   
4. </SCRIPT>
   
5. <HR SIZE=5><PRE><FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">if</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">and</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">setq</FONT> <FONT face="Fixedsys">S1</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">entsel</FONT> <FONT face="Fixedsys" COLOR="#FF00FF">"\n点取单行文本对象："</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
   
6.          <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">setq</FONT> <FONT face="Fixedsys">ENT</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">entget</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">car</FONT> <FONT face="Fixedsys">S1</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
   
7.          <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">=</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">cdr</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">assoc</FONT> <FONT face="Fixedsys" COLOR="#009900">0</FONT> <FONT face="Fixedsys">ENT</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT> <FONT face="Fixedsys" COLOR="#FF00FF">"TEXT"</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
   
8.     <FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
   
9.     <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">progn</FONT><br>
   
10.         <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">setq</FONT> <FONT face="Fixedsys">STR</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">cdr</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">assoc</FONT> <FONT face="Fixedsys" COLOR="#009900">1</FONT> <FONT face="Fixedsys">ENT</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
11.               <FONT face="Fixedsys">INT</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">atof</FONT> <FONT face="Fixedsys">STR</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
12.         <FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
13.         <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">princ</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">strcat</FONT> <FONT face="Fixedsys" COLOR="#FF00FF">"\n文本内容: ""</FONT> <FONT face="Fixedsys">STR</FONT> <FONT face="Fixedsys" COLOR="#FF00FF">""  数字: "</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
14.         <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">princ</FONT> <FONT face="Fixedsys">INT</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
15.     <FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
16.     <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">princ</FONT> <FONT face="Fixedsys" COLOR="#FF00FF">"\n对象不是单行文本对象"</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
17. <FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
18. <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">princ</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><br>
    
19. </PRE>
    

复制代码

yitian519

文本的的坐标怎么得到 zml84    快来,还有插入点坐标怎么解决

animal212

ZML84好棒！！   

     zml84都帮你指点到这一步了，建议你去好好学学组码，也就是assoc的用法。“当你能够熟练使用对象的群组码之时，那么恭喜你，你的功力已经达到了第二层。”

TLHMQH

ZML84即有材，又有德！
http://p4.xdcad.net/forum/showthread.php?s=&threadid=626176

yitian519

此函数将在联合表 (association list) alist 中搜寻以item 为名称的对应值, 如果找到, 则 assoc 会返回其对应值。若找不到, 则会返回 nil。
(assoc 0 ENT)
坐标是不是(assoc 1 ENT)?

okokok235

你说的文本是cad里头的文本还是文本文件？

yitian519

文字 (TEXT)

1 = 文字内容
7 = 字型
10 = 插入点
11 = 对齐点

40 = 文字高度
50 = 旋转角度
41 = X方向比例系数
51 = 倾斜角度

71 = 显示模式 (1=正常 2=左右颠倒 3=上下颠倒)
72 = 水平对齐模式 (0=靠左 1=中央 2=靠右 3=Align 4=Middle 5=Fit)
73 = 垂直对齐模式 (0=基线 1=底部 2=中央 3=顶部)


坐标是不是(assoc 11  ENT)?
再次感谢zml84