Студопедия

КАТЕГОРИИ:


Архитектура-(3434)Астрономия-(809)Биология-(7483)Биотехнологии-(1457)Военное дело-(14632)Высокие технологии-(1363)География-(913)Геология-(1438)Государство-(451)Демография-(1065)Дом-(47672)Журналистика и СМИ-(912)Изобретательство-(14524)Иностранные языки-(4268)Информатика-(17799)Искусство-(1338)История-(13644)Компьютеры-(11121)Косметика-(55)Кулинария-(373)Культура-(8427)Лингвистика-(374)Литература-(1642)Маркетинг-(23702)Математика-(16968)Машиностроение-(1700)Медицина-(12668)Менеджмент-(24684)Механика-(15423)Науковедение-(506)Образование-(11852)Охрана труда-(3308)Педагогика-(5571)Полиграфия-(1312)Политика-(7869)Право-(5454)Приборостроение-(1369)Программирование-(2801)Производство-(97182)Промышленность-(8706)Психология-(18388)Религия-(3217)Связь-(10668)Сельское хозяйство-(299)Социология-(6455)Спорт-(42831)Строительство-(4793)Торговля-(5050)Транспорт-(2929)Туризм-(1568)Физика-(3942)Философия-(17015)Финансы-(26596)Химия-(22929)Экология-(12095)Экономика-(9961)Электроника-(8441)Электротехника-(4623)Энергетика-(12629)Юриспруденция-(1492)Ядерная техника-(1748)

Рекомендована структура для виконання дипломної роботи 3 страница




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

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

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

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

Перша нормальна форма:

- забороняє повторювані стовпці (що містять однакову за змістом інформацію)

- забороняє множинні стовпці (що містять значення типу списку і т.п.)

- вимагає визначити первинний ключ для таблиці, тобто той стовпець або комбінацію стовпців, які однозначно визначають кожен рядок

Друга нормальна форма

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

Третя нормальна форма

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

Нормальна форма Бойса-Кодда

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

Четверта нормальна форма

Для приведення таблиці, що знаходиться в нормальній формі Бойса-Кодда, до четвертої нормальної форми необхідно усунути наявні в ній багатозначні залежності. Тобто забезпечити, щоб вставка / видалення будь-якого рядка таблиці не вимагала б вставки / видалення / модифікації інших рядків цієї ж таблиці.

П'ята нормальна форма

Таблицю, що знаходиться в четвертій нормальній формі і, здавалося б, уже нормалізовану до межі, в деяких випадках ще можна буває розбити на три або більше (але не на дві!) Таблиць, з'єднавши які, ми отримаємо вихідну таблицю. Отримані в результаті такої, як правило, дуже штучною, декомпозиції таблиці і називають знаходяться у п'ятій нормальна формі. Формальне визначення п'ятої нормальної форми таке: це форма, в якій усунуті залежності з'єднання. У більшості випадків практичної користі від нормалізації таблиць до п'ятої нормальної форми не спостерігається.

Така ось теорія... Розроблено спеціальні формальні математичні методи нормалізації таблиць реляційних баз даних. На практиці ж тлумачний проектувальник баз даних, детально ознайомившись із предметною областю, як правило, досить швидко накидає структуру, в якій більшість таблиць знаходяться в четвертій нормальній формі:).

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

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

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

Нормалізація баз даних – це загальне поняття, однак, його прийнято поділяти на кілька нормальних форм, про які й буде сказано далі.

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

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

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

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

Нормалізація баз даних: основні правила

Варто сформулювати набір правил, яких слід притримувати в роботі з нормалізації. У першу чергу варто виключати повторювані групи. Необхідно формувати окрему таблицю, що зберігає кожен набір пов’язаних атрибутів, в якій і створити окремий ключ. Далі обов’язково виключити надлишкові дані. У випадках, коли залежність атрибуту спостерігається тільки від частини ключа, то його необхідно виставити в окрему таблицю. Третє правило полягає в обов’язковому виключенні стовпців, що не залежать від ключа. Атрибути слід помістити в ізольовану таблицю, якщо вони не роблять належного впливу на ключ. Обов’язково слід ізолювати незалежні множинні відносини. У даному випадку мова йде про те, що між кількома відносинами не проглядається конкретна зв’язок. І останнє, варто ізолювати множинні відносини, пов’язані семантично. На цьому нормалізація БД завершується, після чого настає процес розробки.[12]

 

3.2 Розробка клієнту бази даних

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

Для початку нам потрібно перекинути на робоче поле спеціальні компоненти і зробити підключення до бази даних

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

