Автоматизация библиотечных процессов

Создание информационной системы обеспечивающей комплексную автоматизацию библиотечных процессов: комплектование литературы, создание и ведение электронного каталога, обработку поступающих изданий, обслуживание читателей, учет библиотечного фонда.

Рубрика Программирование, компьютеры и кибернетика
Вид курсовая работа
Язык русский
Дата добавления 14.06.2015
Размер файла 1,7 M

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2 // отобразить рез-т выполнения запроса

else begin

ShowMessage('Bunday Yo`nalish mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

if RadioButton4.Checked then begin

fam:=Edit1.Text;

if fam <> '' then begin

with form1.Query2 do begin

Close;

SQL.Clear;

// записываем новый запрос в свойство SQL

SQL.Add(' SELECT DISTINCT Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Data,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,K_oldi,K_topshirdi,Rasm,Nomer');

SQL.Add('FROM ":kollej:kutubxona.DB"');

SQL.Add('WHERE');

SQL.Add('(Kurs= "'+ fam + '")');

SQL.Add('ORDER BY Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,Rasm,Nomer');

Open;

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2

else begin

ShowMessage('Bunday Kurs mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

if RadioButton8.Checked then begin

fam:=Edit1.Text;

if fam <> '' then begin

with form1.Query2 do begin

Close;

SQL.Clear;

// записываем новый запрос в свойство SQL

SQL.Add(' SELECT DISTINCT Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Data,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,K_oldi,K_topshirdi,Rasm,Nomer');

SQL.Add('FROM ":kollej:kutubxona.DB"');

SQL.Add('WHERE');

SQL.Add('(Guruh= "'+ fam + '")');

SQL.Add('ORDER BY Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,Rasm,Nomer');

Open;

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2

else begin

ShowMessage('Bunday Guruh mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

if RadioButton1.Checked then begin

fam:=Edit1.Text;

if fam <> '' then begin

with form1.Query2 do begin

Close;

SQL.Clear;

// записываем новый запрос в свойство SQL

SQL.Add(' SELECT DISTINCT Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Data,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,K_oldi,K_topshirdi,Rasm,Nomer');

SQL.Add('FROM ":kollej:kutubxona.DB"');

SQL.Add('WHERE');

SQL.Add('(Ism= "'+ fam + '")');

SQL.Add('ORDER BY Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,Rasm,Nomer');

Open;

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2

else begin

ShowMessage('Bunday Ismli talaba mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

if RadioButton2.Checked then begin

fam:=Edit1.Text;

if fam <> '' then begin

with form1.Query2 do begin

Close;

SQL.Clear;

// записываем новый запрос в свойство SQL

SQL.Add(' SELECT DISTINCT Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Data,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,K_oldi,K_topshirdi,Rasm,Nomer');

SQL.Add('FROM ":kollej:kutubxona.DB"');

SQL.Add('WHERE');

SQL.Add('(Fam= "'+ fam + '")');

SQL.Add('ORDER BY Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,Rasm,Nomer');

Open;

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2

else begin

ShowMessage('Bunday Familyali talaba mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

if RadioButton5.Checked then begin

fam:=Edit1.Text;

if fam <> '' then begin

with form1.Query2 do begin

Close;

SQL.Clear;

// записываем новый запрос в свойство SQL

SQL.Add(' SELECT DISTINCT Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Data,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,K_oldi,K_topshirdi,Rasm,Nomer');

SQL.Add('FROM ":kollej:kutubxona.DB"');

SQL.Add('WHERE');

SQL.Add('(Adres= "'+ fam + '")');

SQL.Add('ORDER BY Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,Rasm,Nomer');

Open;

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2

else begin

ShowMessage('Bunday Adres mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

if RadioButton7.Checked then begin

fam:=Edit1.Text;

if fam <> '' then begin

with form1.Query2 do begin

Close;

SQL.Clear;

// записываем новый запрос в свойство SQL

SQL.Add(' SELECT DISTINCT Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Data,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,K_oldi,K_topshirdi,Rasm,Nomer');

SQL.Add('FROM ":kollej:kutubxona.DB"');

SQL.Add('WHERE');

SQL.Add('(K_nom= "'+ fam + '")');

SQL.Add('ORDER BY Yonalish,Kurs,Guruh,Ism,Fam,Otchestva,Adres,Telefon,Infor,K_nom,K_avtor,Maul_xodim,K_kod,Rasm,Nomer');

Open;

end;

if form1.Query2.RecordCount <> 0 then

form1.DataSource1.DataSet:=form1.Query2

else begin

ShowMessage('Bunday kitob mavjud emas.');

form1.DataSource1.DataSet:=form1.Table2;

end;

end;

end;

end;

end.

Приложение 2. Руководство программиста (ГОСТ 19.504-79)

1. Назначение и условия применения программы

Программы "Учет библиотечных книг" предназначена для внесения, изменения, сохранения, удаления и сортировки информации о наличии книг у студентов учебных заведений и данных о студентах: ФИО, телефон, домашний адрес, рабочий адрес, город, дата рождения, группа, дополнительной информации, название книги, автора книги, ответственного лица выдавшего книгу, о дате возвращения книги время получения книги студентом.

Программа совместима со всеми ОС Windows.

Для выполнения программы необходимо минимальное оборудование следующей комплектации: однопроцессорный компьютер с ACPI, процессор AMD Sempron(tm) Processor 2500+, клавиатура стандартная (101/102 клавиши), Microsoft PS/2 мышь, модуль подключения монитора, 2.20 ГГц, 0,98 ГБ ОЗУ.

2. Характеристика программы

Программа "Учет библиотечных книг" не имеет ограничений по времени, устойчива к сбоям, работает в режиме реального времени.

3. Обращение к программе

Программа не требует инсталляции. Для вызова и загрузки программы необходимо открыть папку F:/LibBooks" и двойным щелчком мыши активизировать исполняемый файл LibBooks.exe.

4. Входные и выходные данные

Ввод данных осуществляется через компонент Edit, данные о контактных лицах сохраняются по выбору пользователя, создается файл с расширением ***. db

Рисунок 6. Расположение файла с данными базы.

При вводе в поля "Фамилия", "Имя", "Отчество" и "Автор книги" каких-либо символов кроме "А-я", "A-z" и "-" будет выходить сообщение-предупреждение с текстом "В данной строке разрешен ввод только букв и разделительного знака "-"", которое закрывается нажатием кнопки "Ок" с последующим возвращением к работе в программе.

При вводе в поля "Телефон" каких-либо символов кроме "0-9" и "-" будет выходить сообщение предупреждение с текстом "В данной строке разрешен ввод только цифр и разделительного знака "-"", которое закрывается нажатием кнопки "Ок" с последующим возвращением к работе в программе.

Рисунок 7. Диалоговое окно сообщение-предупреждение.

Приложение 3. Руководство оператора (ГОСТ 19.505-79)

1. Назначение программы

Программы "Учет библиотечных книг" предназначена для внесения, изменения, сохранения, удаления и сортировки информации о состоянии книг находищихся у студентов учебных заведений:

2. Условия выполнения программы

Программа не требует инсталляции. Для выполнения программы необходимо минимальное оборудование следующей комплектации: однопроцессорный компьютер с ACPI, процессор AMD Sempron(tm) Processor 2500+, клавиатура стандартная (101/102 клавиши), Microsoft PS/2 мышь, модуль подключения монитора, 2.20 ГГц, 0,98 ГБ ОЗУ.

3. Выполнение программы

Двойным щелчком мыши активизировать исполняемый файл Libboks.exe, появится окно программы.

Рисунок 8. Окно запущенной программы "Учет библиотечных книг"

Созданные ранее файлы с расширением ***.db открываются автоматически.

В поля "Фамилия", "Имя", "Отчество", "Автор книги" разрешен ввод только символов "А-я", "A-z" и "-", иначе будет выходить сообщение-предупреждение с текстом: "В данной строке разрешен ввод только букв и разделительного знака "-"", которое закрывается нажатием кнопки "Ок" с последующим возвращением к работе в программе.

Рисунок 10. Диалоговое окно сообщение-предупреждение.

В поля "Телефон" разрешен ввод только символов "0-9" и "-", иначе будет выходить сообщение-предупреждение с текстом: "В данной строке разрешен ввод только цифр и разделительного знака "-"", которое закрывается нажатием кнопки "Ок" с последующим возвращением к работе в программе. В остальные поля разрешено вводить любые символы.

Рисунок 11. Диалоговое окно сообщение-предупреждение.

Для создания новой записи необходимо нажать клавишу "Insert record", ввести необходимые данные, после чего нажать клавишу "Post Edit"

Рисунок 12. Создание новой записи

Для удаления записи необходимо нажать клавишу "Delete record"

Рисунок 13. Удаление записи

Для поиска необходимой записи нужно нажать клавишу "Поиск", после чего указать интересующую область поиска и ввести искомые данные. Нажать "ОК".

Рисунок 14. Поиск данных

Размещено на Allbest.ru


Подобные документы

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.