Продолжение работы над приложением
Работа над приложением с первого клиентского компьютера.
Запускаем Delphi и открываем проект из папки, в которую был склонирован созданный на сервере проект.
Создаем новую форму. Называем новую форму с характериным для нее именем (!!!!!!).
Примечание:Для того чтобы новая форма не создавалась при старте приложения, необходимо в опциях проекта (Project → Options… или нажать Shift + Ctrl + F11), на вкладке Forms переместить созданную форму из списка автоматически создаваемых (Auto-createforms) в список доступных (Availableforms).
После того как форма была исключена из списка автоматически создаваемых, её необходимо создать в режиме работы приложения. Для этого в событии onClick главного меню следует написать следующий код рисунок 20.
Рисунок 20 – Создание подчиненной формы
Для отображения необходимой таблицы из БД, на форму момещаем компонент BDGrid, который будет выступать в качестве компонента отображения запроса. Связываться с БД будем по технологии ADO. Выбираем компоненты: ADOConnection, ADOQuery, DataSourse (рисунок 21), которые мы будем использовать, расположены на вкладках ADO, DataAccess, DataControls палитры компонентов.
Рисунок 21 – Оформление подчиненной формы
В свойстве DataSet компонента DataSource1 из выпадающего спискавыберем ADOQuery1, в свойстве Connection компонента ADOQuery1 из выпадающего списка выберем ADOConnection1.В свойстве LoginPrompt компонента ADOConnection1 установить значение False.
Для связи с БД необходимо указать строку подключения в строковом свойстве ConnectionString в компоненте ADOConnection1. Для этого кликаем на указанный компнент и в открывшемся окне в на поле Useconnectionstringнажмем кнопку Build, в свойствах связи с даннами на вкладке «поставщик данных» выбираем MicrosoftJet 4.0.OLEDBProvider. Нажмем кнопеу Далее и в поле “Выберете или введите имя базы данных» указываем путь к файлу БД и проверяем подключение.
В свойстве DataSourse компонента BDGgid из выпадающего списка необходимо выбрать DataSource1.
Теперь необходимо в событии данной формы OnCreate записать код, который будет создавать и открывать запрос в BDGgid (рисунок 22).
Рисунок 22 – Событие OnCreate созданной подчиненной формы
Сохраняем проект: File – SaveAll. ВНИМАТЕЛЬНО!Сохранять подчиненную форму необходимо под названием данной формы!! (рисунок 23) Иначе возникнут проблемы при слиянии веток на сервере.
Рисунок 23 – Сохранение проекта
Проверяем проект на работоспособность. Если не возникает никаких ошибок и все изменения сохранены. То закрываем Delphi и возвращается в папку и запускаем командную строку Git. После чего выполняем команду gitstatus для просмотра состояния отслеживаемых файлов (рисунок 24).
Каквидно, вразделе Changes not staged to commit отображены все измененные файлы (а именно файлы, которые уже были зафиксированы и потом склонированы, но после последней фиксации были изменены, но еще не были добавлены для проведения следующей фиксации). В разделе Untracked files отражены все созданные новые файлы после работы с проектом, которые еще ни разу не были фиксированы. Это файлы, относящиеся к созданной подчиненной форме, так как она не была создана на сервере и, следовательно, зафиксирована и склонирована.
Рисунок 24 – Выполнение команды git status
Следовательно, все файлы необходимо добавить для совершения фиксации проекта и произведенных изменений (рисунок 25).
Рисунок 25 – Добавление измененных файлов
После добавления всех элементов и опять выполнив команду git status (рисунок 26) все файлы отображены в разделе Changes to be commited, то есть файлы готовы к совершению фиксации.
Рисунок 26 – Выполнение команды gitstatus
Теперь необходимо произвести фиксацию изменений (коммит). После чего можно будет отправить работу на серверный компьютер для дальнейшего слияния (рисунок 27). Для проведения отправки изменений на сервер используется команда: git push [адрес] НазваниеВетки
Рисунок 27 – Совершение коммита и отправка изменений на сервер
Теперь переходим к работе над приложением совторого клиентского компьютера.
Для этого выполняются абсолютно аналогичные действия и операции, только с созданием уже другой подчиненной формы.
Также запускается Delphi и открывается склонированный проект. Где создается подчиненная форма, которой задается определенное название. Форма убирается из списка автоматически создаваемых форм и для ее открытия записывается код при нажатии определённого пункта меню (рисунок 28).
Рисунок 28 – Создание и открытие формы
После чего на форму добавляются необходимые компоненты и устанавливается связь с БД. Затем осуществляется запись программного кода на событие OnCreate созданной формы (рисунок 29).
Рисунок 29 – Создание запроса
Проверяем проект на работоспособность, сохраняет и переходим к работе с Git. Проверяем состояние файлов (рисунок 30).
Рисунок 30 – Выполнение команды git status
После чего добавляет все файлы в состояние, готовое к коммиту (рисунок 31).
Рисунок 31 – Добавление файлов
После чего совершаем фиксацию и передает зафиксированные изменения на сервер (рисунок 32).
Рисунок 32 – Фиксация и передача на сервер файлов