Бази даних в Delphi

Інформатика, програмування

Курсова робота на тему "Бази даних в Delphi " ЗМІСТ

ЗМІСТ .. 1

ВСТУП .. 2

1. ЗАГАЛЬНА ЧАСТИНА .. 9

1.1. Мета розробки. 9

1.2. Аналіз розробки. 9

2. СПЕЦІАЛЬНА ЧАСТИНА .. 10

2.1. Постановка завдання. 10

2.1.1. Призначення завдання. 10

2.1.2. Техніко-математична формулювання завдання. 10

2.1.3 Вимоги до програми. 13

2.1.3.1. Вимоги до функціональних характеристик .. 13

2.1.3.2. Вимоги до надійності. 14

2.2. Опис алгоритму. 15

2.3. Лістинг програми .. 15

2.4. Опис процесу налагодження програми .. 15

ВИСНОВОК .. 16

Список використаної літератури .. 17

Додаток 1. Лістинг програми .. 18

Частина 1. Обчислення і виведення кращої групи: 18

Частина 2. Заповнення бази даних. 22

ВСТУП

З початку 60-70хх почався бурхливий розвиток комп'ютеризації всіх великих промислових центрів. Ближче до 80-им, комп'ютери стали з'являтися і у навчальних закладах, предмету «Інформатика» стали приділяти величезну увагу. Стали з'являтися мови програмування високого рівня такі, як Delphi, C + +.

Далі піде мова про мову програмування Delphi і про бази даних.

У Росії Borland Delphi з'являється наприкінці 1993 р. і відразу ж завойовує широку популярність. Нові версії виходять практично кожен рік. У них реалізуються всі нові майстри, компоненти та технології програмування.

Дійсно, процес розробки в Delphi гранично спрощений. У першу чергу це відноситься до створення інтерфейсу, на який йде 80% часу розробки програми. Ви просто ставите потрібні компоненти на поверхню Windows-вікна (в Delphi воно називається формою) і налаштовуєте їх властивості за допомогою спеціального інструмента (Object Inspector). З його допомогою можна пов'язати події цих компонентів (натиснути на кнопку, вибір мишею елемента у списку і так далі) з кодом його обробки - і ось простий додаток готове. Причому розробник отримує в своє розпорядження потужні засоби налагодження (аж до покрокового виконання команд процесора), зручну контекстну довідкову систему (в тому числі і по Microsoft API), засоби колективної роботи над проектом, всього просто не перелічити. Ви можете створювати компоненти ActiveX без використання Microsoft IDL, розширювати можливості web-сервера (скрипти на стороні сервера), практично нічого не знаючи про HTML, XML або ASP. Можна створювати розподілені додатки на базі сом і CORBA, Інтернет-і intranet-додатки, використовуючи для доступу до даних Borland DataBase Engine, ODBC-драйвери або Microsoft ADO. , Що з'явилася, починаючи з Delphi 3, підтримка багатоланкової технології (multi-tiered) доступу до даних дозволяє створювати масштабовані додатки (відносно слабко залежать від сервера БД) за рахунок перенесення методів обробки інформації (бізнес-правил) на середню ланку.

Як уже говорилося раніше, в Delphi використовується мову Object Pascal, який постійно розширюється і доповнюється Borland. Мова повною мірою підтримує всі вимоги, що пред'являються до об'єктно-орієнтованого мови програмування. Як і належить універсальна мова, класи підтримують тільки просте спадкування, але зате інтерфейси можуть мати відразу кілька предків. До числа особливостей мови слід віднести підтримку обробки виняткових ситуацій (exceptions), а також перевантаження методів і підпрограм (overload) в стилі C + +. До числа вдалих, на погляд автора, відноситься також підтримка довгих рядків у форматі WideChar і AnsiChar. Останній тип (AnsiStrmg) дозволяє використовувати всі принади динамічного розміщення інформації в пам'яті без будь-яких турбот про її виділення і збірці сміття Delphi робить це автоматично. Для шанувальників вільного стилю програмування є відкриті масиви, варіанти і варіантні масиви, що дозволяють розміщувати в пам'яті все, що душі завгодно і змішувати типи даних.

