Geum.ru

База даних "Теорія та практика прикладного програмування"

Курсовой проект - Компьютеры, программирование

Другие курсовые по предмету Компьютеры, программирование

?ы

 

Форма Таблицы в главе відображає таблиці, що містяться у главі, та інформацію про їх розміщення.

Рисунок 2.3.42 Форма Таблицы в главе

 

Форми Примечания в главе (Рисунок 2.3.43) та Листинги в главе (Рисунок 2.3.44) надають аналогічну інформацію, але стосовно приміток та лістингів відповідно.

 

Рисунок 2.3.43 Форма Примечания в главе

 

Рисунок 2.3.44 Форма Листинги в главе

 

3 ІНСТРУКЦІЯ КОРИСТУВАЧА

 

База даних Теорія та практика прикладного програмування призначена для зберігання довідкової інформації, що міститься у певних главах посібника з прикладного програмування (Культин Н.Б. Основы программирования в Delphi7).

Головна кнопкова форма запускається автоматично, відразу після запуску БД.

 

Рисунок 3.1 Інтерфейс кнопкової форми

де кнопка:

1 відкриває форму Краткое содержание главы (Рисунок 2.3.41);

2 відкриває форму Операторы в главе (Рисунок 2.3.38);

3 відкриває фору Таблицы в главе (Рисунок 2.3.42);

4 відкриває форму Рисунки в главе (Рисунок 2.3.39);

5 відкриває форму Примечания в главе (Рисунок 2.3.43);

6 відкриває форму Листинги в главе (Рисунок 2.3.44);

7 відкриває форму Запроси (Рисунок 3.2),

 

Рисунок 3.2 Інтерфейс кнопкової форми Запроси

 

яка містить компоненти для відображення існуючих запитів, де кнопка:

9 відкриває форму Использование компонент в параграфе (Рисунок 2.3.32);

10 відкриває форму Таблицы в параграфах на И (Рисунок 2.3.40);

11 відкриває форму Использование операторов в листингах (Рисунок 2.3.33);

12 відкриває форму Использование операторов в параграфах (Рисунок 2.3.34);

13 відкриває форму Количество рисунков в параграфе (Рисунок 2.3.35);

14 відкриває форму Количество страниц в параграфе (Рисунок 2.3.36);

15 відкриває форму Операторы и листинги в параграфах (Рисунок 2.3.37);

16 повертає користувача до попередньої кнопкової форми (Рисунок 3.1).

Натискання кнопки (8) призведе до закриття всієї бази даних.

ВИСНОВКИ

 

У процесі даної курсової роботи була спроектована та реалізована в СУБД MS Access інформаційна система Теорія та практика прикладного програмування.

У цій базі даних зберігається довідкова інформація, що міститься у певних главах посібника з прикладного програмування (Культин Н.Б. Основы программирования в Delphi 7). База містить запити, що дозволяють здійснювати пошук необхідних даних та відображати статистичну інформацію, як то: інформацію про зміст глави; які таблиці, компоненти та лістинги містяться у параграфі; який оператор у якому лістингу знаходиться; інформація про загальну кількість сторінок.

Дана система пройшла всі три етапи проектування. На інфологічному рівні структура бази даних була відображена у вигляді ER-діаграми, яка надалі була приведена до третьої нормальної форми. На даталогічному рівні представлена реляційною моделлю. У таблицях був усунений надлишок. Безпосередня робота з СУБД з формування таблиць і їх заповнення на компютері була проведена на стадії фізичного проектування.

Таким чином, було створено 7 таблиць, 11 запитів та 14 форм. Розмір файлу БД 8,28 Мб.

Надалі дану систему можна вдосконалювати, відповідно до потреб користувачів.

ПЕРЕЛІК ВИКОРИСТАНИХ ДЖЕРЕЛ

 

  1. Кузин А.В., Левонисова С.В. Базы данных. Академия, 2008. 320 с.
  2. ГОСТ 34.003-90. Государственный стандарт Российской Федерации: Информационная технология. Комплекс стандартов на автоматизированные системы. Автоматизированные системы. Термины и определения. М.: ИПК Издательство стандартов, 2002.
  4. Дейт Д. Введение в систему баз данных. М., СПб.: BHV Санкт-Петербург, 1977. 312 с.
  6. Гринченко Н. Н., Гусев Е. В., Макаров Н. П. Проектирование баз данных. СУБД Microsoft Access Горячая Линия-Телеком, 2004. 240 с.
  7. Горев А., Макашарипов С., Ахаян Р. Эффективная работа с СУБД. К.: Академія, 2003. 344с.
  8. Бекаревич Ю., Пушкина Н. Самоучитель Microsoft Access 2003. БХВ-Петербург, 2004. 738 с.
  9. Степанов В. Скачать книгу Microsoft Access 2003 для начинающих. Аквариум-Принт, Дом печати Вятка, 2004. 128 с.

 

Листинг

 

Unit Phone_u;

Interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,

Forms, Dialogs, StdCtrls;

type

TForm1= class{TForm}

Edit1: TEdit; //поле ввода длительности разговора

Edit2: TEdit; //поле ввода номера дня недели

Button1: TButton; //кнопка Вычислить

Label1: TLabel;

Label2: TLabel;

Label3: TLabel;

procedure Button1Click(Sender: TObject);

private

{Private declarations}

public

{Public declarations}

end;

var

Form1:TForm1;

implementation

{SR*.dfm}

procedure Button1Click(Sender: TObject);

const

PAY=0.15; //цена одной минуты разговора 0,15 рубля

DISCOUNT=0.2; //скидка 20 процентов

var

Time: real; //длительность разговора

Day: integer; //день недели

Summa: real; //стоимость разговора

begin

//получить исходные данные

Time:=StrToFloat(Edit1.Text);

Day:=StrToInr(Edit2.Text);

//Вычислить стоимость разговора

Summa:=PAY*Time;

//Если день суббота или воскресенье, то уменьшить

//стоимость на величину скидки

if (Day=6) or (Day=7)

then Summa:=Summa*(1-DISCOUNT);

//Вывод результата вычисления

Label1.Caption:=К оплате+FloatToStr(Summa)+руб.;

end;

end.

 

Unit wtest_;

Interface

uses

Windows, Messages, SysUtils,