Для початку нам потрібно перекинути на робоче поле спеціальні компоненти і зробити підключення до бази даних

 

Рис.3.1.Головна панель (робоча панель)

Після чого я розташував кнопки для більш зручного розуміння програми

Рис.3.2.Розташування кнопок

Після чого я візуально покращів програму додав фон та розміри панелів та кнопок.

Рис.3.3.Візуально готова програма

Далі я почав прописувати код по кнопкам.

Рис. 3.4.Головні кнопки

procedure TForm1.Button2Click(Sender: TObject);

begin

if Form1.MyQuery1.Active = false then

begin

Form1.MyQuery1.SQL.Clear;

Form1.MyQuery1.SQL.Add('SHOW DATABASES');

Form1.MyQuery1.Active:= true;

if Form1.Memo2.Visible = true then

begin

Form1.Memo2.Visible:= false;

Form1.DBGrid1.Visible:= true;

end;

end;

 

Form1.Button3.Visible:= false;

Form1.Button5.Visible:= false;

Form1.Button6.Visible:= false;

 

Form1.DBGrid1.Tag:= 0;

Form1.MyQuery1.Active:= false;

Form1.MyQuery1.SQL.Clear;

Form1.MyQuery1.SQL.Add('SHOW DATABASES');

Form1.MyQuery1.Active:= true;

end;

 

Далі додаткові кнопки

Рис.3.5. Додаткові кнопки

 

procedure TForm1.Button1Click(Sender: TObject);

var

table_name: string;

begin

Form1.Button3.Visible:= false;

Form1.Button5.Visible:= false;

Form1.Button6.Visible:= false;

Form1.MyQuery1.Active:= false;

Form1.MyQuery1.SQL.Clear;

Form1.MyQuery1.SQL.Add('SHOW TABLES');

Form1.MyQuery1.Active:= true;

 

if Form1.Memo2.Visible = true then

begin

Form1.Memo2.Visible:= false;

Form1.DBGrid1.Visible:= true;

end;

 

Form1.DBGrid1.Tag:= 1;

end;

На кнопку 3 я помістив код який виконує функцію зберігання баз даних

procedure TForm1.Button3Click(Sender: TObject);

begin

// Form1.DBGrid1.Focused:= false;

Form1.DBGrid1.SelectedRows.Refresh;

end;

Кнопка 5 додае поле в базі даних яке потім можна буде заповнити

procedure TForm1.Button5Click(Sender: TObject);

begin

Form1.MyQuery1.Insert;

end;

Кнопка 6 видаляє поле яке існує в БД

procedure TForm1.Button6Click(Sender: TObject);

begin

Form1.MyQuery1.Delete;

end;

 

Рис.3.6. Кнопки додаткових функцій

Кнопка 4 виводить лог дій які проводяця під час роботи в програмі

procedure TForm1.Button4Click(Sender: TObject);

begin

if Form1.Panel2.Tag = 0 then

begin

Form1.Panel2.Visible:= true;

Form1.Splitter1.Visible:= true;

Form1.Panel2.Tag:= 1;

end

else

begin

Form1.Panel2.Visible:= false;

Form1.Splitter1.Visible:= false;

Form1.Panel2.Tag:= 0;

end;

end;

Кнопка 7 призначена для виконання запиту а саме ми прописуемо необхідний нам запит а и тиснемо ввести і бачемо результат у полі DBGrid1.

Наприклад запит який виводить всі БД show databases

procedure TForm1.Button8Click(Sender: TObject);

begin

Form2.Show;

Form2.frxReport1.ShowReport;

end;

а друга кнопка під номером 9 яка відправляе на друк мае такий текст

procedure TForm1.Button9Click(Sender: TObject);

begin

Form2.Show;

Form2.frxReport1.ShowReport;

Form2.frxReport1.Print;

end;

end.

Наступним моїм кроком було Підключення до БД за допомогою компонентів

Рис.3.7.Патч компонентів для підключення та роботи БД

Рис. 3.8.Компонент підключення

Рис.3.9.Підключення до таблиці розклад

Рис. 3.10 Тут мі вибираємо дійсний тип бази даних якщо цього не зробити програма буде працювати не коректно

Також нам треба зробити звіт для цього нам буде потрібен компонент FastReport.

Я створюю Form2 і на ній я вносю спеціальні компоненти для підключення звіту має такий вигляд.

Рис. 3.11 Розташування на другому робочому полі компонентів звіту

Потім проводиця підключення компонента frxDBDataset1 в DataSource треба прописати Form1.MyDataSource1 щоб компонент побачив основну базу даних де ми вибираємо роз положення в яких ми будимо бачити звіт я виставив стовбці і це виглядає так.

