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

Создадим базу данных «Библиотека»

1. С помощью BDE Administrator создайте псевдоним БД и дайте ему название Библиотека

2. С помощью утилиты Database Deskto создайте таблицу следующей структуры:

 

 

и сохраните её под именем library.db


Заполните созданную таблицу следующими данными:

 

Инв_номер Авт_знак Шифр Автор Название Место Издательство Год Кол-во Стоимость  
издания издания страниц  
               
1. К 41 ББК 84.7 США Кинг С. Бессонница Харьков Дельта 70,00р.  
2. К 50 ББК 84.7 США Кин С. Тайна старого дуба C.-Пб. Совершенно секретно 70,00р.  
3. Д 39 ББК 84.4 Вл Дефо Д. Приключения Москва Дрофа 20,00р.
          Робинзона Крузо          
4. Ж 97 ББК 84.4 Вл Жюль Дети капитана Гранта Самара Просвещение 20,00р.
        Верн            
5. Ф 49 ББК 32.973 Фигурнов IBM PC для Москва Дрофа 40,00р.
        В. Э. пользователя          
6. Д 96 ББК 98 Фр Дюма А. Три мушкетера Москва Машиностроение 130,00р.
                   
7. Ц 27 ББК 84.Р7 Цветаева Стихотворения. Владивосток ДВГУ 220,00р.
        М. Поэмы. Проза          
8. Б 90 ББК 84Р7 Булгаков Мастер и Маргарита C.-Пб. Художественная 150,00р.
        М. А.     литература      
9. К 41 ББК 84.7 США Кинг С. Зеленая миля Москва АСТ 70,00р.
10. К 41 ББК 84.7 США Кинг С. Глаза дракона Москва АСТ 50,00р.

4.Теперь откройте Delphi и поместите на форму компоненты Table1, DataSource1, DBGrid1. Настройте компоненты.

 

5. Разместите на форме компонент Query1. (для данного компонента никакую настройку свойств производить не надо!)

 

Для просмотра базы данных и результата выполнения запроса используется компонент DBGrid1, который через компонент DataSource1 взаимодействует с компонентом Table1 (при просмотре всей базы данных) или с компонентом Query (при просмотре результата выполнения запроса).

6. Поместите на форму кнопку АВТОР – данная кнопка будет производить выборку по имени автора. Пропишите для кнопки АВТОР следующий программный код:


 

procedure TForm1.Button1lick(Sender: TObject);

var

autor: string[30];

begin

autor:=InputBox('Выборка информации из БД', 'Укажите автора и щелкните на OK.', ''); if autor <> '' // пользователь ввел автора then

 

begin

with form1.Query1 do begin

 

Close; // закрыть файл-результат выполнения предыдущего запроса SQL.Clear; // удалить текст предыдущего запроса

 

// записываем новый запрос в свойство SQL

SQL.Add('SELECT Автор, Название');

SQL.Add('FROM ":Библиотека:library.DB"');

SQL.Add('WHERE');

 

SQL.Add('(Автор = "'+ autor + '")');

SQL.Add('ORDER BY Автор');

Open; // активизируем выполнение запроса

 

end;

if Query1.RecordCount <> 0 then

 

DataSource1.DataSet:=Query1 // отобразить рез-т выполнения запроса

else

 

begin

ShowMessage('В БД нет записей, удовлетворяющих критерию запроса.'); DataSource1.DataSet:=Table1;

 

end;

 

end;

 


end;

 

7. Сохраните проект. Запустите программу на исполнение.

Проверьте работу кнопки АВТОР.

 

8. Для того, чтобы в таблице вновь отображались все записи,

разместите на форме ещё одну кнопку и назовите её ВСЕ ЗАПИСИ.

Пропишите для неё следующий код:

procedure TForm1.Button1Click(Sender: TObject);

begin DataSource1.DataSet:=Table1; // источник данных - таблица end;


Проверьте работу кнопки ВСЕ ЗАПИСИ.

 

На оценку 4 самостоятельно (!)создайте кнопку ГОД ИЗДАНИЯ,которая бы производила выборку книг по году их издания,при этом,выводя в таблице записи с полями в следующем порядке, как указано в рисунке ниже, т.е. вначале был столбец ГОД ИЗДАНИЯ, затем НАЗВАНИЕ и лишь потом АВТОР.

 

 

На оценку 5 самостоятельно (!)создайте кнопку ИЗДАТЕЛЬСТВО,которое бы производило выборку книг по наименованию издательства.Порядок столбцов: Издательство, Место издания, Название, Автор, Шифр.


 

Раздел 2. CASE технологии проектирования информационных систем на основе языка UML в программной среде Rational Rose.

Постановка задачи (описание предметной области).

Магазин осуществляет продажу товаров клиенту путем оформления документов «Заказ». Директор магазина - Антон, принял решение автоматизировать документооборот продаж товара и пригласил для выполнения работ программиста Павла. Поговорив с Антоном, в соответствие с концепцией жизненного цикла (ЖЦ) программы Павел приступил к описанию бизнес процессов, сопровождающих продажу товара. Взяв за основу язык UML, он начал с построения контекстной диаграммы процессов- Use Case diagram. Диаграмма должна ответить на вопрос - «что должно делаться в системе и кто участник этих процессов».


Практическая работа 1. Создание диаграммы вариантов использования и действующих лиц.

Окончательный вид диаграммы показан на рис. 1.

Рис. 1 Диаграмма вариантов использования задачи о заказе товара.

 

Этапы выполнения упражнения.

1. Дважды щелкнув мышью на Главной диаграмме Вариантов Использования (Main) в браузере, откройте ее.

2.С помощью кнопки Use Case (Вариант использования) панели инструментов поместите на диаграмму новый вариант использования. Назовите его "Ввести новый заказ".

3. Повторив этапы 2 и 3, поместите на диаграмму остальные варианты использования:

Изменить существующий заказ

Напечатать инвентарную опись

Обновить инвентарную опись

Оформить заказ

Отклонить заказ

Выполнить поставку заказа

4. С помощью кнопки Actor (Действующее лицо) панели инструментов поместите на диаграмму новое действующее лицо.

5. Назовите его "Продавец".

6. Повторив шаги 4 и 5, поместите на диаграмму остальных действующих лиц:

Управляющий магазином

Клерк магазина

Бухгалтерская система

7. Создание абстрактного варианта использования (не требующего дальнейшей декомпозиции).

Щелкните правой кнопкой мыши на варианте использования "Отклонить заказ" на диаграмме.

В открывшемся меню выберите пункт Open Specification (Открыть спецификацию).

Установите флажок Abstract (Абстрактный), чтобы сделать этот вариант использования абстрактным.