Автоматизация Компьютерного салона(рабочего места) или компьютерного сервиса,заправка картриджей,ремонт оргтехники. Например: Программа должна вести учет клиентов которые принесли картриджи на заправку, ремонт компьютеров и орг.техники. А так же рассмотрю

Оглавление
Введение
1.Функциональная модель процесса
2. Диаграмма DFD существующего процесса
4. Схема структурная программного комплекса
5. Информационно-логическая модель БД
7. Модель размещения на вычислительных узлах
8. Диаграмма ГАНТА
9. Прототип модуля
Заключение
Список литературы

next;procedure TForm1.suiCheckBox4Click(Sender: TObject);beginif suiEdit2.Enabled=false then suiEdit2.Enabled:=true else suiEdit2.Enabled:=false;end;procedure TForm1.suiButton1Click(Sender: TObject);begintrytr_st.edit;tr_st.FieldByName('nomer_rs').AsInteger:=strtoint(suiEdit3.text);tr_st.FieldByName('ip_adr').AsString:=suiEdit1.text;tr_st.FieldByName('ident').AsString:=suiEdit6.text;tr_st.FieldByName('spec').AsString:=suiMemo1.text;tr_st.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton2Click(Sender: TObject);var data_sm:extended;begintrytuz.Edit;tuz.FieldByName('nomer_uz').AsInteger:=strtoint(suiEdit2.text);tuz.FieldByName('domen').AsString:=suiEdit5.text;tuz.FieldByName('log').AsString:=suiEdit8.text;tuz.FieldByName('parol').AsString:=suiEdit9.text;tuz.FieldByName('polzovatel').AsString:=suiEdit7.text;tuz.FieldByName('srok_deist').AsInteger:=strtoint(suiEdit4.text);tuz.FieldByName('data_ust').AsString:=suiEdit21.text;data_sm:=strtodate(suiEdit21.text)+strtoint(suiEdit4.text);tuz.FieldByName('data_smen').AsString:=DateToStr(data_sm);tuz.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton5Click(Sender: TObject);var data_sm:extended;begintrytuz.Append;tuz.FieldByName('nomer_uz').AsInteger:=strtoint(suiEdit2.text);tuz.FieldByName('domen').AsString:=suiEdit5.text;tuz.FieldByName('log').AsString:=suiEdit8.text;tuz.FieldByName('parol').AsString:=suiEdit9.text;tuz.FieldByName('polzovatel').AsString:=suiEdit7.text;tuz.FieldByName('srok_deist').AsInteger:=strtoint(suiEdit4.text);tuz.FieldByName('data_ust').AsString:=suiEdit21.text;data_sm:=strtodate(suiEdit21.text)+strtoint(suiEdit4.text);tuz.FieldByName('data_smen').AsString:=DateToStr(data_sm);tuz.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiButton4Click(Sender: TObject);begintuz.Delete;end;procedure TForm1.suiButton3Click(Sender: TObject);begintr_st.Delete;end;procedure TForm1.suiDBGrid1CellClick(Column: TColumn);beginsuiEdit3.text:=tr_st.FieldValues['nomer_rs'];suiEdit1.text:=tr_st.FieldValues['ip_adr'];suiEdit6.text:=tr_st.FieldValues['ident'];suiMemo1.text:=tr_st.FieldValues['spec'];end;procedure TForm1.suiDBGrid3CellClick(Column: TColumn);beginsuiEdit5.text:=tuz.FieldValues['domen'];suiEdit8.text:=tuz.FieldValues['log'];suiEdit9.text:=tuz.FieldValues['parol'];suiEdit7.text:=tuz.FieldValues['polzovatel'];suiEdit4.text:=tuz.FieldValues['srok_deist'];suiEdit21.text:=tuz.FieldValues['data_ust'];end;procedure TForm1.suiDBGrid4CellClick(Column: TColumn);beginsuiEdit10.text:=tsob.FieldValues['kod_sob'];suiEdit12.text:=tsob.FieldValues['data'];suiEdit11.text:=tsob.FieldValues['vrem'];suiEdit13.text:=tsob.FieldValues['sob'];suiMemo2.text:=tsob.FieldValues['opis'];suiMemo3.text:=tsob.FieldValues['mery'];end;procedure TForm1.suiDBGrid5CellClick(Column: TColumn);beginsuiEdit23.text:=tmer.FieldValues['kod_mer'];suiEdit14.text:=tmer.FieldValues['data'];suiEdit15.text:=tmer.FieldValues['vrem'];suiEdit16.text:=tmer.FieldValues['mer'];suiEdit20.text:=tmer.FieldValues['isp'];end;procedure TForm1.suiButton17Click(Sender: TObject);begintryt_po.Append;t_po.FieldByName('nazv').AsString:=suiEdit22.text;t_po.FieldByName('treb').AsString:=suiEdit25.text;t_po.FieldByName('type_po').AsString:=suiComboBox1.text;t_po.FieldByName('opis').AsString:=suiMemo9.text;t_po.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0);end;end;procedure TForm1.suiButton16Click(Sender: TObject);begint_po.Delete;end;procedure TForm1.suiButton18Click(Sender: TObject);begintryt_po_st.Append;t_po_st.FieldByName('nazv').AsString:=t_po.FieldValues['nazv'];t_po_st.FieldByName('id_st').AsInteger:=tr_st.FieldValues['nomer_rs'];t_po_st.Post;Except MessageDlg('Ошибкавводаданных!',mtInformation,[mbYes],0); end;end;procedure TForm1.suiDBGrid7CellClick(Column: TColumn);begint_po_st.Filtered:=false;t_po_st.Filter:='id_st='+inttostr(tr_st.FieldValues['nomer_rs']);t_po_st.Filtered:=true;end;end.ЗаключениеЦелью работы является повышение эффективности работы администратора компьютерного салона путем разработки АРМ администратора.В ходе курсового проектирования была создана функциональная модель процесса с использованием средства BPWinProcessModeler.Также для каждой задачи процесса была создана DFD-диаграмма.Создана структурная схема программного комплекса.Осуществлено проектирование структуры информационного фонда с использованием ERWin.После выбора СУБД Accessбыла сформирована физическая структура БД.Была описана модель размещения АРМ на вычислительных узлах сети.Создан календарный план выполнения проекта с использованием инструментария MSProject.Разработан и представлен исходный код АРМ, созданный в среде DelphiStudio.Список литературыУправление программными проектами: достижение оптимального качества при минимуме затрат.: Пер. с англ. – М.: Издательский дом «Вильямс», 2007. Интернет – маркетинг: Учебник. Успенский И.В. - СПб.: Изд-во СПГУЭиФ, 2008.Экономическая информатика: Введение в экономический анализ информационных систем: Учебник. – М.: ИНФРА-М, 2008.Шафер Д.Ф., Фартрел Т., Шафер Л.И. Управление программными проектами: достижение оптимального качества при минимуме затрат.: Пер. с англ. – М.: Вильямс, 2009.Марка Д. А., МакГоуэн К. Методология структурного анализа и проектирования SADT. 2008Проектирование экономических информационных систем: учеб. / под ред. Ю. Ф. Тельнова. М., 2007Автоматизированные информационные технологии в экономике: Учебник/Под ред. проф. Г.А. Титоренко. – М.: Компьютер, ЮИНИТИ, 2008Маклаков С. В. Моделирование бизнес-процессов с AllFusion Process Modeler (BPwin 4.1). М., 2008Маклаков С.В. Создание информационных систем с AllFusion Modeling Suite. – М.: ДИАЛОГ-МИФИ, 2007Маклаков С.В. BPwin и Erwin. CASE-средства разработки информационных систем. — М.: ДИАЛОГ–МИФИ, 2008Фаулер М. UML в кратком изложении: применение стандартного языка объектного моделирования: пер. с англ. / М. Фаулер, К. Скотт. М., 2008