Довідник радіоаматора

Міністерство освіти і науки РФ
ГОУ ВПО Череповецький державний університет
Інститут інновацій та безперервної освіти
Кафедра Програмне забезпечення ЕОМ
Дисципліна Проектування інформаційних систем
Курсова робота
Проектування інформаційної системи
«Довідник радіоаматора»
Розрахунково-пояснювальна записка до курсової роботи
Листів 38
Виконав студент:
Холодов К. І.
Група: 6СПО32
Прийняв викладач:
Селянічев О. Л.
Відмітка про залік :______________
Череповець
2007р

Анотація

Ця курсова робота призначена для придбання навичок проектування інформаційних систем. Навчитися принципам побудови функціональних та інформаційних моделей систем, проведення аналізу отриманих результатів, застосування інструментальних засобів підтримки проектування інформаційних систем.
Кількість листів ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. ... ... 38
Кількість таблиць ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 14
Кількість додатків ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 2

Зміст
Введення ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .... ... ... ... ... ... ... ... ... ... .4
1. Опис предметної області ... ... ... ... ... ... ... ... ... ... ... ... ... ... .... ... ..... 5
2.Вибор ЖЦ ІС ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 6
2.1 Методологія RAD ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ..... 10
3. Етапи ЖЦ ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 11
3.1 Фаза аналізу та планування вимог ... ... ... ... ... ... ... ... ... ... ... .. 11
3.2 Фаза проектування ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ..... 11
3.3 Фаза побудови ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. ... .. 17
3.4 Фаза впровадження ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... .. 18
4. Вибір CASE кошти ... ... ... ... ... ... ... ... ... ... ... .... ... ... ... ... ... ... ... ..... 19
5. Опис програми ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 24
Висновок ... ... ... ... ... ... ... ... ... ... .. ... ... ... ... ... ... ... ... ............................. .25
Література ... ... ... ... ... ... ... ... ... ... ... ... ... .. ... ... ... ... ... ... ... ... ... ... ... ....... 26
Додаток 1. Керівництво користувача ... ... ... ... ... ... ... ... ... .. ... ... ... ... 27
Додаток 2. Лістинг програми ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... ... 33

Введення
У ході даної роботи необхідно спроектувати і реалізувати інформаційну систему "Довідник радіоаматора", а також додаток, яке дозволить працювати з нею.
База даних призначена для людей які працюють у сфері електроніки. База повинна включати в себе дані про радіодеталях з різними критеріями, а так само про їх виробника.
У сучасному світі складно знайти таку сферу діяльності, де б не використовувалися бази даних, які дозволяють ефективний і зручний збір, зберігання, обробку та подання інформації різного роду. БД «Довідник радіоаматора» необхідна для зручної і швидкої роботи з базою радіодеталей, яка б володіла простий реалізацією та структурою. Цими властивостями як раз і має реляційна модель бази даних.
У додатку 1 необхідний матеріал для користувача програми
У додатку 2 наводиться лістинг програми.

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

