24小时热门版块排行榜    

查看: 811  |  回复: 0

fmh_ustc

新虫 (初入文坛)

[交流] fluent的scheme的问题

我写了一个fluent的scheme,当检测到有这个文件生成时自动运行以下代码,但是没有响应,求高手解答
(define(change_fix)
(if(file-exists? "change_fix.tmp"
(begin
(cx-gui-do cx-activate-item "MenuBar*DefineMenu*Cell Zone Conditions..."
(cx-gui-do cx-set-list-selections "Boundary Conditions*Frame1*Table1*Frame1*List1(Zone)" '( 1))
(cx-gui-do cx-activate-item "Boundary Conditions*Frame1*Table1*Frame1*List1(Zone)"
(cx-gui-do cx-activate-item "Boundary Conditions*Frame1*Table1*Frame2*Table2*Frame4*Table4*ButtonBox1*PushButton1(Edit)"
(cx-gui-do cx-set-toggle-button "fluid-3-1*Frame4*Table4*CheckButton7(Fixed Values)" #t)
(cx-gui-do cx-activate-item "fluid-3-1*Frame4*Table4*CheckButton7(Fixed Values)"
(cx-gui-do cx-activate-item "fluid-3-1*PanelButtons*PushButton1(OK)"
(cx-gui-do cx-activate-item "NavigationPane*Frame1*PushButton19(Run Calculation)"
(cx-gui-do cx-activate-item "Run Calculation*Frame1*Table1*PushButton21(Calculate)"
)
)
)
回复此楼
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

智能机器人

Robot (super robot)

我们都爱小木虫

相关版块跳转 我要订阅楼主 fmh_ustc 的主题更新
普通表情 高级回复 (可上传附件)
信息提示
请填处理意见