在关闭form时，触发事件？

digitzing

用什么函数可以在在关闭form时，触发事件？



试过下面这个不行

1. axlCmdRegister("pis" 'Part_Place_Inside ?cmdType "interactive" ?doneCmd 'pisDone
   
2. ?cancelCmd 'piscancel)

复制代码

db-_-

应该可以捕获事件，但我觉得没必要，我一般都在这里处理。
Notes:
The doneState shows 0 for most actions. If a button with Done or Ok is pushed, then the done state is set. A button with the Cancel label sets the cancel state. In either the Done or Cancel state, you need to close the form with axlFormClose. If the abort state is set, the form closes even if you do not issue an axlFormClose.

以下代码摘自x:\Cadence_SPB_17.2-2016\share\pcb\examples\skill\form\basic目录下的axlform.il

1. (defun _afCallback (fw)
   
2.      (prog (t1 item field cnt)
   
3.         
   
4.         ; support for active help (like in enved cmd) - must enable capability by
   
5.         ; calling axlFormSetMouseActive after form is opened
   
6.         when(fw->mouseActive
   
7.                 axlFormSetField(fw "active_help" sprintf(nil "Help for %s" fw->curField))
   
8.             return(t)
   
9.         )
   
10.         (printf "field/value %L = %L (int %L\n)"
    
11.                 fw->curField fw->curValue, fw->curValueInt )
    
12.         (printf "doneState %L\n" fw->doneState )
    
13. 
    
14.         case(fw->curField
    
15.                 ("tab"
    
16.                         f1s_lastTab = fw->curValue)
    
17.         )
    
18.                
    
19.        if((nequal fw->doneState 0)  then
    
20.             axlFormClose(fw)
    
21.                 ;;;;在这里添加
    
22.                
    
23.         )
    
24.         return()
    
25. ))

复制代码

serenade

我在VS2005 中向 _closed()事件添加了事件响应函数，调用了Application.exit()可是，在模拟器上关闭程序时(点击右上角的×之后)，通过调试，发现并没有调用 _closed()。

digitzing

db-_- 发表于 2022-2-22 12:21
应该可以捕获事件，但我觉得没必要，我一般都在这里处理。
Notes:
The doneState shows 0 for most actio ...

可以，感谢！

digitzing

zs_king 发表于 2022-3-4 12:53
和其他控件的判断一样，curfield  在关闭按钮点下的时候 ，返回的是 双引号引起来的一个空字符

是的，今天无意发现，case增加一个 （“”        这里添加关闭代码 ） 就行了 ，很简单

hifirockz

thanks for info!