2. Вибір моделі життєвого циклу інформаційної системи
Модель життєвого циклу (далі ЖЦ) програмного забезпечення інформаційної системи (далі ПЗ ІС) при автоматизованому проектуванні відіграє досить важливу роль. Це обумовлено тим, що кожна з CASE-систем орієнтована на певну модель ЖЦ ПЗ ІС.
Життєвим циклом ПЗ ІС являє собою безперервний процес, який з моменту прийняття рішення про створення ПЗ та закінчується при завершенні його експлуатації.
Під моделлю ЖЦ розуміється структура, що визначає послідовність виконання та взаємозв'язку процесів, дій і завдань, що виконуються протягом ЖЦ. Модель ЖЦ залежить від специфіки ІС та специфіки умов, в яких остання створюється і функціонує.
Склад процесів ЖЦ регламентується міжнародним стандартом ISO / IEC 12207: 1995 «Information Technologe - Software Life Cycle Processes» («Інформаційні технології - Процеси життєвого циклу програмного забезпечення»). Стандарт ISO / IEC 12207 не пропонує конкретну модель ЖЦ і методи розробки ПЗ. Його регламенти є загальними для будь-яких моделей ЖЦ, методологій і технологій розробки. Стандарт ISO / IEC 12207 описує структуру процесів ЖЦ ПЗ, але не конкретизує в деталях, як реалізувати або виконати дії і завдання, включені в ці процеси.
До теперішнього часу найбільшого поширення набули наступні дві основні моделі ЖЦ:
· Каскадна модель (70 - 85 г . Р.);
· Спіральна модель (86 - 90 г . Р.).
У спочатку існували однорідних ІС кожен додаток являло собою єдине ціле. Для розробки такого типу додатків застосовувався каскадний спосіб. Його основною характеристикою є розбиття всієї розробки на етапи, причому перехід з одного етапу на наступний відбувається тільки після того, як буде повністю завершено роботу на поточному (рис.1). Кожен етап завершується випуском повного комплекту документації, достатньої для того, щоб розробка могла бути продовжена іншою командою розробників.
Позитивні сторони використання каскадного підходу полягають в наступному:
· На кожному етапі формується закінчений набір проектної документації, який відповідає критеріям повноти та узгодженості;
· Виконуються в логічній послідовності етапи робіт дозволяють планувати терміни завершення всіх робіт і відповідні витрати.
Рис.1 «Каскадна модель життєвого циклу»
Каскадний підхід добре зарекомендував себе при побудові ІС, для яких на самому початку розробки можна досить точно і повно сформулювати всі вимоги, з тим, щоб надати розробникам свободу реалізувати їх якомога краще з технічної точки зору. У цю категорію потрапляють складні розрахункові системи, системи реального часу та інші подібні завдання. Однак у процесі використання цього підходу виявився ряд його недоліків, викликаних перш за все тим, що реальний процес створення ПЗ ніколи повністю не вкладався в таку жорстку схему. У процесі створення ПЗ постійно виникала потреба у поверненні до попередніх етапах і уточнення або перегляд раніше прийнятих рішень. У результаті реальний процес створення ПЗ приймав такий вигляд (рис. 2):
Рис.2 «Модель життєвого циклу з проміжним контролем»
Основним недоліком каскадного підходу є суттєве запізнення з отриманням результатів. Узгодження результатів з користувачами проводиться тільки в точках, що плануються після завершення кожного етапу робіт, вимоги до ІС "заморожені" у вигляді технічного завдання на весь час її створення. Таким чином, користувачі можуть внести свої зауваження тільки після того, як робота над системою буде повністю завершена. У разі неточного викладу вимог або їх зміни протягом тривалого періоду створення ПЗ, користувачі отримують систему, не задовольняє їх потребам. Моделі (як функціональні, так і інформаційні) об'єкта, що автоматизується можуть застаріти одночасно з їх затвердженням.
Для подолання перелічених проблем була запропонована спіральна модель ЖЦ (рис. 3), що робить упор на початкові етапи ЖЦ: аналіз та проектування. На цих етапах реалізація технічних рішень перевіряється шляхом створення прототипів. Кожен виток спіралі відповідає створенню фрагмента або версії ПЗ, на ньому уточнюються цілі і характеристики проекту, визначається його якість і плануються роботи наступного витка спіралі. Таким чином, поглиблюються і послідовно конкретизуються деталі проекту, і в результаті вибирається обгрунтований варіант, який доводиться до реалізації.
Розробка итерациями відображає об'єктивно існуючий спіральний цикл створення системи. Неповне завершення робіт на кожному етапі дозволяє переходити на наступний етап, не чекаючи повного завершення роботи на поточному. При ітеративному способі розробки відсутню роботу можна буде виконати на наступній ітерації. Головне ж завдання - якомога швидше показати користувачам системи працездатний продукт, тим самим, активізуючи процес уточнення та доповнення вимог.
Основна проблема спірального циклу - визначення моменту переходу на наступний етап. Для її вирішення необхідно ввести тимчасові обмеження на кожен з етапів життєвого циклу. Перехід здійснюється відповідно до плану, навіть якщо не вся запланована робота закінчена. План складається на основі статистичних даних, отриманих у попередніх проектах, та особистого досвіду розробників.
Рис. 3 «Спіральна модель життєвого циклу»
При проектуванні програмного забезпечення за основу була взята спіральна модель життєвого циклу (рис. 3), так як при проектуванні даної ІС на ранніх стадіях можна показати попередню версію програмного забезпечення користувачеві, для того щоб обговорити недоліки, побажання і зауваження клієнта і розробника.

