to everybody:
//仅供参考:
//作用: 判断某一 DataSet 中是否含有指定的 字段
function HasField(aDataSet: TDataSet;aField: String): Boolean;
var
Field: TField;
begin
Result := False;
Field := aDataSet.FindField(aField);
if Field <> nil then
Result := True
end;
//调用:
if HasField(D, 'GoodsID') AND HasField(D, 'Quantity') then
begin
UpdateDQItemNo(OldItemNo, NewItemNo);
end;
