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

Тема: Cоздание главной формы программы склад

Цель: научиться создавать форму в Delphi, для созданной базы данных в Access

Оборудование и/или программное обеспечение:ПК, Delphi

Теоретическая часть

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

Ввести новую форму в программу проще всего нажатием на кнопочку на главном окне Delphi. Также есть и соответствующая команда меню File -» New -» Form

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

Форма создаётся вместе с новым модулем, описывающим её работу. Сразу же покажем, как удалить Форму из программы. Для этого также есть кнопочка, и команда меню Project -» Remove from project.... Так как Форма создаётся вместе с её модулем, то в появившемся окошке нужно выбрать модуль, который и будет удалён из проекта вместе с Формой:

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

Сразу возникает вопрос, а что будет, если попытаться удалить и модуль Unit1, что останется?. Выполните команду Project -» View Sourse. В редакторе кода появится новая вкладка, на которой будет отображён код Главного Окна программы (не Главной Формы, а именно Окна. В Windows ведь все объекты рассматриваются как окна.) Главное окно невидимо, но управляет всем проектом, и может работать вообще без Форм. Туда можно вставлять свой код, и писать нехилые программы, как в классическом Паскале.


Практическая часть

Запускаем Delphi, выбираем File -> New-> VCL Forms Application - Delphi

и получаем на экране

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

Теперь сохраним наш проект в нужную нам папку (у меня папка sclad) и назовем файл (модуля pas) как general, а файл проекта storage. Для этого выбираем File->Save Project As…

Далее размещаем на форме компонент TADOConnection вкладки dbGo (старое название ADO).

Перед настройкой подключения к базе, необходимо скопировать файл базы данных (storage.mdb), созданный на прошлом уроке в папку с проектом.

Начинаем подключение…

Выделяем компонент TADOConnection и в свойстве LoginPromt ставим на False. Это делаем для того, чтобы при подключении к БД пароль у нас не запрашивался, дальше в свойстве ConnectionStringнажимаем на кнопку с «…» и видим:

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

В окне нажимаем на кнопку «Build…» и появляется следующее окно:

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

Выбираем провайдера, а именно Microsoft Jet 4.0 OLE DB Provaider и нажимаем кнопку «Далее».

ЛАБОРАТОРНАЯ РАБОТА № 2 - student2.ru

В данном окне мы указываем путь к нашей БД и имя пользователя по умолчанию Admin ,жмем кнопку «Ок». Если ваша БД находится в корневом каталоге с программой, то в данном поле достаточно указать ее имя с расширением, примерно так storage.mdb. Обратите внимание, если вы укажите полный путь к базе, то при переносе на другой компьютер путь к БД будет не найден!!!

В свойстве компонента TADOConnection – Mode выбрать из выпадающего спискаcmShareDenyNone,а свойствоTADOConnection – ConnectedставимTrue.Все подключение к базе активировано.

Сохраняем наш проект.

Вопросы для контроля

1. Для чего нужен VCL Forms Application?

2. Что такое TADOConnection и для чего он служит?

3. Из каких частей состоит окно Delphi?

4. Зачем нужен Unit?

5. Для чего нужен Project?

Литература

1. Фаронов В.В. Программирование на языке высокого уровня: Учебник для вузов. -СПб.: Питер, 2003.

2. Бобровский С.И. Delphi 7. Учебный курс. - СПб.: Питер, 2005.

3. Кетков Ю.Л., Кетков А.Ю. Практика программирования: Visual Basic, C++ Builder, Delphi. - СПб.: БХВ - Петербург, 2005.

Наши рекомендации