Тестирование компонента

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

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

Наиболее просто выполнить тестирование компонента можно следующим образом. Сначала надо активизировать процесс создания нового приложения, а затем создать форму (добавить и настроить необходимые компоненты) и сохранить приложение в том каталоге, в котором находятся файлы тестируемого компонента.

Вид формы приложения тестирования компонента NkEdit приведен на рис. 6.2Д

Форма содержит две метки. Первая метка обеспечивает вывод общей информации о компоненте; вторая метка (на рисунке она выделена) используется для вывода информации о настройке компонента. Самого компонента NkEdit в форме нет. Он будет создан во время работы программы, в момент ее запуска.

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

1. В текст файла реализации (срр-файл) включить следующую директиву #include "nkedit.cpp".

2. Объявить компонент NkEdit (оператор TNkEdit *NkEdit). Здесь следует вспомнить, что компонент является объектом (точнее ссылкой на объект), поэтому объявление компонента не обеспечивает создание компонента, а только создает указатель на компонент.

3. Для формы приложения создать процедуру обработки события oncreate, которая путем вызова конструктора тестируемого компонента создаст компонент и выполнит его настройку (присвоит значения свойствам компонента).

Рис. 6.2. Форма приложения "Тест компонента NkEdit"

В листинге 6.5 приведен файл реализации приложения тестирования компонента NkEdit.

 Листинг 6.5. Тест компонента NkEdit

#include <vcl.h>

#pragma hdrstop

#include  "tk_.h" 

#include  "nkedit.cpp"

#pragma package(smart_init) 

#pragma resource  "*.dfm"

TForml  *Forml;         // форма           

TNkEdit  *NkEdit; // компонент программиста

// конструктор формы

__£astcall TForml::TForml(TComponent*Owner):TForm(Owner)

{

// создадим и инициализируем компонент 

NkEdit NkEdit = new TNkEdit(Forml); 

NkEdit->Parent = Forml; 

NkEdit->Text = "0"; 

NkEdit->Left = 10; NkEdit-ХГор = 100;

// настроим компонент 

// зададим границы диапазона NkEdit->Min = -100; 

NkEdit->Max = 100;

NkEdit->EnableFloat = true;  

// разрешен ввод дробных чисел }

// обработка события FormCreate

void __fastcall TForml::FormCreate(TObject *Sender)

{

AnsiString st = "Введите ";

// информация о компоненте if (NkEdit->EnableFloat) 

st = st + "дробное"; 

else st = st + "целое"; 

st = st + " число от "; 

st = st + FloatToStr(NkEdit->Min);

 st = st + " до "; 

st = st + FloatToStr(NkEdit->Max);

Label2->Caption = st; }

Рис. 6.З. Тестирование компонента: поле ввода — компонент NkEdit

Тестируемый компонент создает и настраивает конструктор формы. Следует обратить внимание, что свойству Parent созданного компонента обязательно надо присвоить значение. Если этого не сделать, то компонент на форме не появится. Информацию о настройках созданного компонента выводит функция FormCreate. На рис. 6.3 приведен вид окна программы "Тест компонента NkEdit во время ее работы.