Смекни!
smekni.com

Практическое задание на тему База данных Компьютерный магазин (стр. 5 из 6)

На этом разработка Базы данных в среде Accessзакончена.

2.4 КРАТКИЙ ОБЗОР СРЕДЫ РАЗРАБОТКИ DELPHI 7

Delphi 7 содержит развитые библиотеки и инструменты для создания приложений электронного бизнеса и веб-сервисов, полностью интегрирует соответствующие технологии и качественно повышает производительность разработчиков, предоставляя все необходимое для исследования вопросов перехода на Microsoft .NET. При помощи включенного в комплект поставки Kylix 3 для Delphi разработчики могут переносить свои приложения на Linux, повышая отдачу своих инвестиций и расширяя спектр платформ, на которых доступны их приложения. Интегрируя ведущие приложения разработки в единый и легкий в использовании пакет, Delphi 7 сокращает жизненный цикл разработки приложений и ускоряет вывод создаваемых с его помощью продуктов на рынок ПО.

Ключевые возможности, появившиеся в Delphi 7: предварительный вариант средств для работы с Microsoft .NET Framework; Kylix 3.0 для Linux в составе пакета; бесплатная лицензия на развертывание многозвенных приложений (которая до этого была платной), использующих технологию DataSnap (прежнее название - MIDAS); полное решение проектирования и развертывания корпоративных приложений по технологии Model Driven Architecture (MDA); мощные и удобные средства разработки WEB-приложений; средства создания качественных кроссплатформенных отчетов Rave Reports; среда моделирования ModelMaker (по технологии UML).

Компания Borland первой предоставила разработчикам возможность перехода на .NET при помощи Delphi 7. Поддержка компанией Borland платформы .NET позволяет разработчиками, использующим Delphi, быстро и продуктивно создавать приложения для .NET с сохранением существующих инвестиций в информационные технологии. Теперь работа в Delphi 7 позволяет программистам легко переносить имеющиеся у них знания, навыки и ресурсы на платформу .NET.

Delphi 7 обладает возможностями проектирования и развертывания корпоративных приложений. Это позволяет разработчикам быстрее воспользоваться преимуществами разработки корпоративных приложений от концепции до коммерческой версии при помощи новой системы проектирования UML и технологии Model Driven Architecture (MDA).

Визуальная среда WEB-разработки Delphi 7 позволяет визуально строить WEB-приложения и кардинально уменьшает обычные временные затраты, связанные с созданием серверной составляющей приложений, включая управление сессиями в многопользовательском режиме доступа. Разработка корпоративных приложений по технологии модельно-управляемой архитектуры (MDA) ускоряет процесс разработки, обеспечивая весь цикл разработки приложений - от проектирования до развертывания и радикально сокращает объем кода и требуемое время.

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

Kylix 3 в составе Delphi 7 является первой высокопроизводительной визуальной интегрированной средой разработки (IDE), предназначенной для быстрого создания приложений баз данных, программ с графическим пользовательским интерфейсом (GUI), Internet-приложений и WEB-сервисов для операционной системы Linux. Возможность создания в Delphi 7 корпоративных кроссплатформенных отчетов обеспечивает высокую эффективность работы приложения. Новые правила лицензирования Delphi 7 на развертывание многозвенных приложений (DataSnap) дают возможность беспрепятственно масштабировать одноуровневые и клиент/серверные приложения до многоуровневых без дополнительных затрат, связанных с развертыванием систем. Delphi 7 включает также поддержку тем Windows XP, позволяя разработчикам создавать приложения, пользующиеся возможностями тем пользовательского интерфейса Windows XP.

Далее запускаем Delphi 7 .

Для реализации подобной программы для начала на первой форме разместим компоненты (рисунок 12)

Рисунок 12 Компоненты программы.

Так будут выглядеть компоненты расположенные на форме (рис.13)

Рисунок 13Расположение компонентов на первой форме

На второй форме будут следующие компоненты (рис.14)

Рисунок 14 Компоненты второй формы

Так будут выглядеть компоненты расположенные на второй форме (рис.15).

Рисунок 15 Расположение компонентов на второй форме

Данная программа была разработана на следующем программном обеспечении – операционная система MicrosoftWindowsXP версии 2003 ServicePack 2, и протестирована на аппаратном обеспечении – Intel(R) Celeron(R) CPU 2.00GHz, 512 МБ ОЗУ, графическая карта 256 MBGeeForceFX 5600

2.5 РУКОВОДСТВО ПО НАПИСАНИЮ ПРОГРАММЫ