Рис.3.12 Вигляд заповненої таблиці звітів

Потім мені потрібно вказати дві кнопки одна з яких буде виводити звіт а друга буде друкувати отже перша кнопка під номером 8 має такий код

Також я створив лог дій в котрому видно всі мої покрокові дії це полегшить роботу і створив довідку що покращує розуміння програми.

Рис.3.13 Вигляд логу

Рис. 3.14 Програма для створення довідки

 

 

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

Рис. 3.15 остаточний вигляд програми

 

3.3 Тестування програми клієнту бази даних.

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

Рис. 3.16 Робота кнопки «Всі бази даних»

Рис. 3.17 Робота кнопки «Всі таблиці»

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

Рис.3.18 Вигляд кнопки Додати

Додавати інформацію можна прямо в клієнті

Далі я перевіряю кнопку Видалити і після того як я створив строку я її видалив

Рис. 3.19 Вигляд дії видалити

Кнопка третя це кнопка «Зберігти» яка зберігає результат

Тепер я перевіряю лог дій я виконав декілька кроків і результат ми бачену у полі виводу кроків.

Рис. 3.20 функції кнопки Лог

 

Далі я перевіряю кнопки звіту а сам звіт виглядає ось так

Рис. 3.21 Вигляд Звіту

Наступним кроком перевірка строки запитів я перевіряю простий запит SHOW DATABASES який виводить всі бази даних на екран

Рис. 3.22 Вигляд запиту

Останнім кроком перевірки являється кнопка довідника коли ми її натискаємо нам виходіть вікно довідника

Рис.3.23Вигляд довідника

4 ОХОРОНА ПРАЦІ ПРИ РОБОТІ З ЕОМ

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

Умови роботи і пристрій робочого місця програміста повинно відповідати вимогам гігієни, антропометрії, а також фізичним та психологічним особливостям працівника.

Найбільш важливими аспектами, які контролюються охороною праці в галузі, є:

- Робочий простір. Воно повинно бути досить просторим і дозволяти безперешкодно здійснювати необхідні для роботи і відпочинку переміщення. Крім того, стілець і стіл, як головні складові простору, повинні відповідати гігієнічним нормам і індивідуальними параметрами працівника. Занадто низька або занадто висока меблі ускладнюють робочий процес, що призводить до серйозних проблем зі здоров'ям;

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

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

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

- Вентиляція. Приміщення, в якому працюють програмісти, повинно вентилюватися постійно і на достатньому рівні. Техніка прогріває повітря і знижує кількість кисню, що може призвести до стомлюваності і навіть непритомності;

- Відпочинок. Регулярні перерви - обов'язкова умова на будь сидячій роботі. Робочий процес повинен постійно перемежовуватися з фізичною активністю: це дозволить підвищити ККД роботи і запобігти проблеми зі здоров'ям.

Програміст зобов'язаний:

- У всіх випадках виявлення обриву проводів живлення, несправності заземлення та інших пошкоджень електрообладнання, появи запаху гару негайно відключити живлення і повідомити про аварійну ситуацію керівнику і черговому електрику;

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

- При будь-яких випадках збою в роботі технічного обладнання або програмного забезпечення негайно викликати представника інженерно-технічної служби експлуатації обчислювальної техніки;

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

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

Вимоги безпеки після закінчення РОБОТИ

Після закінчення робіт програміст зобов'язаний дотримуватися таку послідовність вимикання обчислювальної техніки:

- Провести закриття всіх активних завдань;

- Виконати парковку голівки, що зчитує жорсткого диска (якщо не передбачена автоматична парковка головки);

- Переконатися, що в дисководах немає дискет;

- Вимкнути живлення системного блоку (процесора);

- Вимкнути живлення всіх периферійних пристроїв;

- Відключити блок живлення.

Після закінчення робіт програміст зобов'язаний оглянути і привести в порядок робоче місце, повісити халат в шафу і вимити з милом руки та обличчя.

 

ВИСНОВКИ

У даній роботі описані можливості програмного продукту компанії Borland, а також деякі особливості проектування додатків з його допомогою. У світі вже багато розробників твердо орієнтуються на використання Delphi як на інструмент, що дозволяє створювати високоефективні клієнт-серверні додатки. Діапазон розроблених за допомогою Delphi програмних продуктів також вражає - від ігрових програм до найпотужніших банківських систем.

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

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

Середовище Borland Delphi надає можливість програмісту роботи з компонентами, які дозволяють розробляти клієнт баз даних.

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

