Source position: db.pas line 778
protected procedure TBCDField.SetVarValue(
const AValue: Variant
); override;