hawnn 发表于 2009-7-25 23:56:00

[求助]lisp延时处理

<p>我做了一个批量打印的程式,可以把一个图档内N张图纸一次性打出来</p><p>美中不足的是,打印过程不能取消</p><p>在打印过程中如果发现什么错误不按Esc等什么都退不出来</p><p>只能通过进程管理器来强制关闭CAD实现.</p><p></p><p>我想问的是,下面一段代码,如何加入一个延时程序,如果一段时间内(假设3秒)没有按Esc键取消,则继续打印，否则结束Lsp循环</p><p>(setq w T)</p><p>(While W</p><p>……</p><p>……</p><p>(command "plot" "y" "" "Canon iP1100 series" "" "" "L" "" "w" P_1 P_2 "" "" "" "" "" "" "n" "n" "y"))</p><p>);end while</p>

yoyoho 发表于 2009-7-26 09:29:00

;;;delay延迟时间&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br/>指令: (command "delay" "5000")&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <br/>delay 输入延迟时间 (微秒): 5000&nbsp;&nbsp; ;;延迟5秒

hawnn 发表于 2009-7-26 10:52:00

<p>delay……</p><p>好像不以能用Esc取消吧，那这样我的延时没有意义呀</p><p>有其它办法没有啊？</p>

zml84 发表于 2009-7-26 15:06:00

grread 内实现吧。<div><br/></div>

hawnn 发表于 2009-7-26 18:37:00

<p>grread能延时处理吗?</p>
页: [1]
查看完整版本: [求助]lisp延时处理