Source position: tiObject.pas line 227
protected procedure TtiFieldCurrency.SetAsString(
const AValue: string
); override;