2.1 Методологія RAD
В основі проекту будь-який ІВ лежать: методології, технології та інструментальні засоби проектування.
Методологія реалізується через технології інструментальними засобами.
Для розробки даної інформаційної системи використовувалася методологія RAD.
RAD (від англ. Rapid application development - швидка розробка додатків) - концепція створення засобів розробки програмних продуктів, що приділяє особливу увагу швидкості і зручності програмування, створенню технологічного процесу, що дозволяє програмістові максимально швидко створювати комп'ютерні програми. З кінця XX століття RAD одержала широке поширення й схвалення. Реалізує спіральну модель ЖЦ ПЗ.
ЖЦ ПО з цієї методології складається з 4-х етапів:
- Фаза аналізу і планування вимог;
- Проектування;
- Побудова;
- Впровадження.

3. Етапи ЖЦ ІС
3.1 Фаза аналізу та планування вимог.
Пріоритетні функції ІС «Довідник радіоаматора»:
- Генерація різних звітів про наявних радіодеталях;
- Перегляд та добірка за функціональними можливостями;
- Пошук по конкретних параметрів.
3.2 Фаза проектування
Даталогіческое проектування
Основна мета проектування БД - це скорочення надмірності даних, що зберігаються, а отже, економія обсягу використовуваної пам'яті, зменшення витрат на багаторазові операції оновлення надлишкових копій та усунення можливості виникнення протиріч через зберігання в різних місцях відомостей про одне й тому самому об'єкті. Так званий, "чистий" проект БД ("Кожен факт в одному місці") можна створити, використовуючи методологію нормалізації відносин. Теорія нормалізації заснована на концепції нормальних форм. Кожній нормальній формі відповідає набір обмежень і, кажуть, що ставлення відповідає нормальній формі, якщо воно задовольняє цього набору обмежень.
Почнемо складання бази даних з декількох ненормалізованих таблиць, в яких полягають все цікавлять атрибути (поля):

Ненормалізоване таблиця
Таблиця 1 «ненормалізоване таблиця»
1 NF
Таблиця знаходиться в першій нормальній формі (1НФ) тоді і тільки тоді, коли жодна з її рядків не містить в будь-якому своєму полі більше одного значення і жодна з її ключових полів не порожньо.
Таблиця 2 «1NF»
2 NF
Таблиця знаходиться в другій нормальній формі (2НФ), якщо вона задовольняє визначенню 1НФ і всі її поля, що не входять в первинний ключ, пов'язані повної функціональної залежністю з первинним ключем.
Таблиця 3 «виробник»
Таблиця 4 «Радіодеталь»
3 NF
Таблиця знаходиться в третій нормальній формі (3НФ), якщо вона задовольняє визначенню 2НФ і кожен не ключовий атрибут транзитивній залежить від первинного ключа.
Таблиця 5 «Виробник»
Таблиця 6 «Країна»
Таблиця 7 «Фірма»
Таблиця 8 «Радіодеталь»

