为什么不是按顺序执行?
<P>(command "dim1" "HORIZONTAL");进行水平标注</P><P>(some other code)</P>
<P>........</P>
<P>我想在标注命令执行完后再执行后面的命令,但是程序总是先执行后面的命令再执行标注,如何才能解决这个问题呢?</P> 再加两个paust可以解决问题 <P>加了PAUSE的话确实可以解决问题,但是又有了这样的矛盾</P>
<P>(setvar "cmdecho" 0);如果设置为0<BR>(command "dim1" "HORIZONTAL");进行水平标注时将不会显示提示用户指定标注点.<BR>(setvar "cmdecho" 1);如果设置为1<BR>(command "dim1" "HORIZONTAL");则显示了"dim1"等信息,看起来不爽.</P>
<P>怎么办才好呢<BR></P>
<P> </P> <P>你可以这样写</P>
<P>(vl-cmdf "dim1" "horizontal")</P>
<P>(vl-cmdf (提示表达示))</P>
<P>(vl-cmdf "")</P> <P>可以这样写：<BR>(command "dim1" "HORIZONTAL");进行水平标注<BR>(WHILE (NOT (ZEROP (GETVAR "CMDACTIVE"))) (COMMAND PAUSE))<BR>(some other code)</P>
<P> </P>
页:
[1]