本站微信 收藏本站 设为首页
 找回密码
 注册

QQ登录

只需一步，快速开始

扫一扫，访问微社区

巢课
电巢直播8月计划
EDA365电子工程师网»技术社区 › 电子技术社区 › Allegro Skill开发 › axlUIPrompt的值怎么传入另一个函数？
返回列表 发新帖
查看: 277|回复: 9
打印 上一主题 下一主题

axlUIPrompt的值怎么传入另一个函数？

[复制链接]
lyh289114980

97

主题

314

帖子

670

积分

三级会员(30)

Rank: 3Rank: 3Rank: 3

积分
670
跳转到指定楼层
1#
发表于 2015-3-6 13:16 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

EDA365欢迎您！

您需要 登录 才可以下载或查看，没有帐号？注册

x

axlUIPrompt的值怎么传入另一个函数？
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友 微信微信
收藏收藏1 支持！支持！ 反对！反对！
~

下载资料威望不够？点击查看获取威望的N种方法>>
回复

举报

EDA365微信号及QQ群号！
霹雳风雷

68

主题

613

帖子

4089

积分

五级会员(50)

Rank: 5

积分
4089
2#
发表于 2015-3-6 13:19 | 只看该作者
定义变量，赋值到另一个函数，或者进行函数嵌套也行

点评

lyh289114980
你帮我看下怎么写，代码已经贴上。谢谢！  详情 回复 发表于 2015-3-6 15:12
無極生太極 太極生兩儀 兩儀生四象 四象生八卦 八卦生六十四卦 六十四卦生宇宙萬物

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

lyh289114980

97

主题

314

帖子

670

积分

三级会员(30)

Rank: 3Rank: 3Rank: 3

积分
670
3#
 楼主| 发表于 2015-3-6 15:11 | 只看该作者

