【搞定】计算字段取值**

jxsong

计算字段A展示的时候是1 ，可是取字段值的时候却是0
这是该计算字段onCalcField中的一段
字段类型是整数
if c = d then
    begin
      value := 1;
      jsDialogs.showmsg(sysutils.IntToStr(DataSetXC.FieldByName('A').AsInteger), 'aa');
    end
    else
    begin
      value := 0;
    end;

dialog的结果是0，可是前面明明取值为1呀，这是为什么？

atiger

呵呵，我测试了，要直接给字段赋值就对了，但运行后值又看不到，如果你着急，你先这样做
DataSetXC.FieldByName('A').AsInteger:= 1;
Value :=1;

这样又运行后，在界面上又看到值，你访问也能访问到实际赋的值

lisb

计算字段只有onCalcField事件执行完后才能赋上值，你的  jsDialogs.showmsg(sysutils.IntToStr(DataSetXC.FieldByName('A').AsInteger), 'aa');
这句代码写在这里字段里还没有值呢，你把这句放到其他的地方执行一下看看就有值了。

jxsong

to2楼  ： 好吧，这样确实可以实现了
to3楼  ： 不是，也没有值，我就是在调用窗体中使用dialog取出的为0 ，才想到事件中看看

多谢，解决了

atiger

ok