Предыдущая страница реферата | 2  3  4  5  6  7  8  9  10  11  12 | Следующая страница реферата

Panell: TPanel;

Buttonl: TButton; // кнопка Начать, Дальше, Выход procedure FormActivate(Sender: TObject); procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); procedure SelectorClick(Sender: TObject); private

{ Private declarations } public

{ Public declarations } end;

В отличие от других строк, сгенерированных Delphi, объявление procedure SelectorClick(Sender: TObject) вставлено в текст программы вручную.

При создании процедуры обработки события для обычного компонента
(компонента, который добавлен в форму во время разработки формы программы)
Delphi автоматически генерирует заготовку процедуры обработки события и ее объявление. Программист должен написать только инструкции процедуры. В случае создания процедуры обработки события для компонента, который создается динамически, программист должен полностью написать текст процедуры и поместить ее объявление в объявление формы.

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

2.4.3. Загрузка файла теста

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

Например, для настройки программы тестирования, значок запуска которой находится на рабочем столе, на работу с файлом теста ххх.txt, необходимо щелкнуть правой кнопкой мыши на значке программы, из появившегося контекстного меню выбрать команду Свойства и в поле Объект, после имени файла программы (Project1.exe), ввести имя файла теста
(xxx.txt), заключив его в двойные кавычки (рис. 3). Текст, находящийся в поле Объект вкладки Ярлык диалогового окна Свойства, называется командной строкой.

Программа может получить параметр, указанный в командной строке запуска программы, как значение функции ParamStr (n), где n - номер параметра. Количество параметров командной строки находится в глобальной переменной Paramcount. Для приведенного выше примера командной строки запуска программы тестирования значение переменной Paramcount равно 1, а функции ParamStr (1) - xxx.txt.

Ниже приведен фрагмент программы, обеспечивающий прием параметра из командной строки: if ParamCount = 0 then begin

ShowMessage(' Ошибка! Не обнаружено файла вопросов теста. '); goto bye; // аварийное завершение программы end;

FileName:= ParamStr (1); // имя файла - параметр командной строки.

При запуске программы, использующей параметры командной строки, из среды разработки параметры нужно ввести в поле Parameters диалогового окна
Run Parameters (рис. 4), которое открывается в результате выбора из меню
Run команды Parameters.

Рис 3. Настройка программы тестирования

Рис 4. Диалоговое окно Run Parameters

2.5. Описание пользовательского интерфейса

После создания формы в окно редактора кода, в секцию implementation следует поместить описание глобальных констант (раздел const) и переменных
(раздел var). Затем можно приступить к созданию процедур обработки событий.

Их в программе три:

1. Обработка события OnActivate для стартовой формы.

2. Обработка события Onclick для командной кнопки Button1.

3. Процедура обработки события Onclick - одна, общая для переключателей выбора ответа.

После запуска программы и вывода на экран стартовой формы происходит событие onActivate. Процедура FormActivate сначала вызывает процедуру
ResetForm, которая, присваивая значение False свойству Visible, делает невидимыми поля вывода альтернативных ответов и все переключатели.
Аналогично делается невидимой область иллюстрации. Кроме того, процедура устанавливает максимально возможную ширину полей меток альтернативных ответов.

После очистки формы проверяется, указан ли при запуске программы параметр - имя текстового файла с вопросами теста.

Рекомендуем скачать другие рефераты по теме: новшество, реферат география на тему.





Предыдущая страница реферата | 2  3  4  5  6  7  8  9  10  11  12 | Следующая страница реферата