Тестування проводилось в операційних системах: Windows7, Windows 8. Під час тестування в різних операційних системах програмне забезпечення працювало безперебійно.

Переваги програми:

- Компактність

- Простота користування

- Швидкодія

- Простота підтримки

Дану роботу на тему «Проектування, розробка та реалізація клієнта бази даних «MySQL» у середовищі візуального програмування Delphi (Delphi XE3)»розкрито повністю. Розроблено програмне забезпечення в середовищі Borland Delphi, яке призначене для роботи з СКБД. Також можливе додавання редагування таблиць і баз даних. Так як програмне забезпечення має можливість працювати з СКБД, можемо працювати повністю в цій програмі замість клієнта «MySQL»це дуже полегшує роботу особливо тим кому важко працювати в клієнтах СКБД.

 


СПИСОК ВИКОРИСТАНОЇ ЛІТЕРАТУРИ

1. В. Васвані. MySQL: використання та адміністрування MySQL Database Usage & Administration. - М.: «Пітер», 2011. - 368 с. - ISBN 978-5-459-00264-5.

2. Компанія MySQL AB. MySQL. Керівництво адміністратора. - Спб.: «Вільямс», 2010.

3. Компанія MySQL AB. MySQL. Довідник помові. - Спб.: «Вільямс», - ISBN: 5-8459-0804-3

4. Кузнєцов Максим, Сімдянов Ігор. MySQL 5. В оригіналі. - Спб.: «БХВ-Петербург», 2010. - С. 1024. - ISBN 5-94157-928-4

5. Кузнєцов Максим, Сімдянов Ігор. MySQL на прикладах. - Спб.: «БХВ-Петербург», 2011. - С. 952. - ISBN 978-5-9775-0066-1

6. Кузнєцов Максим, Ігор Сімдянов. Самоучитель MySQL 5. - Спб.: «БХВ-Петербург», 2010. - С. 560. - ISBN 5-94157-754-0

7. Кузнєцов Максим, Ігор Сімдянов. Самоучитель MySQL 5. - Спб.: «БХВ-Петербург», 2011. - С. 564. - ISBN 5-96147-254-3

8. Кузнєцов Максим, Ігор Сімдянов. MySQL 5. В оригіналі, 2010

9. Пітер Лавін. Об'єктно-орієнтованого PHP концепцій, методів і кодiв. - Спб.: «NoStarchPress», 2009. - ISBN: 1593270771

10. Стів Суерінг, Тім Конверс, Джойс Парк. PHP і MySQL. Біблія програміста, 2-е видання = PHP 6 and MySQL 6 Bible. - М.: «Діалектика», 2010. - 912 с. - ISBN 978-5-8459-1640-2

11. Стів Суерінг, Тім Конверс, Джойс Парк. PHP і MySQL. Біблія програміста. - Спб.: «Діалектика», 2010

12. НосирєваЄ.В., Курс лекцій по курсу Технології програмування.

13. Архангельський А.Я. - Delphi 2009. Довідковий посібник.

14. Електронний самовчитель Delphi 7.0

15. Багріновскій К.А. Хрустальов Є.Ю. Нові інформаційні технології. - М.: ЕКО, 2009. - 250С.

16. Шалкіна Т.Н. «Електронні навчально-методичні комплекси: проектування, дизайн» -2008

17. Фаронов В.В.Delphi 7.0. Початковий курс. Навчальний посібник., М., 2009

18. Жуков Сергей Режим доступу:

http://webadequate.ru/rabota-s-bd-mysql/15-normalizaciya-obektov-v-mysql.html

19. Максим Чірков Режим доступу:

http://www.opennet.ru/docs/RUS/mysqlcli/glava06.html

20. Денисенко А.Ф. Основы охраны труда: Конспект лекций в 2-х ч.

21. Лапин В.М. Безпека життєдіяльності людини. -К.: 2009

 

Додаток А

unit aer;

interface

uses

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

Dialogs, Grids, DBGrids, DB, DBAccess, MyAccess, MemDS, StdCtrls, ADODB,

ExtCtrls, ComCtrls, XPMan;

type

TForm1 = class(TForm)

MyConnection1: TMyConnection;

MyQuery1: TMyQuery;

MyDataSource1: TMyDataSource;

DBGrid1: TDBGrid;

buff: TMyQuery;

Panel1: TPanel;

Panel2: TPanel;

Memo1: TMemo;

StatusBar1: TStatusBar;

Splitter1: TSplitter;

XPManifest1: TXPManifest;

Memo2: TMemo;

