DUnit: Как запустить тесты?

Question

Как запустить TestCase из IDE?

я создал новый проект, с одной, простой, форма:

unit Unit1; 

interface 

uses 
    Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 
    StdCtrls; 

type 
    TForm1 = class(TForm) 
    private 
    public 
    end; 

var 
    Form1: TForm1; 

implementation 

{$R *.DFM} 

end. 

Теперь я добавлю тест, чтобы проверить, что толкая Button1 делает то, что он должен:

unit Unit1; 

interface 

uses 
    Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 
    StdCtrls; 

type 
    TForm1 = class(TForm) 
    Button1: TButton; 
    procedure Button1Click(Sender: TObject); 
    private 
    public 
    end; 

var 
    Form1: TForm1; 

implementation 

{$R *.DFM} 

uses 
    TestFramework; 

type 
    TForm1Tests = class(TTestCase) 
    private 
     f: TForm1; 
    protected 
    procedure SetUp; override; 
    procedure TearDown; override; 
    published 
    procedure TestButton1Click; 
    end; 

procedure TForm1.Button1Click(Sender: TObject); 
begin 
    //todo 
end; 

{ TForm1Tests } 

procedure TForm1Tests.SetUp; 
begin 
    inherited; 

    f := TForm1.Create(nil); 
end; 

procedure TForm1Tests.TearDown; 
begin 
    f.Free; 
    inherited; 
end; 

procedure TForm1Tests.TestButton1Click; 
begin 
    f.Button1Click(nil); 
    Self.CheckEqualsString('Hello, world!', f.Caption); 
end; 

end. 

Учитывая, что я сделал (тестовый код в проекте GUI), как мне теперь запускать запуск тестов? Если я нажать F9 то форма просто появляется:

alt text http://i39.tinypic.com/zsobhv.jpg

В идеале было бы кнопка или пункт меню, в интегрированной среде говоря Run DUnit Тесты:

alt text http://i44.tinypic.com/24wvipw.jpg

Я живу в мире мечты? Земля фантазии, живущая в доме с камедью на леденецкой дорожке?

Answer 1

Я согласен с Uwe Raabe, но иногда бывает полезно иметь «скрытую» ссылку в вашем приложении для запуска графического интерфейса DUnit. Я использую:

TGUITestRunner.runRegisteredTests; 

вызова этого из вашей кнопки на DUnit GUI будет открыт для Вас, чтобы вручную запустить и выход вида теста.

---

Например, если удерживать нажатой специальную комбинацию клавиш при открытии собственного «Панель управления» Программное обеспечение в, вы получите некоторые дополнительные данные:

Answer 2

Добавление TestCase к основному проекту - это не путь. Вы должны создать отдельный TestProject (вы можете иметь его в той же ProjectGroup, что и основной проект), добавить TestCase и запустить.

Answer 3

Мне нравится идея с командой 'Run DUnit tests' в среде IDE.

Это может быть реализовано путем проверки проекта DUnit в той же папке, с тем же именем, что и текущий проект:

• Project1.dpr -> программное обеспечение тестируемой
• project1 .Tests.dpr => приложение для тестирования DUnit

В этом случае среда IDE должна включать команду Run DUnit tests.

• После выполнения тестов, список всех неудачных испытаний должны быть отображены, что позволяет перейти к исходной строке, где тест не удалось.

• Если испытания вызвали утечку памяти, список всех утечек должен отображаться, что позволяет перейти к исходной линии, где была создана утечка памяти

(DUnit может быть выполнена с возможностью обнаружения утечки памяти и проверки отказа при обнаружении одного из них)