Розробка структури інформаційної системи для автоматизації роботи автопідприємства - Курсовая работа

бесплатно 0
4.5 157
Аналіз предметної області і постановка задачі на розробку програми для автоматизації роботи автопідприємства. Перелік та опис використаних компонентів та основних процедур програми. Опис структур та методів обробки даних. Інструкція для користувача.

Скачать работу Скачать уникальную работу

Чтобы скачать работу, Вы должны пройти проверку:


Аннотация к работе
У відповідності до технічного завдання програма “АІС автопідприємства” повинна забезпечувати облік даних про транспортні засоби і можливість отримання інформації, вибраної за певними критеріями. При вилучені транспортного засобу з файлу, вилучаються всі дані про даний транспортний засіб. Процедура викликає діалогове вікно «Відкрити файл» Для збереження файлів таблиць використовують каталог, який використовує сама програма. transport.dat - файл, який використовується для обліку даних про всі транспортні засоби. begin if (edit2.Text="") or (Edit3.Text="") or (Edit5.Text="") or (Edit6.Text="") or (Edit7.Text="") or (Edit8.Text="") or (Edit9.Text="") or (Edit10.Text="") then showmessage("Ви ввели не всі дані!!!") else begin assignfile(f,"transport.dat");Для реалізації поставленої задачі були використані записи. Реалізована можливість збереження даних у файл та редагування збережених даних. Практична реалізація забезпечує можливість виконання наступних операцій над створеною структурою даних: 1) ініціалізацію;Лінійний пошукfor i:=1 to h do for j:=2 to h do begin if STRINGGRID1.Cells[0,i]>STRINGGRID1.Cells[0,j] then begin buf:=STRINGGRID1.Cells[0,i]; for i:=1 to h do for j:=2 to h do begin if STRINGGRID1.Cells[1,i]>STRINGGRID1.Cells[1,j] then begin buf:=STRINGGRID1.Cells[0,i]; for i:=1 to h do for j:=2 to h do begin if STRINGGRID1.Cells[2,i]>STRINGGRID1.Cells[2,j] then begin buf:=STRINGGRID1.Cells[0,i]; for i:=1 to h do for j:=2 to h do begin if STRINGGRID1.Cells[4,i]>STRINGGRID1.Cells[4,j] then begin buf:=STRINGGRID1.Cells[0,i]; for i:=1 to h do for j:=2 to h do begin if STRINGGRID1.Cells[5,i]>STRINGGRID1.Cells[5,j] then begin buf:=STRINGGRID1.Cells[0,i];

Вывод
Даний проект розроблений відповідно одержаного завдання. Для реалізації поставленої задачі були використані записи. Реалізована можливість збереження даних у файл та редагування збережених даних. Практична реалізація забезпечує можливість виконання наступних операцій над створеною структурою даних: 1) ініціалізацію;

2) додавання нових елементів

3) видалення елементів

4) переміщення по структурі даних

5) пошук елементів структури даних, що відповідають заданим критеріям

6) виведення всіх елементів структури даних.

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

Список литературы
1. Гофман В., Хоменко А. Delphi 5. - Спб,: БХВ Санкт - Петербург, 2000 - 800с.

2. А.Я. Архангельский Программирование в Delphi 7. - М.:ООО «Бином-Пресс», 2003г. - 1152с.; ил.

3. Фленов М.Е. Библия Delphi. - 3-е изд.. перераб. И доп. - СПБ.: БХВ-Петербург, 2011-688 с.: ил. CD-ROM

4. Намнюгин С.А. Turbo Pascal Санкт-Петербург.: Изд-во Пите, 2002. 491с.

5. Марченко А.И., Марченко Л.А., Программирование в среде Turbo Pascal 7.0. К.:Век . - 2000.

6. Парижский С.М. Delphi. Учимся на примерах/ Под ред. Ю.А. Шпака - К.: “МК-Пресс”, 2005. - 216 с., ил.

Вы можете ЗАГРУЗИТЬ и ПОВЫСИТЬ уникальность
своей работы


Новые загруженные работы

Дисциплины научных работ





Хотите, перезвоним вам?