我的计算字段中有包含除法的计算,如果我现在把表里的内容清空,,计算机将报错,因为除数不能为零,我现在 想怎样把计算事件先:=false。。
if 包含除法的字段不为空是,使计算事件:=true
请问这个方法行不行?怎样才能不让事件发生。

解决方案 »

  1.   

    计算事件 := false
    .....
    if 不为空 then
      计算;
      

  2.   

    你在前面加上if then就可以了
      

  3.   

    呵呵,这个问题 www.nxrs.net/bbs 上有啊;
    -------------------------------------
    如果您觉的您对Delpih感兴趣或是很想学的更好些或者是对Delphi有更深的认识,我们可以一起交流;
    呵呵
    www.nxrs.net/bbs
    谢谢,别抛砖,特别是版主:)
      

  4.   

    这个不难,在DataSet的OnCalFieds中写就可以了:
    procedure TForm1.Table1CalcFields(DataSet: TDataSet);
    begin
      with DataSet do
      try
        FieldByName('CalcField').AsFloat :=.../FieldByName('AField').AsFloat;
      except
        FieldByName('CalcField').AsFloat:=0;
      end;
    end;
    到www.nxrs.net/bbs上去那里用更多的关于计算字段的东西,去看看.我肯定你有收获。