xiahwan 发表于 2007-8-4 10:21:00

[求助]如何在屏幕指定的位置上显示列表的内容

<p>LISP中由N个点组成的点列表 如何将列表中各点的数据输出到屏幕指定的位置</p>

Andyhon 发表于 2007-8-4 11:59:00

(foreach pt ptList (command "Point" pt))

xiahwan 发表于 2007-8-4 15:54:00

对不起 我想要的是将点列表内的数值 输出到屏幕上

Andyhon 发表于 2007-8-4 16:53:00

<p>输出到屏幕上?</p><p>条件依据!? 不能光要大伙儿用猜的呀!<br/></p>

carrot1983 发表于 2007-8-4 18:01:00

<p>说清楚了,对你对大家都好,</p><p>大家好才是真的好....呵</p>

xiahwan 发表于 2007-8-6 16:37:00

<p>问题解决了 谢谢朋友的关注</p><p>我的解决方法</p><p>(SETQ N -1)<br/>(REPEAT (LENGTH ptlst)<br/>&nbsp; (setq pt1(list (+(car pt)(/ pl 2)) (- (cadr pt) (* 2(* zf (SETQ N (1+ N))))) 0))<br/>&nbsp; (setq as(NTH n ptlst))<br/>&nbsp; (setq as1(strcat "X_" (rtos(car (NTH n ptlst)) 2 1) "&nbsp;&nbsp;&nbsp; Y_" (rtos(cadr (NTH n ptlst)) 2 1)))<br/>&nbsp;(COMMAND "text" pt1 zf 0 as1)<br/>&nbsp;&nbsp; )</p><p></p>
页: [1]
查看完整版本: [求助]如何在屏幕指定的位置上显示列表的内容