BDYCAD 发表于 2005-8-8 16:38:00

[ARX]我愛學習ARX剛剛起步, 多多指教啊

<P>我刚学会一点点的ARX. 先来一个改lisp涵数的涵数GETPOINT的名为USERPOINT源码.</P>
<P>// This is command 'USERPOINT'<BR>int USERPOINT()<BR>{<BR>&nbsp;// TODO: Implement the command<BR>&nbsp;resbuf *pArg =acedGetArgs () ;<BR>&nbsp;&nbsp;if( pArg == NULL)<BR>&nbsp;{<BR>&nbsp;&nbsp;acedRetNil();<BR>&nbsp;&nbsp;return RTERROR;<BR>&nbsp;}<BR>&nbsp;else<BR>&nbsp;{<BR>&nbsp;&nbsp;CString strin;<BR>&nbsp;&nbsp;resbuf *tb;<BR>&nbsp;&nbsp;ads_point PT1;<BR>&nbsp;&nbsp;tb= pArg;<BR>&nbsp;&nbsp;strin = tb-&gt;resval.rstring;<BR>&nbsp;&nbsp;&nbsp;acedGetPoint(NULL,strin,PT1);<BR>&nbsp;//acedGetSym("PT1",PT1);<BR>&nbsp;acedRetPoint(PT1);<BR>&nbsp;}</P>
<P><BR>&nbsp;return (RTNORM) ;<BR>}<BR></P>
<P>跟随上面的方式, 我想再改进改进. 但不太会, 请大侠指点指点啊!</P>
<P>我想改把这个涵数改成 (USERPOINT [变量名] [提示]); 这样用的</P>
<P>意思是想把这个USERPOINT涵数是得出的点做成一个变量, 这个变量就是在涵数输入的第一个参数 [变量名], 还望多多指教, 谢谢!!!!</P>

zfbj 发表于 2005-8-8 22:51:00

要学习ARX，就要抛开LISP的编程习惯，不要再费劲去改成LISP的格式了吧。

BDYCAD 发表于 2005-8-9 07:54:00

<P>呵呵. 不能一下就抛开的. 因为我不能一下就放下工作马上改用arx, 因为没有人能接手我手上的工作嘛. 只能一边在开发VLISP的同时学会ARX, 等会了才可以慢慢的转变的啊.,&nbsp; 虽然过程有点慢,</P>
页: [1]
查看完整版本: [ARX]我愛學習ARX剛剛起步, 多多指教啊