[求助]：程序中如何确定按下的是鼠标左键？

czg09180274

如何使用函数才能使程序只有在用户用鼠标左键来确定输入点时进行循环，否则退出程序？（也就是循环次数由用户按下鼠标左键的次数来决定）

请高手指点。
  先谢过各位了

狂刀

(while (setq pt(getpoint))
...
)

aeo

getpoint可以用键盘的

2. 
   
3. (setq is t)
   
4. (while  is
   
5.          (initget 128)
   
6.          (setq pt (getpoint "Pick:"))
   
7.         (cond ((= 'str (type pt)) (setq is nil))
   
8.                    ((null pt) ....)
   
9.                    ((listp pt)  gogogo .....
   

<br /> (setq is t)<br /> (while  is<br />          (initget 128)<br />          (setq pt (getpoint "Pick:"))<br />         (cond ((= 'str (type pt)) (setq is nil))<br />                    ((null pt) ....)<br />                    ((listp pt)  gogogo .....<br />

czg09180274

多谢各位指点，
　　我试试先