Таблиця 9 «Матеріал»
Таблиця 10 «Підклас»
Таблиця 11 «Частота»
Таблиця 12 «Температура»
Таблиця 13 «Тип переходу»
Таблиця 14 «Тип складання»
Таблиці 5-14. за визначенням знаходяться в 3NF, тому що перебувають у 2NF і тут не присутня неповних функціональних залежностей не первинних атрибутів від атрибутів можливого ключа, а також немає транзитивних залежностей.
Кожне відношення отриманої реляційної моделі знаходиться в 3NF.
Оскільки в більшості випадків досягнення третьої нормальної форми вважається достатнім для реальних проектів баз даних, то зупинилися на вище наведеної моделі.
Аналіз предметної області
Предметна область даної курсової роботи - Довідник радіоаматора. Розглянуто та систематизовано дані про виробників і продаваних ними радіодеталях, такі як: дані виробника, країна, фірма, радіодеталей, матеріал, підклас, частота, температура, тип переходу, тип складання, номер розробки, та інші дані, що стосуються радіодетелей
Інфологічне проектування
Сутність «Виробник» - показує інформацію про виробника випускаються радіодеталей. Сутність має наступні атрибути: «Код виробника», «Код радіодеталі», «Код країни», «Код фірми».
Сутність «Країна» - надає інформацію про країну в якій випускається радіодеталей. Сутність має наступні атрибути: «Код країни», «Країна».
Сутність «Фірма» - відображає інформацію про назву фірми, якою випускаються радіодеталі. Сутність має наступні атрибути: «Код фірми», «Фірма».
Сутність «Радіодеталь» - містить інформацію, властивості і параметри радіодеталі. Сутність має наступні атрибути: «Код транзистора», «Марка», «Код матеріалу», «Код підкласу», «Потужність», «Код частоти», «Код температури», «Код типу переходу», «Номер розробки», « Модернізація »,« Код типу збірки »,« Ціна ».
Сутність «Матеріал» - показує з якого матеріалу змонтована радіодеталей. Сутність має наступні атрибути: «Код матеріалу», «Матеріал».
Сутність «Підклас» - містить інформацію про те, якому підкласу відноситься радіодеталей. Сутність має наступні атрибути: «Код підкласу», «Підклас».
Сутність «Частота» - містить інформацію про частотність радіодеталі. Сутність має наступні атрибути: «Код частоти», «Частота».
Сутність «Температура» - відображає інформацію про допустимий температурному режимі в якому буде експлуатуватися радіодеталей. Сутність має наступні атрибути: «Код температури», «Температура».
Сутність «Тип переходу» - містить інформацію про те, який тип переходу використовується в радіодеталі. Сутність має наступні атрибути: «Код типу переходу», «Перехід».
Сутність «Тип складання» - являє собою, в яким виконанні спроектована радіодеталей. Сутність має наступні атрибути: «Код типу збірки», «Тип складання».
Разом ми маємо 10 повністю нормалізованих таблиць.
Дана програма буде написана на мові Pascal в середовищі розробки додатків Delphi 7.0. Це дозволить використовувати потужний апарат мови в сукупності з можливістю візуалізації програмування, наданої середовищем.
Численні компоненти управління, що надаються середовищем розробки, дозволяють зробити інтерфейс програми більш зрозумілим користувачеві і схожим на вигляд стандартних додатків широко поширеною операційної системи Windows.
Оскільки база даних для зберігання інформації про радіодеталях невелика, і не здійснюється ніяких складних робіт з обробки цих даних, то в якості СУБД вибираємо Microsoft Access.
Як CASE-засоби для проектування моделі даних еквівалентної реляцііонной моделі в третій нормальній формі вибираємо ERwin.
3.3 Фаза побудови
На даному етапі відбувається створення БД, програмна реалізація ІС, створення для користувача документації. Тестування та інтеграція даної ІС.
Програмний продукт "Довідник радіоаматора" представляє собою набір таблиць баз даних, що містять необхідну інформацію для ведення довідкової системи.
Для створення моделі даних еквівалентної реляційної моделі в третій нормальній формі вибираємо ERwin. Після створення даної моделі здійснюємо генерацію бази даних в СУБД Microsoft Access.
Для подальшої роботи з цією базою серед Delphi потрібно настроїти джерело даних, з допомогою джерела даних ODBC (там необхідно створити джерело даних, вибрати тип Microsoft Access driver, і прописати шлях до нашої бази. Потім потрібно створити Alias ​​з допомогою BDE Administrator, де буде вказано джерело даних і шлях до бази даних.
Розробка ПЗ для нашої інформаційної системи здійснюється в середовищі Borland Delphi. Тут створюються таблиці зберігання даних, за допомогою компонента DBGrid. Для вибору необхідної таблиці в головному вікні програми розташовані кнопки (компонент Button) з назвами цих таблиць. Для здійснення запиту на вибірку компонент Edit.
Доступ до бази даних, зв'язок БД і компонентів DBGrid здійснюється за допомогою компонентів DataSource і Table. Для реалізації запитів застосовується компонент Query.
Код створеної програми можете переглянути в додатку.
На етапі реалізації необхідно розробити так само документацію користувача, з докладним описом функцій програми і зазначенням дій користувача для роботи з даними. Керівництво користувача можна побачити в додатку.
3.4 Фаза впровадження ІС
Після створення програмного продукту необхідна його первісна завантаження, для того, щоб перевірити всі функції даної програми. Перевіряється можливість введення даних (вводиться певний тестовий набір даних), перевіряється правильність виконання запитів. Користувачеві видається Керівництво користувача для того, щоб той ознайомився з функціями програми, навчився з нею працювати.
У процесі експлуатації даного програмного продукту можлива поява помилок - наприклад, в програмі не була передбачена обробка виняткових ситуацій на невірний введення даних (не того типу), відповідно при введенні тексту в рядок з типом дата, програма буде виводити системну помилку або зависати.
Так само в ході експлуатації може виникнути потреба в модифікації цієї програми з причини зміни об'єкта і функцій (наприклад, виникне необхідність у реалізації нових запитів, виведення звітів, з'явитися потреба в зберіганні ще якихось даних, або внаслідок появи нових інформаційних технологій, буде потрібно вдосконалення цього програмного засобу).

