Создайте в новом проекте 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.
Результат работы программы в случае не успешности поиска.