在线求相助！（急）

在线求帮助！（急）
我想使dataset的事件由代码控制是否触发
  比如 OnCalcFields 事件 
N =1 时 dataset可以触发 cdsCalcFields
N =2 不能触发
代码中我想以这种方式实现 
就像 if n = 1 then
       dataset.OnCalcFields := <过程名>
     else if n= 2 then
        dataset.OnCalcFields := <空值或空字符>
就像 未生成时操作dataset 中事件一样。
   如果是赋值  我是给 过程名 还是怎么弄？
[解决办法]
 if n = 1 then
        dataset.OnCalcFields := 过程名
      else if n= 2 then
         dataset.OnCalcFields := NIL;