Source position: db.pas line 1172
protected procedure TVariantField.SetAsFloat(
aValue: Double
); override;