4. Вибір CASE-засоби.
Як CASE-засоби для проектування моделі даних еквівалентної реляційної моделі в третій нормальній формі вибираємо ERwin.
ERwin - засіб розробки структури бази даних. ERwin поєднує графічний інтерфейс Windows, інструменти для побудови ER-діаграм, редактори для створення логічного та фізичного опису моделі даних і прозору підтримку провідних реляційних СУБД і настільних баз даних.
Місце ERwin в інформаційному моделюванні
Процес побудови інформаційної моделі складається з наступних кроків:
· Визначення сутностей;
· Визначення залежностей між сутностями;
· Завдання первинних та альтернативних ключів;
· Визначення атрибутів сутностей;
· Приведення моделі до необхідного рівня нормальної форми;
· Перехід до фізичного опису моделі: призначення відповідностей ім'я суті - ім'я таблиці, атрибут сутності - атрибут таблиці; завдання тригерів, процедур та обмежень;
· Генерація бази даних.
ERwin створює візуальне уявлення (модель даних) для розв'язуваної задачі. Це подання може використовуватися для детального аналізу, уточнення і поширення як частини документації, необхідної в циклі розробки. Однак ERwin далеко не лише інструмент для малювання. ERwin автоматично створює базу даних (таблиці, індекси, збережені процедури, тригери для забезпечення посилальної цілісності та інші об'єкти, необхідні для управління даними).
Для проектування моделі даних запускаємо Erwin 4.0. Вибираємо створення нової моделі даних. У Erwin можливо вибрати при проектуванні фізичну або логічну модель даних ми будемо створювати, вибираємо Logycal / Physical.
Для створення сутностей моделі на панелі інструментів вибираємо компонент entity, задаємо ім'я створюваної суті, імена і типи атрибутів, якщо атрибут ключовою ставимо для цього атрибута відповідне значення primary key. Для створення зв'язків між сутностями вибираємо компонент relationship, вибираємо ідентифікує зв'язок. Зв'язок встановлюємо, клацаючи спочатку по батьківській, а потім по дочірньої сутності. Нижче наведена діаграма моделі проектованої ІС

Рис.4 «Схема моделі ІС в Erwin (Logical Model)»

Рис.5 «Схема моделі ІС в Erwin (Phisical Model)»
Після того, як створена модель даних необхідно її згенерувати для конкретної СУБД. Для цього в меню Database-> Choose database вибираємо тип Access, версію 2000. (Рис. 6)

Рис.6 «Вибір СУБД»
А потім здійснюємо генерацію нашої моделі для цієї СУБД: Tools-> Format Engeneer / Schema Generation. Вибираємо компоненти, для генерації. Після натискання на клавішу Generate здійснюється генерація моделі. Для СУБД Access перед генерацією необхідно спочатку створити порожню базу даних Microsoft Access, при генерації моделі буде запитуватися пароль і шлях для доступу до цієї б.д. (Рис. 7)

Рис.7 «Генерація моделі даних»
На рис. 8 зображена схема даних ІС в Microsoft Access

