Source position: tiObject.pas line 232
protected procedure TtiFieldCurrency.SetAsCurrencyString(
const AValue: string
);