type
  TAntigateParams: class
    Key: string;
    Phrase: integer;
    Regsens: integer;
    Calc: integer;
    Numeric: integer;
    Russian: integer;
    MinLen: integer;
    MaxLen: integer;
    MaxRetry: integer;
    WaitTime: integer;
  end;

  TAntigate = class(TObject)
  private
    FParams: TAnigateParams;
  public
    .............................
    constructor Create(AParams: TAntigateParams);
  end;

  // в коде методов класса TAntigate просто обращамся к настройкам FParams.Key и т.д.
  // экземппляр TAntigateParams глобальных и один для всех экземпляров и потоков
  // можно создавать с началом работы программы и уничтожать с ее закрытием
  // к этому классу можно применить паттерн Синглтон
  // методы FGetAntiParam и FSetAntiParam не нужны, также как и многочисленные свойства в классе TAntigate