Ви можете створювати свої власні компоненти, імпортувати ОСГ-компоненти, створювати <шаблони> проектів і <майстрів ", що створюють <заготівлі> проектів. Мало того, Delphi надає розробнику інтерфейс для зв'язку ваших додатків (або зовнішніх програм) з інтегрованою оболонкою Delphi (IDE).

Таким чином, ви можете використовувати Delphi для створення як найпростіших додатків, на розробку яких потрібно 2-3 години, так і серйозних корпоративних проектів, призначених для роботи десятків і сотень користувачів. Причому для цього можна використовувати самі останні віяння у світі комп'ютерних технологій з мінімальними витратами часу і сил.

Ну, і одна з самих останніх новин від Inprise обіцяє, що в найближчому майбутньому ви зможете переносити програми, розроблені в Delphi, на платформу Linux. Більш докладну інформацію про Delphi можна отримати на сайтах www.inprise.com і www.inprise.ru. Існує велика кількість сайтів, присвячених Delphi, наприклад <Королівство Delphi> - delphi.vitpc.com, Torry's Delphi Pages - www.torry.ru. Останній містить велика кількість посилань на ресурси, пов'язані з Delphi. Ну а якщо ви вже давно знайомі з цим продуктом, то на сайті www.brainbench.com можна безкоштовно протестуватися в якості програміста Delphi 3 і отримати поштою сертифікат.

Потужність та гнучкість Delphi при роботі з базами даних заснована на низькорівневою ядрі - процесорі баз даних Borland Database Engine (BDE). Його інтерфейс з прикладними програмами називається Integrated Database Application Programming Interface (IDAPI). В принципі, зараз не розрізняють ці дві назви (BDE і IDAPI) і вважають їх синонімами. BDE дозволяє здійснювати доступ до даних як з використанням традиційного record-орієнтованого (навігаційного) підходу, так і з використанням set-орієнтованого підходу, що використовується в SQL-серверах баз даних. Крім BDE, Delphi дозволяє здійснювати доступ до баз даних, використовуючи технологію (і, відповідно, драйвери) Open DataBase Connectivity (ODBC) фірми Microsoft. Але, як показує практика, продуктивність систем з використанням BDE набагато вище, ніж оних при використанні ODBC. ODBC драйвера працюють через спеціальний "ODBC socket", який дозволяє вбудовувати їх у BDE.

Всі інструментальні засоби баз даних Borland - Paradox, dBase, Database Desktop - Використовують BDE. Всі особливості, які є в Paradox або dBase, "успадковуються" BDE, і тому цими ж особливостями володіє і Delphi.

Аліаси

Абліцов зберігаються в базі даних. Деякі СУБД зберігають базу даних у вигляді декількох окремих файлів, що є таблиці (в основному, всі локальні СУБД), у той час як інші складаються з одного файлу, який містить в собі всі таблиці та індекси (InterBase). Наприклад, таблиці dBase і Paradox завжди зберігаються в окремих файлах на диску. Каталог, що містить dBase. DBF файли або Paradox. DB файли, розглядається як база даних. Іншими словами, будь-який каталог, що містить файли у форматі Paradox або dBase, розглядається Delphi як єдина база даних. Для перемикання на іншу базу даних потрібно просто переключитися на інший каталог. Як вже було зазначено вище, InterBase зберігає всі таблиці в одному файлі, що має розширення . GDB, тому цей файл і є база даних InterBase.

Зручно не просто вказувати шлях доступу до таблиць бази даних, а використовувати для цього якийсь замінник - псевдонім, званий аліасом. Він зберігається в окремому файлі конфігурації в довільному місці на диску і дозволяє виключити з програми пряма вказівка шляху доступу до бази даних. Такий підхід дає можливість мати у своєму розпорядженні дані в будь-якому місці, не перекомпіліруя при цьому програму. Крім шляхи доступу, в аліас вказуються тип бази даних, мовний драйвер і багато іншої керуючої інформації. Тому використання аліасів дозволяє легко переходити від локальних баз даних до SQL-серверних баз (природно, при виконанні вимог поділу додатки на клієнтську і серверну частини).

