иця «Види ремонту»
Схема бази даних формується після закінчення роботи над макетами таблиць за допомогою меню Сервіс/Схема даних.
При формуванні зв'язків між таблицями обов'язково встановлюється підтримка цілісності даних
Готова схема бази даних наведена нижче:
Малюнок 5 - Схема даних
5. Програмування програми
Послідовність дій
Створимо меню з декількох форм. Для цього розмістимо на формі додатку компонент MainMenu і відредагуємо його.
Організуємо доступ до БД через ADOConnection, ADOTable, DataSource. Розмістимо наступні компоненти (Рис. 6):
Малюнок 6 - Компоненти
Налаштування компонентів ::
властивість ConnectionString - відкривається вікно, в ньому після натискання кнопки Build вибираємо Microsoft Jet 4.0v OLE DB Provider, потім по кнопці Next - вибираємо нашу БД
властивість Login Promt: False
властивість Connected: True
DataSource
властивість DataSet - вибираємо відповідний компонент AdoQuery;
Якщо все зроблено правильно, то після завдання таблиці компонент DBGrid1 заповниться даними (рис. 7).
Малюнок 7 Додаток для перегляду таблиці бази даних Access
Для більшої зручності при створенні додатків баз даних реалізовано додавання даних
void __fastcall TMainForm :: menuAddGoodsClick (TObject * Sender)
{ gt; CreateForm (__ classid (TGoodsForm), amp; GoodsForm);
GoodsForm- gt; ShowModal ();
}
Малюнок 8
Пошук записів
Для пошуку записів використаний методом Locate. Приміром, пошук буде проводитися по заданому полю. Для пошуку необхідно помістити на форму компонент для введення критерію пошуку і кнопку.
У обробник події натискання кнопки «Пошук» записуємо:
void __fastcall TMainForm :: btnSearchClick (TObject * Sender)
{(editSearch- gt; Text.IsEmpty ()); Options; .Clear (); lt; lt; loCaseInsensitive lt; lt; loPartialKey; (! DataSource- gt; DataSet- gt; Locate (boxSearch- gt; Text, editSearch- gt; Text, Options)) (Application- gt; Handle, За вашим запитом нічого не знайдено! raquo ;, Пошук raquo ;, MB_ICONINFORMATION);
}
Очищення бази даних відбувається наступним чином:
void __fastcall TMainForm :: menuClearBaseClick (TObject * Sender)
{(MessageBoxA (Application- gt; Handle, Ви дійсно хочете очистити поточну базу? raquo ;, Підтвердження очищення raquo ;, MB_ICONQUESTION + MB_YESNO) == IDNO); gt; DataSet- gt; Edit (); gt; DataSet- gt; First ();
DataSource- gt; DataSet- gt; Delete (); (! DataSource- gt; DataSet- gt; Eof)
{ gt; DataSet- gt; Delete (); gt; DataSet- gt; Next ();
}
}
6. Опис роботи з системою
Метою проведення випробувань є перевірка працездатності (надійності) програми при різних умовах її функціонування.
Програма повинна забезпечувати коректність введення вихідних даних (шляхом здійснення відповідних перевірок та інформування користувача про виниклі неточності у роботі), а також отримання несуперечливого результату.
Розроблюваний інтерфейс включає в себе засоби редагування всіх використовуваних для розрахунку даних і є простим і зрозумілим в роботі для звичайного користувача.
При запуску програми з'являється вікно
Рисунок 9 - Вікно авторизації
Малюнок 10 - Головне вікно
Головне вікно, яке містить
головне меню,
вкладки,
можливість пошуку записів,
область відображення і редагування даних (рис. 11-13):
Введення даних максимально автоматизований.
Малюнок 11
Малюнок 12
Малюнок 13
Редагування (зміна, видалення) бази даних можливо тільки при правильній авторизації користувача.
Малюнок 13
Крім того, на формах передбачена можливість додавання покупця, товару, замовлення.