兄弟们:
procedure TDMCOST.Q_surfaceCalcFields(DataSet: TDataSet);
begin
//怎么在OnCalcFields事件里判断 DataSet['FieldName'] 的值为空啊
还有怎么防止除数是零的情况
end;
procedure TDMCOST.Q_surfaceCalcFields(DataSet: TDataSet);
begin
//怎么在OnCalcFields事件里判断 DataSet['FieldName'] 的值为空啊
还有怎么防止除数是零的情况
end;
ShowMessage('null');
meiqingsong(阿飛),为什么在运行时会出现Incompatible:'Integer'and 'String'
的提示错误,编译没有问题。
meiqingsong(阿飛),为什么在编译时会出现Incompatible:'Integer'and 'String'
的提示错误.
是的话试试
if DataSet.Fields.Fields['FieldName'].AsInteger = 0 then
if DataSet.Fields.FieldByName('FieldName').IsNull then
ShowMessage('null');
DataSet.Fields.Fields['FieldName'].isnull分母是0加个0.0001
提示错误.
if DataSet.Fields.FieldByName('FieldName').IsNull then
ShowMessage('null');
SELECT *
FROM student
WHERE name is not null