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