Рис.8 «Схема даних»

5. Опис програми
5.1 Загальні відомості
Програмне застосування розраховане на роботу з базою даних «Довідник радіоаматора» воно призначене для виконання наступних функцій:
1. Виведення інформації на екран;
2. Виконання SQL запитів, які здійснюють необхідну вибірку даних;
3. Видалення даних з таблиць;
4. Додавання інформації.
Програма написана на мові Object Pascal в середовищі візуального програмування Borland Delphi 7. Розроблено для операційних систем Windows 95/98/2000/NT/XP.
5.2. Функціональне призначення
Даная програма призначена для роботи з реляційною базою даних у Windows, вирішує завдання внесення, зберігання, зміни та видалення інформації з бази даних «Довідник радіоаматора».

Висновок

У ході виконання роботи зміцнив знання з проектування інформаційних систем, застосування інструментальних засобів підтримки проектування ІС.

Література.
1. Вендров А.М. Один з підходів до вибору засобів проектування баз даних і додатків. "СУБД", 1995, № 3.
2. Калянов Г.М. CASE. Структурний системний аналіз (автоматизація та застосування). М., "Лорі", 1996.

ДОДАТОК 1
Для запуску програми відкрити файл "Radiodetal.exe", який розташовується в робочій папці програми.
Головна форма програми:

Рис.9 «Головна форма програми»
У даній програмі реалізовані наступні запити на вибірку:
За виробнику
· Росія
· США
· Японія
Вибір країни виробника:

Рис. 10 «Вибір країни виробника»
При виборі виробника, виводиться інформація про радіодеталях вироблених в конкретній країні, а саме марка, фірма виробник, технічні характеристики та ціни.

Рис. 11 «Радіодеталі вироблені в Росії»

Рис. 12 «Радіодеталі вироблені в США»
За типом електронно-діркового переходу:
· Pnp
· Npn
При виборі будь-якого переходу, відображається інформація про радіодеталі з обраним типом переходу.

Рис. 13 «Вибір типу переходу»
При виборі типа: npn, відображаються всі радіодеталі мають даний перехід.

Рис. 14 «Тип переходу: npn»
Організовано можливість перегляду довідників за матеріалами і типами збирання.

Рис. 15 «Вибір довідника»
Довідник «Матеріал»

Рис. 16 «Довідник матеріал»
У базі даних передбачений пошук.
У пошукове поле потрібно ввести номер розробки радіодеталі.

Рис. 17 «Пошукове поле»
У результаті виконання пошуку, в таблиці буде відображена Радіодеталь з номером розробки введеним в пошук, якщо такий номер є.

Рис. 18 «Результат пошуку»

