[LISP函数]：关于错误提示为stringp (F001)的问题

guohq

已知data的值为(F001 123.123 456.456)
(setq pt_name (nth 0 data))
此时pt_name的类型应为sym,现在想在alert中显示pt_name的值，请问有什么方法吗？

cy956

alert中应是string。
你的pt_name可能出现几种变量类型？

guohq

读入后，通过(type pt_name)查询得知，pt_name的变量类型为sym,而alert只认str啊,现在就是想能不能将F001改为字符串类型，那样不就可以在alert中使用了？

zml84

data中数据是从何处而来？

1. 
   
2. <PRE><FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">setq</FONT> <FONT face="Fixedsys">DATA</FONT>    <FONT face="Fixedsys" COLOR="#990000">'</FONT><FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys">F001</FONT> <FONT face="Fixedsys" COLOR="#009999">123.123</FONT> <FONT face="Fixedsys" COLOR="#009999">456.456</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT>
   
3.       <FONT face="Fixedsys">PT_NAME</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">nth</FONT> <FONT face="Fixedsys" COLOR="#009900">0</FONT> <FONT face="Fixedsys">DATA</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT>
   
4. <FONT face="Fixedsys" COLOR="#FF0000">)</FONT>
   
5. <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">alert</FONT> <FONT face="Fixedsys" COLOR="#FF0000">(</FONT><FONT face="Fixedsys" COLOR="#0000FF">vl-princ-to-string</FONT> <FONT face="Fixedsys">PT_NAME</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT><FONT face="Fixedsys" COLOR="#FF0000">)</FONT>
   
6. </PRE>
   

复制代码

guohq

data数据是通过读文件的方式读进去的

guohq

data数据是通过读文件的方式读进去的

zml84

要的可是这样：

2. 
   
3. 
   
4. (setq STR     "(F001 123.123 456.456)"
   
5.       DATA    (read STR)
   
6.       PT_NAME (nth 0 DATA)
   
7. )
   
8. (alert (vl-princ-to-string PT_NAME))
   

<br /> <br /> (setq STR     "(F001 123.123 456.456)"<br />       DATA    (read STR)<br />       PT_NAME (nth 0 DATA)<br /> )<br /> (alert (vl-princ-to-string PT_NAME))<br />