请教数据类型问题(100)

var FLarea,ZGarea,XSarea:real;FLarea:=strtofloat(table2.fieldbyname('AREA1').Asstring)+strtofloat(table2.fieldbyname('AREA2').Asstring)+1;ZGarea:=table2.fieldbyname('AREA1').AsFloat+table2.fieldbyname('AREA2').AsFloat+table2.fieldbyname('AREA3').AsFloat+table2.fieldbyname('AREA4').AsFloat;以上代码，在运行的时候，我跟踪FLarea和ZGarea后发现，居然没有成功赋值，真是难道我了，谢谢高手指点

把数据库里取出的值showmessage看看吧

是不是 FLarea 和 ZGarea 只声明并想赋值,但后面又没有用到这两个值?如果是这样的话, Delphi 是不会编译这两句的. 必须后用到这两个值才会编译

有没有报错？有可能是没从表中取到值或转换浮点型时出错。

以前遇过这种情况，当时是有些字段为空，后来在定义字段时加上默认值就解决了