Для створення аліаса запустіть утиліту конфігурації BDE (програму bdeadmin.exe), що знаходиться в каталозі, в якому розташовуються динамічні бібліотеки BDE. Рис. 1: Головне вікно утиліти конфігурації BDE
Рис. 2: У діалоговому вікні додати новий аліаса можна вказати тип бази даних

Головне вікно утиліти налаштування BDE має вигляд, зображений на рис.1. Для створення аліаса виберіть у меню "Object" пункт "New". У діалоговому вікні виберіть ім'я драйвера бази даних. Тип аліаса може бути стандартним (STANDARD) для роботи з локальними базами у форматі dBase або Paradox або відповідати найменуванню SQL-сервера (InterBase, Sybase, Informix, Oracle і т.д.).

Після створення нового аліаса слід дати йому ім'я. Це можна зробити за допомогою підпункту "Rename" меню "Object". Однак просто створити аліас не достатньо. Вам потрібно вказати додаткову інформацію, зміст якої залежить від типу вибраної бази даних. Наприклад, для баз даних Paradox і dBase (STANDARD) потрібно вказати лише шлях доступу до даних, ім'я драйвера і прапор ENABLE BCD, який визначає, чи транслює BDE числа в двійковій-десятковому форматі (значення двійковій-десяткового коду усувають помилки округлення): TYPE STANDARD DEFAULT DRIVER PARADOX ENABLE BCD FALSE PATH c: usersdata

SQL-сервер InterBase та інші види баз даних вимагають завдання великої кількості параметрів, багато з яких можна залишити встановленими за замовчуванням.

Системна інформація утиліти налаштування BDE

Отже, ми познайомилися з найбільш важливою можливістю утиліти налаштування BDE - створенням і редагуванням аліасів, що визначають параметри доступу до баз даних. Однак, утиліта настройки BDE дозволяє специфікувати не тільки аліаси, але і драйвери для доступу до баз даних, а також різну системну інформацію, що становить операційне оточення цих самих аліасів.

Розглянемо, наприклад, системну інформацію драйвера PARADOX:

NET DIR. Параметр містить розташування каталозі мережевого керуючого файлу. Він потрібний для того, щоб звернутися до таблиці PARADOX на мережевому диску.

VERSION. Номер версії драйвера.

TYPE. Тип драйвера.

LANGDRIVER. Мовний драйвер, що визначає безліч припустимих символів.

BLOCK SIZE. Розмір блоку на диску, що використовується для запам'ятовування одного запису.

FILL FACTOR. Містить відсоток від блоку на поточному диску. Параметр потрібний для створення індексних файлів.

LEVEL. Параметр визначає тип формату таблиці, яка використовується для створення тимчасових таблиць.

STRICTINTEGRTY. Параметр використання посилальної цілісності. Якщо він дорівнює TRUE, то ви не можете змінити таблицю з посилальної цілісністю, а якщо FALSE, то можете, але ризикуєте порушити цілісність даних.

