lcy_8031 发表于 2008-11-28 16:08:00

带参数的函数定义

我在定义一个函数Test后,怎么实现在命令中输入Test -p后，提示用户输入一个字符串，输入Test则直接引用用户上一次输入的字符

caoyin 发表于 2008-11-28 16:24:00

楼主说的是函数还是命令行的操作，没看明白

liminnet 发表于 2008-11-28 16:32:00

lcy_8031 发表于 2008-11-28 16:35:00

<p>我是想在命令行实现这样的操作，怎么去定义这个函数</p>

ZZXXQQ 发表于 2008-11-28 22:38:00

<p>不用非输入-p吧？下面程序在提示输入字串时空回车默认前次输入字串。<br/>(defun c:test ()<br/>&nbsp;(setq str1 (getstring (strcat "\nEnter a string " (if (/= str "") (strcat "&lt;" str "&gt; :") ":"))))<br/>&nbsp;(setq str (if (/= str1 "") str1 str))<br/>&nbsp;(princ str)<br/>&nbsp;(princ)<br/>)<br/></p>

不死猫 发表于 2008-11-28 23:13:00

<p>定义一个全局变量</p><p>每次执行程序就把这个变量作为默认提示</p><p>回车就认为是这个变量值</p><p>&nbsp;(if (not (numberp scale))(setq scale 0.5))<br/>&nbsp;(setq temp (getreal "缩放比例"))<br/>&nbsp;(if (not temp)(setq temp scale)(setq scale temp))</p>

lcy_8031 发表于 2008-12-1 13:53:00

<p>以上两位的思路是对的，但是代码我怎么调试都达不到要求啊！晕死了。。。</p>

lcy_8031 发表于 2008-12-1 14:27:00

<p>终于搞定了，第一次执行的时候还得判断str是否为nil！多谢大家的帮助啊！</p>
页: [1]
查看完整版本: 带参数的函数定义