Как объявить статические переменные в Delphi 2009?

При тестировании контракта интерфейсного или базового класса я предпочитаю позволять среде тестирования автоматически заботиться о нахождении всех лиц, осуществляющих внедрение. Это позволяет Вам сконцентрироваться на интерфейсе под тестом и быть довольно уверенными, что все реализации будут протестированы, не имея необходимость делать большую ручную реализацию.

  • Для xUnit.net , я создал библиотека Type Resolver для поиска всех реализаций конкретного типа (расширения xUnit.net являются просто тонкой оберткой по функциональности Преобразователя Типа, таким образом, это может быть адаптировано к использованию в других платформах).
  • В MbUnit, можно использовать CombinatorialTest с UsingImplementations атрибуты на параметрах.
  • Для других платформ, шаблон базового класса упомянутый Spoike может быть полезным.

Вне тестирования основ интерфейса, необходимо также протестировать ту каждую отдельную реализацию, следует за ее конкретными требованиями.

6
задан unkulunkulu 8 August 2012 в 12:14
поделиться

1 ответ

type
  TMyClass = class(TObject)
  private
    class var FX: Integer;
  public
    class property X: Integer read FX write FX;
  end;

или короче, если вы не используете свойство

type
  TMyClass = class(TObject)
  public
    class var X: Integer;
  end;

edit : обратите внимание на класс в классе var. Вы забыли эту часть.

18
ответ дан 8 December 2019 в 13:01
поделиться
Другие вопросы по тегам:

Похожие вопросы: