Código Delphi [-] cr.ParamFields[i].CurrentValue := Valor
cr.ParamFields[i].CurrentValue := Valor
Código Delphi [-] cr.Selection.Formula.Add(Formulas.Strings[i])
cr.Selection.Formula.Add(Formulas.Strings[i])