Курсовая: Теория вычислительный процессов и структур - текст курсовой. Скачать бесплатно.
Банк рефератов, курсовых и дипломных работ. Много и бесплатно. # | Правила оформления работ | Добавить в избранное
 
 
   
Меню Меню Меню Меню Меню
   
Napishem.com Napishem.com Napishem.com

Курсовая

Теория вычислительный процессов и структур

Банк рефератов / Программирование

Рубрики  Рубрики реферат банка

закрыть
Категория: Курсовая работа
Язык курсовой: Русский
Дата добавления:   
 
Скачать
Microsoft Word, 118 kb, скачать бесплатно
Заказать
Узнать стоимость написания уникальной курсовой работы

Узнайте стоимость написания уникальной работы

Министерство народного образования и наук и Республики Беларусь Белорусская государственная политехническая академия Факультет роботов и робототе хнических систем Кафедра ”ПОВТ и АС” КУРСОВАЯ РАБОТА по дисциплине : ”Теория вычислительных процессов и структур” на тему : “ Работа с базами данных” Выполнил : ст . гр . 307217 Погосский К.В. Принял : ст . пр . Михалевич А.П. Минск 2000 Содержание Стр. 1. Краткое введение в базы данных 3 2. Краткое техническое описа ние программы 4 3. Инструкция пользователю 5 4. Заключение 5. Литература Приложение 1 “Текст программы” Приложение 2 “Ст руктура та блиц ” Краткое введение в базы данных Базой данных на зывается некоторый набор таблиц , связанных ме жду собой определенной связью для выполнения различного рода задач , спектр которых ох ватывает широкие стороны нашего быта . В настоящее время , время информационных техно логий использование систем управления базами данных становится наиболее проблематично из-за увеличения требований к ней . Специфика прим енения баз данных очень велика и слож н а по своей структуре . Исходя из этого можно судить о требуемой мощност и программного обеспечения. Следует отметить повышенный спрос на программное обес печение , позволяющее создавать полноправные систе мы управления базами данных . Из огромного количества так их пакетов мне хотелось бы выделить продукт компании Borland International Inc. “ Delphi” . Данная система программирования достаточна сил ьна по своей архитектуре . Помимо всего “ Delphi” предоставляет нам довольно широкий на бор компонентов , из которых , как и з кирпичей , можно создать полноценную сис тему управления базой данных (СУБД ). Еще одной не мола важной особенностью “ Delphi” является поддержка международного я зыка баз данных – SQL . Язык потерпел некоторый ряд видоизменений и в настоящее время предст авляе т собой мощное ядро , упрощающее о бщение с наборами данных . SQL является языком запрос ов , который содержит минимальный , и вместе с тем достаточный набор операторов и пред ставляет мощное средства навигации данными . Кратко е техническое описание программы П редставленный программный продукт на писан для современных 32-разрядных операционных систем , в число которых входит Windows 95, Windows 98, Windows NT . Программа предназначена для ведения учета библиотечных книг , позволяет вести учет о тсутствующих книг , пр осмотру и внесению новых поступлений , просмотру и поиску интер есующих книг. Программно реализован поиск необходимой к ниги по автору , названию книги , ее стилю и т.д . Интуитивный интерфейс и наличие в сплывающих подсказок облегчают ее использование , позволяют в кратчайшие сроки освоить данный продукт. Программа полностью реализована с использ ованием запросов на языке SQL . Создание и заполнение таблиц производилось при помощи стандартных пакетов , таких как Database Desktop, SQL Explorer, PowerDesigner 6. Програ мма предусматривает внос информации без перечисл енных пакетов а из специально оформленной формы (см . Приложение 1 модуль SecF . pas ). Таблицы прописаны при помощи BDE Administrator ’ а . Все необходимые таблицы объединены в алиас « MyDB » , что позволяет придать с истеме управления большую гибкость. Настоящая база данных имеет третью ст епень нормализации , что для данного проекта вполне допустимо. Инструкция пользователю Сразу , посл е загрузки программы пользователю предоставляетс я довольно обширная информация о тек у щей книге . (автор , наименование книги , ее жа нр , а для более удобного поиска на сти лаже количество страниц и тип обложки ). Кн ига является текущей , если на ней стоит курсор (выделенная часть строки ). Причем , каж дая строка это новая книга в списке . Программ а предусматривает вхождение произведений в одну книгу (например , состав произведений в сб орниках , наименование глав книги и т.д .). Для просмотра этой информации достаточно нажать на кнопку « Детально » и перед пользователем открывае тся дополнительная секция формы , не видн ая до этого . Повторное нажатие снова скрыв ает полное описание для лучшего восприятия информации для книги. Для удобства поиска требуемой книги н а главной форме предусмотрен широкий набор визуальных команд , которые автоматически преобр азуются в SQL -запросы . К таким командам относятся « Упорядочить по фамилии (жанру , названию ) » , « поиск по фамилии , по вхождению , по жанру » , а также некоторы й набор нестандартных команд , которые появляю тся по выпадающему списку . Если книга в данный момент отсутствуе т , на форме высвечивается информация . Если книга отсутствует , появляется возможность просмотра информации о ее местонахождении и времени отсутствия. Программа позволяет вести учет отданных книг . Для этого достаточно нажать на кнопку « Одолжить » и внести нео бходимые данные. Для внесения новой книги служит кнопк а «Добавить» . Простая в использовании форма представлена в виде анкеты . Причем для внесения книги в список должны быть запол нены все графы (возможно не заполнение гра фы «Полное описание» когда книга одн о именна ). Заложен минимальный набор данных с клавиатуры . Это позволяет уменьшить шанс вн есения ошибочных данных , и упрощает работу для конечного пользователя. Для внесения изменений в базу данных (временное отсутствие книги , «новая книга» ) необходимо иметь определенные права . Для этого программа предусматривает проверку пра в , определенных паролем . При некорректном ввод е пароля программа не даст внести изменен ия . Заключение Программа тестирована на персональном ком пьютере Pentium II 333, 64 Mb ОЗУ в опера ционной системе Windows 98 и показала неплохие результаты при выполнении сложных запросов . Задержка на считывание , обработку , сортировку данных не значительна. Программа вполне может использоваться в библиотеках города , на технических и прои зводственных пр едприятиях. Литература 1. Фаронов В.В . « Delphi 4.0 Учебный курс» . Изд . «Нолидж» 1998 г. 2. Фаронов В.В . Вводный курс в базы данных . Изд . «Нолидж» , 1998 г. 3. Введение в SQL . 4. Волков А . СУБД . Стандарты языка SQL . 2 номер 1997. MainBD.DB Number Short * Famili Alpha[15] Inic Alpha[2] Janr Alpha[10] Nalich Logical NameBok Alpha[50] Nalichie.DB Number Short * Fam Alpha[15] Ch Date SecondDB.DB Numero Short * Stron Short Obl Logical Spravka.DB Number Short * Opisanie Alpha[50] Vedenie. DB Numero Short DataUser Date NameUser Alpha [15] * - первичный ключ таблицы Приложение 1 unit MainF; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, Mask, DBCtrls, Grids, DBGrids, Db, DBTables, ExtCtrls; type TForm1 = class(TForm) DataSource1: TDataSource; DBGrid1: TDBGrid; DBEdit1: TDBEdit; DataSource2: TDataSource; Table2: TTable; Label1: TLabel; Label2: TLa bel; Edit1: TEdit; GroupBox1: TGroupBox; Label3: TLabel; Button1: TButton; Button3: TButton; RadioGroup1: TRadioGroup; Query1: TQuery; Query1Number: TSmallintField; Query1Famili: TStringField; Query1Inic: TStringField; Query1Janr: TStringField; Query1Nalich: TBooleanField; Query1NameBook: TStringField; DataSource3: TDataSource; Query2: TQuery; Button5: TButton; DBGrid2: TDBGrid; Table2Obl: TBooleanField; T able2Numero: TSmallintField; Table2Stron: TSmallintField; Query2Opisanie: TStringField; Button4: TButton; Button2: TButton; Button6: TButton; GroupBox2: TGroupBox; Label4: TLabel; Button7: TButton; Label5: TLabel; Ed it2: TEdit; Button8: TButton; ComboBox1: TComboBox; Button9: TButton; DBLookupComboBox1: TEdit; Label6: TLabel; Button10: TButton; ComboBox2: TComboBox; procedure RadioGroup1Click(Sender: TObject); procedure Query1AfterScroll(DataSet: TDataSet); procedure Button5Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button3Click(Sender: TObject); procedure Button2Click (Sender: TObject); procedure Button4Click(Sender: TObject); procedure Button6Click(Sender: TObject); procedure Button7Click(Sender: TObject); procedure Button8Click(Sender: TObject); procedure ComboBox1Change(Sender: TObject); proce dure Button9Click(Sender: TObject); procedure Button10Click(Sender: TObject); procedure ComboBox2Change(Sender: TObject); private Private declarations public Public declarations end; var Form1: TForm1; St : String; Ch : Boolean; YYY : Boolean; Snum : String; Recponse:String; Const pass='Andrey'; implementation uses SecF, NetuF, Unit5, Unit3, Avtor; $R *.DFM procedure TForm1.RadioGroup1Click(Sender: TObject); begin Case RadioGroup1.ItemIndex of 0: St:='Select * from MainDB' + #13 + #10 + 'Order by Famili'; 1: St:='Select * from MainDB' + #13 + #10 + 'Order by Janr'; 2: St:='Select * from MainDB' + #13 + #10 + 'Order by NameBook'; end; Button4Click(RadioGroup1); end; procedure TFo rm1.Query1AfterScroll(DataSet: TDataSet); begin Label3.Caption:=' В наличии '; Button3.Visible:=False; Edit1.Text:=' Твердая '; Query2.Close; Query2.Sql.Clear; Query2.Sql.Add('Select * from Spravka' + #13 + #10 + 'Where Number=' + IntToStr(Query1Number.Value)); Query2.Open; If not Query1Nalich.Value Then begin Label3.Caption:=' Отсуствует '; Button3.Visible:=True; end; If not Table2Obl.Value Then begin Edit1.Text:=' Мягкая '; end; end; procedure TForm1.Button5Click(Sender: TObject); begin Ch:= Not Ch; If Ch then begin Button5.Caption:='<< Кратко '; Form1.Height:=436; end; If Not Ch Then begin Button5.Caption:=' Детально >>'; Form1.Height:=324; end; end; procedure TForm1.FormCreate(Sender: TObject); begin Ch:=False; Form1.Height:=324; end; procedure TForm1.Button1Click(Sender: TObject); begin Query1.Active:=False; Table2.Active:=False; Query2.Active:=False; Recponse := InputBox(' Проверка доступа ',' Введите пароль ',''); If Recponse=Pass Then Form2.ShowModal Else ShowMessage('Пароль введен н е верно !'); Query1.Active:=True; Table2.Active:=True; Query2.Active:=True; end; procedure TForm1.Button3Click(Sender: TObject); begin Form4.ShowModal; en d; procedure TForm1.Button2Click(Sender: TObject); begin Recponse := InputBox('Проверка доступа ','Введите пароль ',''); If Recponse=Pass Then Begin YYY:=Query1Nalich.Value; Form3.Label2.Caption:=Query1Famili.Value +' - ' + Query1NameBook.Value; St:=''; Snum:=IntToStr(Query1Number.Value); If not yyy then ShowMessage(' Книга отдолжена ') Else Begin Query1.Active:=False; Form3.ShowModal; Query1.Active:=True; End; End Else ShowMessage(' Пароль введен не верно !'); End; procedure TForm1.Button4Click(Sender: TObject); begin Query1.Close; Query1.Sql.Clear; Query1.Sql.Add(St); Query1.Open; end; procedure TForm1.Button6Click(Sender: TObject); begin Recponse := InputBox('Проверка доступа ','Введите пароль ',''); If Recponse=Pass Then begin YYY:=Query1Nalich.Value; Snum:=IntToStr(Query1Number.Value); If yyy then ShowMessage(' Книга в наличии !') Else Begin St:='Delete from Nalichie Where number = ' + Snum; try Button4Click(Button6) Except end; St:='Select * From MainDB'; try Button4Click(Button6) Except end; St:='UpDate MainDB Set Nalich = True' + #13 + #10 + 'Where Number = ' + Snum;; try Button4Click(Button6) Except end; St:='Select * From MainDB'; try Button4Click(Button6) Except End; Query1.Active:=False; Query1.Active:=True; End; End Else ShowMessage(' Пароль введен не верно !'); end; procedure TForm1.Button7Click(Sender: TObject); begin St:='Select * from MainDB Where Famili = "' + DBLookupComboBox1.Text +'"'; Button4Click(Button7); end; procedure TForm1.Button8Click(Sender: TObject); begin St:='SELECT * FROM MainDB WHERE NameBook LIKE "%'+ Edit2.Text +'%"'; Button4Click(Button7); end; procedure TFo rm1.ComboBox1Change(Sender: TObject); begin Button9.Enabled:=True; end; procedure TForm1.Button9Click(Sender: TObject); begin St:='SELECT * FROM MainDB WHERE Janr = "' + ComboBox1.Text +'"'; Button4Click(Button7); end; procedure TForm1.Button10Click(Send er: TObject); begin St:='Select * from MainDB'; Button4Click(Button10); end; procedure TForm1.ComboBox2Change(Sender: TObject); begin Case ComboBox2.ItemIndex of 0: St:='Select * from MainDB Where Nalich = False'; end; Button4Click(ComboBox2); end; end. Приложение 2 Добавить Просмотреть информацию Пароль Подтверждение
1Архитектура и строительство
2Астрономия, авиация, космонавтика
 