(defun test8 ()
testform=outfile("test.form" "w")
fprintf(testform "FILE_TYPE=FORM_DEFN VERSION=2\n")
fprintf(testform "FORM\n")
fprintf(testform "FIXED\n")
fprintf(testform "PORT 83 50\n")
fprintf(testform "HEADER \"testprintinfo\"\n")
fprintf(testform "TILE\n")

fprintf(testform "FIELD Add_Field\n")
fprintf(testform "FLOC 10 3\n")
fprintf(testform "MENUBUTTON \"add\" 10 3\n")
fprintf(testform "ENDFIELD\n")

fprintf(testform "FIELD print_Field\n")
fprintf(testform "FLOC 30 3\n")
fprintf(testform "MENUBUTTON \"Print\" 10 3\n")
fprintf(testform "ENDFIELD\n")
fprintf(testform "ENDTILE\n")
fprintf(testform "ENDFORM\n")
close(testform)
test8_form=axlFormCreate( (gensym) "test.form" nil 'test_action t)
axlFormDisplay(test8_form)
)

(defun test_action (test8_form)
(prog ()
  case(test8_form->curField
  ("Add_Field"
  add_fun()
  t)
  ("print_Field"
  print_fun()
  t)
  
  );end case

);end prog
)
/*--------------------------------------------
如果有需要才会执行添加动作
-------------------------------------------*/
(defun add_fun ()
add_sym=axlUIPrompt("Enter the type of symbol:" nil)
)
;*******************************************************************
(defun print_fun ()
print_list=list("aa" "bb" "cc")
when(add_sym
print_list=cons(add_sym print_list)
)
foreach(printlist print_list
printf("%s\n" printlist)
)
)

像上面这个代码就有问题：一定要我添加才能正常运行打印功能
我的目的是：我想打印出print_list这里面的三个元素，如果我想要往print_list添加n元素，然后也能打印print_list全部元素出来。请问要怎么写代码，谢谢！

点评

XYX365
把這一行改一下 原來: add_sym=axlUIPrompt("Enter the type of symbol:" nil) 修正: add_sym=axlUIPrompt("Enter the type of symbol:" "") axlUIPrompt函數第二個參數必須是字串  详情 回复 发表于 2015-3-6 16:17
~

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

lyh289114980

97

主题

314

帖子

670

积分

三级会员(30)

Rank: 3Rank: 3Rank: 3

积分
670
4#
 楼主| 发表于 2015-3-6 15:12 | 只看该作者
霹雳风雷 发表于 2015-3-6 13:19
定义变量，赋值到另一个函数，或者进行函数嵌套也行

你帮我看下怎么写，代码已经贴上。谢谢！
~

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

XYX365

57

主题

1857

帖子

7919

积分

六级会员(60)

Rank: 6Rank: 6

积分
7919
5#
发表于 2015-3-6 16:17 | 只看该作者
lyh289114980 发表于 2015-3-6 15:11
(defun test8 ()
testform=outfile("test.form" "w")
fprintf(testform "FILE_TYPE=FORM_DEFN VERSION= ...

把這一行改一下
原來:
add_sym=axlUIPrompt("Enter the type of symbol:" nil)

修正:
add_sym=axlUIPrompt("Enter the type of symbol:" "")

axlUIPrompt函數第二個參數必須是字串

点评

lyh289114980
依然出错：E- *Error* eval: unbound variable - add_sym PS:没有点击ADD按时就会出现上面错误信息，如果点击ADD按钮输入内容就不会。问题是我现在我一定要去添加才正常。最终目的就是我想添加就添加输出，不想添加  详情 回复 发表于 2015-3-6 16:33

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

lyh289114980

97

主题

314

帖子

670

积分

三级会员(30)

Rank: 3Rank: 3Rank: 3

积分
670
6#
 楼主| 发表于 2015-3-6 16:33 | 只看该作者
XYX365 发表于 2015-3-6 16:17
把這一行改一下
原來:
add_sym=axlUIPrompt("Enter the type of symbol:" nil)

依然出错：E- *Error* eval: unbound variable - add_sym
PS:没有点击ADD按时就会出现上面错误信息，如果点击ADD按钮输入内容就不会。问题是我现在我一定要去添加才正常。最终目的就是我想添加就添加输出，不想添加也能正常运行输出。这里有个选择的过程哦

点评

XYX365
在下面這一行前面加入 add_sym = nilwhen(add_sym  详情 回复 发表于 2015-3-6 16:54
~

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

XYX365

57

主题

1857

帖子

7919

积分

六级会员(60)

Rank: 6Rank: 6

积分
7919
7#
发表于 2015-3-6 16:54 | 只看该作者
lyh289114980 发表于 2015-3-6 16:33
依然出错：E- *Error* eval: unbound variable - add_sym
PS:没有点击ADD按时就会出现上面错误信息，如 ...

在下面這一行前面加入 add_sym = nil     when(add_sym


点评

lyh289114980
还是不能达到我的目的,现在都加不了按照你说的。  详情 回复 发表于 2015-3-9 09:31

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

lyh289114980

97

主题

314

帖子

670

积分

三级会员(30)

Rank: 3Rank: 3Rank: 3

积分
670
8#
 楼主| 发表于 2015-3-9 09:31 | 只看该作者
XYX365 发表于 2015-3-6 16:54
在下面這一行前面加入 add_sym = nil     when(add_sym

还是不能达到我的目的,现在都加不了按照你说的。

点评

XYX365
修改代碼如下  详情 回复 发表于 2015-3-9 11:09
~

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

XYX365

57

主题

1857

帖子

7919

积分

六级会员(60)

Rank: 6Rank: 6

积分
7919
9#
发表于 2015-3-9 11:09 | 只看该作者
lyh289114980 发表于 2015-3-9 09:31
还是不能达到我的目的,现在都加不了按照你说的。

修改代碼如下
  1. (defun test8 ()
  2.         add_sym = nil
  3.         testform=outfile("test.form" "w")
  4.         fprintf(testform "FILE_TYPE=FORM_DEFN VERSION=2\n")
  5.         fprintf(testform "FORM\n")
  6.         fprintf(testform "FIXED\n")
  7.         fprintf(testform "PORT 83 50\n")
  8.         fprintf(testform "HEADER \"testprintinfo\"\n")
  9.         fprintf(testform "TILE\n")

  11.         fprintf(testform "FIELD Add_Field\n")
  12.         fprintf(testform "FLOC 10 3\n")
  13.         fprintf(testform "MENUBUTTON \"add\" 10 3\n")
  14.         fprintf(testform "ENDFIELD\n")

  16.         fprintf(testform "FIELD print_Field\n")
  17.         fprintf(testform "FLOC 30 3\n")
  18.         fprintf(testform "MENUBUTTON \"Print\" 10 3\n")
  19.         fprintf(testform "ENDFIELD\n")
  20.         fprintf(testform "ENDTILE\n")
  21.         fprintf(testform "ENDFORM\n")
  22.         close(testform)
  23.         test8_form=axlFormCreate( (gensym) "test.form" nil 'test_action t)
  24.         axlFormDisplay(test8_form)
  25. )
  26. (defun test_action (test8_form)
  27.         (prog ()
  28.                   case(test8_form->curField
  29.                           ("Add_Field"
  30.                                   add_fun()
  31.                                   t
  32.                           )
  33.                           ("print_Field"
  34.                                   print_fun()
  35.                                   t
  36.                           )
  37.                   );end case
  38.         );end prog
  39. )

  41. (defun add_fun ()
  42.         add_sym=axlUIPrompt("Enter the type of symbol:" "")
  43. )
  44. ;*******************************************************************
  45. (defun print_fun ()
  46.         print_list=list("aa" "bb" "cc")
  47.         when(add_sym
  48.                 print_list=cons(add_sym print_list)
  49.         )
  50.         foreach(printlist print_list
  51.                 printf("%s\n" printlist)
  52.         )
  53. )
复制代码


点评

lyh289114980
THANKS YOU!COED CAN RUN NOW!  详情 回复 发表于 2015-3-9 18:24

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

lyh289114980

97

主题

314

帖子

670

积分

三级会员(30)

Rank: 3Rank: 3Rank: 3

积分
670
10#
 楼主| 发表于 2015-3-9 18:24 | 只看该作者
XYX365 发表于 2015-3-9 11:09
修改代碼如下

THANKS YOU!COED CAN RUN NOW!
~

下载资料威望不够？点击查看获取威望的N种方法>>
回复 支持 反对

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

关闭

推荐内容上一条 /1 下一条

巢课

技术风云榜

关于我们|手机版|EDA365 ( 粤ICP备18020198号 )

GMT+8, 2025-2-23 07:31 , Processed in 0.063291 second(s), 33 queries , Gzip On.

深圳市墨知创新科技有限公司

地址:深圳市南山区科技生态园2栋A座805 电话:19926409050

快速回复 返回顶部 返回列表