Button2: TButton;

Button1: TButton;

Button3: TButton;

Button5: TButton;

Button6: TButton;

Button4: TButton;

Edit1: TEdit;

Button7: TButton;

Button8: TButton;

Button9: TButton;

procedure Button1Click(Sender: TObject);

procedure Button2Click(Sender: TObject);

procedure DBGrid1DblClick(Sender: TObject);

procedure Button3Click(Sender: TObject);

procedure Button4Click(Sender: TObject);

procedure Button5Click(Sender: TObject);

procedure Button6Click(Sender: TObject);

procedure Button7Click(Sender: TObject);

procedure Button8Click(Sender: TObject);

procedure Button9Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var

Form1: TForm1;

implementation

uses Unit2;

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);//Кнопка "Вiдобразити таблиці БД"

var//змінна

table_name: string;// змінна для збереження таблиць

begin//Відкриває операторнудужку

Form1.Button3.Visible:= false;//відкриття кнопки 3

Form1.Button5.Visible:= false;//відкриття кнопки 5

Form1.Button6.Visible:= false;//відкриття кнопки 6

Form1.MyQuery1.Active:= false;//вімкненя керуючого елементу для запиту

Form1.MyQuery1.SQL.Clear;

Form1.MyQuery1.SQL.Add('SHOW TABLES');//показати таблиці

Form1.MyQuery1.Active:= true;//включення керуючого елементу для запиту

if Form1.Memo2.Visible = true then//умова помилки показуюця значить

begin//Відкриває операторнудужку

Form1.Memo2.Visible:= false;//якщо умова помилок не показуеця

Form1.DBGrid1.Visible:= true;//умова показуеця DBGrid1

end;//закривае операторну дужку

Form1.DBGrid1.Tag:= 1;//Отриманнязначення "Флага"

end;//закривае операторну дужку

procedure TForm1.Button2Click(Sender: TObject);//Кнопка "Вiдобразити БД"

begin//Відкриває операторнудужку

if Form1.MyQuery1.Active = false then//якщо елемент вімкнений означае

begin//Відкриває операторнудужку

Form1.MyQuery1.SQL.Clear;//очистка запроса

Form1.MyQuery1.SQL.Add('SHOW DATABASES');

Form1.MyQuery1.Active:= true;

if Form1.Memo2.Visible = true then

begin//Відкриває операторнудужку

Form1.Memo2.Visible:= false;//якщо умова помилок показуеця

Form1.DBGrid1.Visible:= true;//умова показуеця DBGrid1

end;//закривае операторну дужку

end;//закривае операторну дужку

Form1.Button3.Visible:= false;//відкриття кнопки 3

Form1.Button5.Visible:= false;//відкриття кнопки 5

Form1.Button6.Visible:= false;//відкриття кнопки 6

Form1.DBGrid1.Tag:= 0;//присвоеня значеня 0

Form1.MyQuery1.Active:= false;//вімкненя керуючого елементу для запиту

Form1.MyQuery1.SQL.Clear;//очистка запроса

Form1.MyQuery1.SQL.Add('SHOW DATABASES');

Form1.MyQuery1.Active:= true;//включення керуючого елементу для запиту

end;//закривае операторну дужку

procedure TForm1.DBGrid1DblClick(Sender: TObject);//при двойному кліці (тицненні, жмаканні) виконувати описані дії

var//змінна

db_name: string;//переменная в которій зберігаеця назва бд

table_name: string;//переменная в которій зберігаеця назва таблиць

tag_grid: integer;//обявление зміної тип integer

begin//Відкриває операторну дужку

tag_grid:= Form1.DBGrid1.Tag;

 

if tag_grid = 0 then

begin//Відкриває операторну дужку

db_name:= Form1.DBGrid1.DataSource.DataSet.FieldByName('Database').AsString;//виборка із списку баз даних необхідної бд

Form1.Memo1.Lines.Add('выбрана БД: '+db_name);

Form1.MyQuery1.Active:= false;//вімкненя керуючого елементу для запиту

Form1.MyConnection1.Connected:= false;//виключеня елемента зеднання з бд

Form1.MyConnection1.Database:= db_name;//виключеня елемента зеднання з бд




Поделиться с друзьями:


Дата добавления: 2015-07-13; Просмотров: 443; Нарушение авторских прав?; Мы поможем в написании вашей работы!


Нам важно ваше мнение! Был ли полезен опубликованный материал? Да | Нет



studopedia.su - Студопедия (2013 - 2024) год. Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав! Последнее добавление




Генерация страницы за: 0.007 сек.