Создайте в новом проекте Lab9 форму.

ЛАБОРАТОРНАЯ № 9

Разработка модуля программиста

 

Цель: Освоить методику разработки собственных модулей и добавления их к проекту

 

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

Delphi позволяет программисту поместить часто используемые функции и процедуры в отдельный модуль и затем применять эти процедуры и функции в своих программах, указав имя модуля в списке необходимых программе модулей (инструкция Uses).

Чтобы создать модуль, необходимо:

1. Закрыть все открытые проекты и объекты (Если начат новый сеанс работы с Delphi, то объектов не существует и закрытия, соответственно, не требуется).

2. Выбрать команду меню File – New – Unit Delphi for Win32.

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

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

- Начинается текст модуля инструкцией unit, за которой следует имя модуля (во время сохранения модуля это имя автоматически будет заменено на указанное программистом).

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

- В раздел implementation (реализация) следует поместить описание функций, объявленных в разделе interface.

1. Напишите код модуля программиста, который содержит функцию GetSubstr.

2. Сохраните созданный модуль выбором команды Save из меню File с именем My_Unitв папкеЛабораторная работа 9.

Создайте в новом проекте Lab9 форму.

4. Сохранитепроект в папкеЛабораторная работа 9.

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

- Добавить этот модуль к проекту (команда Add контекстного меню проекта Lab9.exe)

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

- Указать имя модуля в списке используемых модулей секции Uses созданной формы (обычно имя модуля программиста помещают в конец сформированного Delphi списка используемых модулей).

6. Спроектируйте приведенную на рис форму для реализации программы поиска элемента в массиве.

7. Создайте код для формы.

- Предусмотрите события Button1Click и FormActivate

- Процедура TForm1.Button1Click обращается к функции GetSubstr, поэтому в списке используемых модулей указано имя модуля my unit.

 

Результат работы программы в случае не успешности поиска.