3Безопасность жизнедеятельности
4Биология
 
5Военная кафедра, гражданская оборона
 
6География, экономическая география
7Геология и геодезия
8Государственное регулирование и налоги
 
9Естествознание
 
10Журналистика
 
11Законодательство и право
12Адвокатура
13Административное право
14Арбитражное процессуальное право
15Банковское право
16Государство и право
17Гражданское право и процесс
18Жилищное право
19Законодательство зарубежных стран
20Земельное право
21Конституционное право
22Конституционное право зарубежных стран
23Международное право
24Муниципальное право
25Налоговое право
26Римское право
27Семейное право
28Таможенное право
29Трудовое право
30Уголовное право и процесс
31Финансовое право
32Хозяйственное право
33Экологическое право
34Юриспруденция
 
35Иностранные языки
36Информатика, информационные технологии
37Базы данных
38Компьютерные сети
39Программирование
40Искусство и культура
41Краеведение
42Культурология
43Музыка
44История
45Биографии
46Историческая личность
47Литература
 
48Маркетинг и реклама
49Математика
50Медицина и здоровье
51Менеджмент
52Антикризисное управление
53Делопроизводство и документооборот
54Логистика
 
55Педагогика
56Политология
57Правоохранительные органы
58Криминалистика и криминология
59Прочее
60Психология
61Юридическая психология
 
62Радиоэлектроника
63Религия
 
64Сельское хозяйство и землепользование
65Социология
66Страхование
 
67Технологии
68Материаловедение
69Машиностроение
70Металлургия
71Транспорт
72Туризм
 
73Физика
74Физкультура и спорт
75Философия
 
76Химия
 
77Экология, охрана природы
78Экономика и финансы
79Анализ хозяйственной деятельности
80Банковское дело и кредитование
81Биржевое дело
82Бухгалтерский учет и аудит
83История экономических учений
84Международные отношения
85Предпринимательство, бизнес, микроэкономика
86Финансы
87Ценные бумаги и фондовый рынок
88Экономика предприятия
89Экономико-математическое моделирование
90Экономическая теория

 Анекдоты - это почти как рефераты, только короткие и смешные Следующий
Бедные дети, как же они смогут драться на переменах электронными книгами...
Anekdot.ru

Узнайте стоимость курсовой, диплома, реферата на заказ.

Обратите внимание, курсовая по программированию "Теория вычислительный процессов и структур", также как и все другие рефераты, курсовые, дипломные и другие работы вы можете скачать бесплатно.

Смотрите также:


Банк рефератов - РефератБанк.ру
© РефератБанк, 2002 - 2016
Рейтинг@Mail.ru