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