ДОДАТОК 2
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, DB, ADODB, Grids, DBGrids, Menus, StdCtrls;
type
TForm1 = class (TForm)
ADOConnection1: TADOConnection;
ADOTable1: TADOTable;
DataSource1: TDataSource;
DBGrid1: TDBGrid;
ADOTable1DSDesigner: TAutoIncField;
ADOTable1DSDesigner2: TWideStringField;
ADOTable1DSDesigner3: TIntegerField;
ADOTable1DSDesigner4: TIntegerField;
ADOTable1DSDesigner5: TIntegerField;
ADOTable1DSDesigner6: TIntegerField;
ADOTable1DSDesigner7: TIntegerField;
ADOTable1DSDesigner8: TIntegerField;
ADOTable1DSDesigner9: TIntegerField;
ADOTable1DSDesigner10: TIntegerField;
ADOTable1DSDesigner11: TIntegerField;
ADOTable1DSDesigner12: TBCDField;
MainMenu1: TMainMenu;
N1: TMenuItem;
N2: TMenuItem;
N3: TMenuItem;
N4: TMenuItem;
N5: TMenuItem;
pnp1: TMenuItem;
npn1: TMenuItem;
N6: TMenuItem;
N7: TMenuItem;
N8: TMenuItem;
N9: TMenuItem;
N10: TMenuItem;
N11: TMenuItem;
ADOQuery1: TADOQuery;
GroupBox1: TGroupBox;
Edit1: TEdit;
Button1: TButton;
procedure N2Click (Sender: TObject);
procedure N3Click (Sender: TObject);
procedure npn1Click (Sender: TObject);
procedure N10Click (Sender: TObject);
procedure Button1Click (Sender: TObject);
private
{Private declarations}
public
{Public declarations}
end;
var
Form1: TForm1;
uses Unit2, Unit3, Unit4, Unit5, Unit6;
{$ R *. dfm}
procedure TForm1.N2Click (Sender: TObject);
begin
form2.ADOQuery1.Active: = false;
form2.ADOQuery1.SQL.Clear;
form2.ADOQuery1.SQL.Add ('SELECT Радіодеталь.Марка, Фірма.Фірма, Радіодеталь. [Код матеріалу], Радіодеталь.Мощность, Радіодеталь.Цена, Страна.Страна');
form2.ADOQuery1.SQL.Add ('FROM Фірма INNER JOIN (Країна INNER JOIN (Радіодеталь INNER JOIN Виробник ON Радіодеталь. [Код радіодеталі] = Виробник. [Код радіодеталі]) ON Країна. [Код країни] = Виробник. [Код країни ]) ON Фірма. [Код фірми] = Виробник. [Код фірми] ');
form2.ADOQuery1.SQL.Add ('WHERE (((Страна.Страна) = "Росія "));');
form2.ADOQuery1.Active: = true;
Form2.ShowModal;
end;
procedure TForm1.N3Click (Sender: TObject);
begin
form3.ADOQuery1.Active: = false;
form3.ADOQuery1.SQL.Clear;
form3.ADOQuery1.SQL.Add ('SELECT Радіодеталь.Марка, Фірма.Фірма, Радіодеталь. [Код матеріалу], Радіодеталь.Мощность, Радіодеталь.Цена, Страна.Страна');
form3.ADOQuery1.SQL.Add ('FROM Фірма INNER JOIN (Країна INNER JOIN (Радіодеталь INNER JOIN Виробник ON Радіодеталь. [Код радіодеталі] = Виробник. [Код радіодеталі]) ON Країна. [Код країни] = Виробник. [Код країни ]) ON Фірма. [Код фірми] = Виробник. [Код фірми] ');
form3.ADOQuery1.SQL.Add ('WHERE (((Страна.Страна) = "США "));');
form3.ADOQuery1.Active: = true;
Form3.ShowModal;
end;
procedure TForm1.npn1Click (Sender: TObject);
begin
form4.ADOQuery1.Active: = false;
form4.ADOQuery1.SQL.Clear;
form4.ADOQuery1.SQL.Add ('SELECT Радіодеталь.Марка, Радіодеталь. [Код матеріалу], Радіодеталь. [Код підкласу], Радіодеталь. [Код частоти], [Тип переходу]. [Тип переходу]');
form4.ADOQuery1.SQL.Add ('FROM [Тип переходу] INNER JOIN Радіодеталь ON [Тип переходу]. [Код типи переходу] = Радіодеталь. [Код типи переходу]');
form4.ADOQuery1.SQL.Add ('WHERE ((([Тип переходу]. [Тип переходу]) = "npn "));');
form4.ADOQuery1.Active: = true;
Form4.ShowModal;
end;
procedure TForm1.N10Click (Sender: TObject);
begin
Form5.ShowModal;
end;
procedure TForm1.Button1Click (Sender: TObject);
begin
if edit1.Text =''then
ShowMessage ('Введіть № розробки!')
else
begin
form6.ADOQuery1.Active: = false;
form6.ADOQuery1.SQL.Clear;
form6.ADOQuery1.SQL.Add ('SELECT Радіодеталь. [Номер розробки], Страна.Страна, Радіодеталь.Марка, Радіодеталь.Цена');
form6.ADOQuery1.SQL.Add ('FROM Країна INNER JOIN (Радіодеталь INNER JOIN Виробник ON Радіодеталь. [Код радіодеталі] = Виробник. [Код радіодеталі]) ON Країна. [Код країни] = Виробник. [Код країни]');
form6.ADOQuery1.SQL.Add ('WHERE Радіодеталь. [Номер розробки] =' + form1.edit1.text +';');
form6.ADOQuery1.Active: = true;
Form6.ShowModal;
end;
end.