Для начала расположим на форме компонент «MainMenu» , расположенные на вкладке «Standard» (рисунок 16).

Рисунок 16 компонент «MainMenu»

Компонент Menu предназначен для отображения трех вкладок меню «Файл», «Настройки» и «Помощь». После вызова пункта меню «О программе» вкладки «Помощь» будет отображена вторая форма и для невозможности изменения ее размеров и отображения в заголовке окна только его названия и кнопки «Закрыть» необходимо в свойстве формы «BorderStyle» выбрать значение «bsDialog» (рис.17)

Рисунок 17 Свойство BorderStyle

Далее кликнем по значку

два раза, и откроется окно (рисунок 18).

Рисунок 18 Окно MainMenu

Затем заполняем меню (рисунок 19).

Рисунок 19 Заполненное меню

Потом добавляем на форму «ColorDialog» расположенный на вкладке «Dialogs» (рисунок 20).

Рисунок 20 Расположение компонента «ColorDialog».

Этот компонент «ColorDialog» предназначен для определения цвета.

С этой же вкладке добавим на форму «fontdialog» (рисунок 21).

Рисунок 21 Расположение компонента «FontDialog»

«PrintDialog».Он отображает стандартное окно печати Windows. (рис.22)

Рисунок 22 Компонент «FontDialog».

Далее на вкладке «System» добавим на форму «Timer» (рисунок 23).

Рисунок 23 Расположение компонента «Timer»

Компонент «Timer» предназначен для показания времени в программе.

Добавляем на форму три «DataSource» (рисунок 24).

Рисунок 24 Расположение компонента «DataSource»

Этот компонент служит посредником между таблицами СУБД и экранными элементами управления.

Далее на вкладке «ADO» располагаем компонент «ADOConnection» (рисунок 25).

Рисунок 25 Расположение компонента «ADOConnection»

Компонент «ADOConnection» предназначен для соединения с БД.

Добавим компонент «TADOTable» располагаемый на вкладке «ADO» (рисунок 26) .

Рисунок 26 Расположение компонента «ADOTable»

И последние четыре компонента добавляем на форму это «RadioGroup» и «Label» (расположенный на вкладке Standart), а так же «DBNavigator» на вкладке «DataControls» и на этой же вкладке «DBGrid».

Теперь перейдём к нашей базе данных и её процедурам:

Процедурыпунктовменю «Файл»:

procedure TForm1.N3Click(Sender: TObject);

begin

PrintDialog1.Execute;

end;

Выход:

procedure TForm1.N5Click(Sender: TObject);

begin

Form1.Close;

end;

Процедурыпунктовменю «Настройки»:

Шрифт:

procedure TForm1.N6Click(Sender: TObject);

begin

FontDialog1.Execute;

DBGrid2.Font:=FontDialog1.Font;

end;

Цвет:

procedure TForm1.N7Click(Sender: TObject);

begin

ColorDialog1.Execute;

DBGrid2.Color:=ColorDialog1.Color;

end;

Процедуры пунктов меню «Помощь»:

Опрограмме:

procedure TForm1.N9Click(Sender: TObject);

begin

Form2.showmodal;

end;

Осоздателе:

procedure TForm1.N10Click(Sender: TObject);

begin

ShowMessage('ñîçäàë Ñàõàðîâ Àíäðåé Íèêîëàåâè÷');

end;

Руководствопользоваетля:

procedure TForm1.N11Click(Sender: TObject);

begin

ShellExecute(Handle, nil, 'Ðóêîâîäñòâî ïîëüçîâàòåëÿ ÁÄ.docx', nil, nil, SW_SHOW);

Процедура «RadioGroup»:

if RadioGroup1.ItemIndex=0 then

begin

DBGrid1.Visible:=True;

DBGrid2.Visible:=False;

DBGrid3.Visible:=False;

DBNavigator1.DataSource:=DataSource1;

end;

if RadioGroup1.ItemIndex=1 then

begin

DBGrid1.Visible:=False;

DBGrid2.Visible:=True;

DBGrid3.Visible:=False;

DBNavigator1.DataSource:=DataSource2;

end;

if RadioGroup1.ItemIndex=2 then

begin

DBGrid1.Visible:=False;

DBGrid2.Visible:=False;

DBGrid3.Visible:=True;

DBNavigator1.DataSource:=DataSource3;

end;

2.6 РУКОВОДСТВО ПОЛЬЗОВАТЕЛЯ

После запуска приложения вы увидите главное окно программы (рисунок 27):