Як вже зазначалося вище, утиліта настройки BDE зберігає всю конфігураційну інформацію у файлі IDAPI.CFG. Цей файл з попередньо встановленими посиланнями на драйвери і деякими стандартними аліасами створюється при встановленні Delphi. Крім того, він створюється при встановленні файлів редістрібуціі BDE (тобто коли Ви переносите BDE і SQL Links на інші комп'ютери). (1) 1. ЗАГАЛЬНА ЧАСТИНА 1.1. Мета розробки

Метою створення даного програмного продукту є виявлення кращої групи коледжу за оцінками атестаційної або екзаменаційної сесії. 1.2. Аналіз розробки

Дана програма універсальна, тому що може застосовуватися в будь-якому середньому спеціальному або вищому навчальному закладі. Програма працює з Базами даних і ймовірність помилки в ній практично виключена. 2. СПЕЦІАЛЬНА ЧАСТИНА 2.1. Постановка завдання Написати мовою програмування Delphi програму, визначальну найкращий гурт коледжу за оцінками атестаційної та екзаменаційної сесії.

Завдання розроблена у відповідності з ГОСТом 19.201-78 (ст. РЕВ 1627-79). 2.1.1. Призначення завдання

Визначення кращої групи коледжу шляхом обчислення середнього арифметичного оцінок по кожній групі і порівняння отриманого результату з результатами інших груп. 2.1.2. Техніко-математична формулювання завдання

Вхідними даними в цій програмі є бази даних

stud.db з полями: Zachetka-номера заліковки Student - дані про студента Grup - група Kurs - Курс

sessia.db з полями:

Zachetka - номер заліковки

Kodpr - код предмета

Sessia - Тип сесії

Ocenka - оцінка

predmet.db з полями: kodpr - код премета predmet - назва предмета

створені за допомогою компонента для роботи з базами даних Borland Delphi Database Desktop. Для створення використовувався драйвер баз даних Paradox 7.0. Для адміністрування цих баз даних, в Borland Delphi Administrator був створений Alias (Псевдонім) kurs.

Вихідними даними є назва кращої групи. Краща група визначається наступним чином:

За полів бази даних формується масив оцінок однієї групи, потім програма рахує середнє арифметичне і зберігає результат в масив з іменами груп. Після проходження програмою всіх груп елементи масиву з назвами груп порівнюються, група має найбільш високий показник вважається кращою групою.

Краща група коледжу обчислюється за середнього арифметичного.

Арифметичне середнє, число (), що одержується діленням суми декількох чисел (a1, a2, ..., an) на їх кількість (n):

Наприклад, А. с. чисел 3, 5, 7 дорівнює (3 + 5 + 7)/3 = 5.

(2)

Арифметичне середнє, кількох величин рівні їх сумі, діленої на їх число. Якщо n вимірювань або спостережень, однаково заслуговують на довіру, дають n значень, a1, a2.-то найімовірніше значення вимірюваної величини є А. середнє чисел a.

(3)

Рис. 3. Загальний вигляд вікна обчислення

Рис. 4. Загальний вигляд вікна редагування БД
Блок-схема програми

2 Початок

введення

даних

обчислення

середнього

арифметичного

ЦИКЛ

Порівняння

Краща

група

Кінець

1. Початок програми;

2. Перегляд чергового поля БД;

3. Обчислення середнього арифметичного за оцінками кожної групи

4. Цикл від 1 до кількості груп

5. Порівняння резултатов груп

6. Виявлення кращої групи

7. Вихід з програми 2.1.3 Вимоги до програми 2.1.3.1. Вимоги до функціональних характеристик

Створена програма повинна забезпечити обчислення і виведення кращої групи коледжу. Структурна схема

Керуюча програма

Обчислення і виведення кращої Редагування бази даних

групи коледжу 2.1.3.2. Вимоги до надійності

Надійність програми залежить від роботи всієї системи і від умов її зберігання. Якщо програма записана гнучкому магнітному диску, то її надійність залежить від правильного зберігання дискети. У цьому випадку рекомендується створити копію дискети.

Як постійного зберігання програми слід мати жорсткого магнітний диск, а для розповсюдження програми, установку програми краще записувати на CD-ROM.

2.1.3.3. вимоги до складу і параметрів технічних засобів

Програма була виконана в операційну систему Windows ME, вона сумісна з опеаціоннимі системами Windows 98, Windows XP, Windows 95, Windows ME, Windows 2000.

Для роботи даної програми використовується ПК має наступний характеристики: Процесор не нижче Pentium 100 Ємність ОЗП не нижче 64 МБ Розрядність 32 біт Жорсткий магнітний диск Диск 3,5 CD-ROM 2.2. Опис алгоритму Початок Ініціалізація вікна програми Введення даних в програму Обробка даних Виявлення кращої групи Якщо дата поновлення БД, пізніше встановленого - відкриття вікна редагування БД Вихід з програми 2.3. Лістинг програми

Текст програми наводиться в Додатку 1

У програмі використані два Unit

Unit1 - визначення кращої групи

Unit2 - редагування БД 2.4. Опис процесу налагодження програми

У результаті тестового запуску програми не спостерігалося ніяких помилок і збоїв. Програма працює коректно і повністю відповідає поставленому завданню.

Для запуску програми необхідно з меню «Пуск», розділ «Програми», вибрати «Коледж», «Коледж».

Після запуску програми, якщо дата не прострочена, запускається вікно програми, за допомогою якого можна отримати результат про краще групі, інакше виводиться вікно програми редагування бази даних. ВИСНОВОК

Даний курсовий проект є актуальним і відповідає пред'явленим до нього вимогам. Була розроблена і написана, мовою програмування високого рівня Borland Delphi 5.0, з використанням баз даних, програма, що дозволяє визначити кращу групу коледжу за середнім балом атестаційної та екзаменаційної сесії. Список використаної літератури 1. Delphi 5.0, навчальний курс, Фараонів В.В., ISBN 5-8952-020-4, 400 с. Велика Радянська Енциклопедія Малий енциклопедичний словник Брокгауза і Ефрона Delhphi 4.0, Дарахвелидзе П.Г., Марков Е. П. 1998, 816 с. 5. Сайт http://delhpi.mastak.ru Додаток 1. Лістинг програми Частина 1. Обчислення і виведення кращої групи:

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

StdCtrls, Grids, DBGrids, Db, DBTables;

type

TForm1 = class (TForm)

Table1: TTable;

DataSource1: TDataSource;

Table2: TTable;

DataSource2: TDataSource;

DBGrid1: TDBGrid;

DBGrid2: TDBGrid;

Button1: TButton;

Label2: TLabel;

procedure Button1Click (Sender: TObject);

procedure Button2Click (Sender: TObject);

procedure FormShow (Sender: TObject);

private

(Private declarations)

public

(Public declarations)

end;

var

Form1: TForm1;

implementation

uses Unit2;

($ R *. DFM)

procedure TForm1.Button1Click (Sender: TObject);

var

t, i, k, j, f: integer;

tmp: string;

gr: array of string;

tt: array [1 .. 5, 1 .. 5] of extended;

begin

table2.moveby (1);

i: = 1;

for i: = 1 to 3 do// 3 це кількість курсів

begin

for j: = 1 to 2 do// 2 кількість груп на курсі

begin

table1.Filtered: = true;

tmp: tmp + gr [j];

table1.Filter: = 'kurs = 1 and grup =' + tmp;

table2.Filtered: = true;

table2.Filter: = 'sessia = 1';

k: = table2.RecordCount;

t: = 0;

table2.moveby (1);

for f: = 1 to k do

begin

t: = t + table2.fieldbyname ( 'ocenka'). value;

table2.next;

end;

tt [1, 1]: = t/k;

// table1.Filtered: = false;

end;

label1.caption: = (inttostr (t ));

end;

procedure TForm1.Button2Click (Sender: TObject);

var

i: integer;

sum: extended;

begin

table2.filter: = 'grup = 2';

for i: = 1 to Table2.recordcount do

begin

Table2.moveby (i);

sum: = sum + strtoint (Table2.Fieldbyname ( 'ocenka'). value);

end;

sum: = sum/Table2.recordcount;

// abel1.caption: = floattostr (sum) + label1.caption;

end;

procedure TForm1.FormShow (Sender: TObject);

begin

Form2.show;

end;

end. Частина 2. Заповнення бази даних.

unit Unit2;

interface

uses

Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

StdCtrls;

type

TForm2 = class (TForm)

Label1: TLabel;

Edit1: TEdit;

Edit2: TEdit;

Edit3: TEdit;

Edit4: TEdit;

Label2: TLabel;

Label3: TLabel;

Label4: TLabel;

Label5: TLabel;

Label6: TLabel;

Edit5: TEdit;

Button1: TButton;

private

(Private declarations)

public

(Public declarations)

end;

var

Form2: TForm2;

implementation

($ R *. DFM)

end.