Книжный магазин

Автор: Пользователь скрыл имя, 13 Марта 2012 в 21:39, курсовая работа

Описание работы

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

Скачать полностью (792.51 Кб) Сколько стоит заказать работу?

Работа содержит 1 файл

Книжный магаазин.docx

— 807.62 Кб (Скачать)

Рис.6.8. – главное меню.

При нажатии кнопки «Склад» откроется окно, на котором можно будет проводить различные манипуляции с данными.

Программа оснащена справочной системой, где подробно описываются методы работы с ней. Справка по приложению вызывается при выборе пункта в главном меню «О программе», «О разработчике» при вызове которого пользователь может получить информацию о программе и о разработчике.

Выход из программы осуществляется при выборе пункта «Файл->Выход».

ЗАКЛЮЧЕНИЕ

Информационная система «Автоматизированное рабочее место продовца книжного магазина» реализована с использование C++Builder 6. В программе предусмотрено создание и сохранение новых записей, редактирование старых, просмотр сведений, поиск информации по заданным критериям, вызов отчёта.

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

Программа имеет удобный пользовательский интерфейс, она написана под операционную систему Windows. Пользование программой требует лишь элементарных знаний приемов работы с данной оболочкой.

В результате выполнения курсовой работы усовершенствованы знания в области программирования баз данных и объектно-ориентированного программирования, приобретены навыки использования научно-технической информации.

Реализация программы на языке программирования Borland C++Builder 6 делает её гибкой и удобной для дальнейшей переработки и трансформации при применении разработки в смежных областях.

При написании и разработке курсовой работы я научилась работать с C++Builder 6 и PARADOX, которые использовались для работы над курсовым проектом, научился использовать справку и другие функции C++Builder 6.

СПИСОК ИСПОЛЬЗОВАННЫХ ИСТОЧНИКОВ

Бабук, И. М. Экономика предприятия: учеб. пособие для студентов технических специальностей / И.М. Бабук - Мн.: «ИВЦ Минфина», 2006. – 327 с.
Герберт Шилдт С++ руководство для начинающих, 2-е издание. :Пер.с англ. - М.: Издательский дом «Вильяме», 2005
Головачев, А.С. Экономика предприятия. В 2 ч. Ч 1: учебное пособие / А.С. Головачев. – Мн.: Выш. шк., 2008. – 447 с.
Головачев, А.С. Экономика предприятия. В 2 ч. Ч 2: учебное пособие / А.С. Головачев. – Мн.: Выш. шк., 2008. – 464 с.
Мэйерс С. Эффективное использование С++. 55 верных способов улучшить структуру и код ваших программ- - М.: ДМК Пресс, 2006.
Стефан Р. Дэвис С++ для "чайников", 4-е издание ДИАЛЕКТИКА Москва 2003г.
Финансы предприятий: учеб. Пособие /Н.Е.Заяц [и др.]; под общей редакцией Н.Е.Заяц, Т.И. Василевской.- 3-е изд., испр. – Минск: Выш.шк. – 2006. – 528 с.

ПРИЛОЖЕНИЕ А

Листинг программы

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

#include "Unit2.h"

#include "Unit3.h"

#include "Unit4.h"

#include "Unit5.h"

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

void __fastcall TForm1::DBLookupListBox1Click(TObject *Sender)

{

Query2->Active = false;

Query2->SQL->Clear();

Query2->SQL->Add("select * from Издательства where Издательства.Издательство = '" + DBText2->Caption + "'");

Query2->Active = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button4Click(TObject *Sender)

{

Form3->Show();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::DBGrid2CellClick(TColumn *Column)

{

Query3->Active = false;

Query3->SQL->Clear();

Query3->SQL->Add("select Книги.'Название книги', Книги.'Автор', Заказы.'Количество книг', Заказы.'Дата получения заказа', Заказы.'Дата отправки заказа'from Заказы, Книги, Покупатели where Книги.'Код книги' = Заказы.'Код книги' and Заказы.'Код покупателя' = Покупатели.'Код покупателя' and Покупатели.'Код покупателя' = '" + DBText8->Caption + "'");

Query3->Active = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button6Click(TObject *Sender)

{

Form4->Show();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button7Click(TObject *Sender)

{

Query3->Active = false;

Table2->Active = false;

Table2->Active = true;

Query3->Active = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioGroup1Click(TObject *Sender)

{

if(RadioGroup1->ItemIndex == 0){

PageControl1->Style = tsFlatButtons;

}else if(RadioGroup1->ItemIndex == 1){

PageControl1->Style = tsButtons;

}else if(RadioGroup1->ItemIndex == 2){

PageControl1->Style = tsTabs;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::RadioGroup2Click(TObject *Sender)

{

if(RadioGroup2->ItemIndex == 0){

PageControl1->Font->Color = clBlack;

}else if(RadioGroup2->ItemIndex == 1){

PageControl1->Font->Color = clRed;

}else if(RadioGroup2->ItemIndex == 2){

PageControl1->Font->Color = clGreen;

}else if(RadioGroup2->ItemIndex == 3){

PageControl1->Font->Color = clBlue;

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button9Click(TObject *Sender)

{

Query4->Active = false;

Query4->SQL->Clear();

Query4->SQL->Add("select 'Книги'.'Название книги', 'Книги'.'Автор', 'Книги'.'Серия', 'Книги'.'Цена' from 'Книги'");

Query4->Active = true;

Edit1->Text = "";

Edit2->Text = "";

Edit3->Text = "";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button8Click(TObject *Sender)

{

Query4->Active = false;

Query4->SQL->Clear();

String temp = "";

if(Edit1->Text != ""){

Query4->SQL->Add("select 'Книги'.'Название книги', 'Книги'.'Автор', 'Книги'.'Серия', 'Книги'.'Цена' from 'Книги' where 'Книги'.'Название книги' = '"+ Edit1->Text + "'");

}else if(Edit2->Text != ""){

Query4->SQL->Add("select 'Книги'.'Название книги', 'Книги'.'Автор', 'Книги'.'Серия', 'Книги'.'Цена' from 'Книги' where 'Книги'.'Автор' = '" + Edit2->Text + "'");

}else if(Edit3->Text != ""){

Query4->SQL->Add("select 'Книги'.'Название книги', 'Книги'.'Автор', 'Книги'.'Серия', 'Книги'.'Цена' from 'Книги' where 'Книги'.'Серия' = '" + Edit3->Text + "'");

}

Query4->Active = true;

Edit1->Text = "";

Edit2->Text = "";

Edit3->Text = "";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Edit2KeyDown(TObject *Sender, WORD &Key,

TShiftState Shift)

{

if(Key == 13){

Query4->Active = false;

Query4->SQL->Clear();

String temp = "";

if(Edit1->Text != ""){

}else if(Edit2->Text != ""){

}else if(Edit3->Text != ""){

}

Query4->Active = true;

Edit1->Text = "";

Edit2->Text = "";

Edit3->Text = "";

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,

TShiftState Shift)

{

if(Key == 13){

Query4->Active = false;

Query4->SQL->Clear();

String temp = "";

if(Edit1->Text != ""){

}else if(Edit2->Text != ""){

}else if(Edit3->Text != ""){

}

ПРИЛОЖЕНИЕ Б

Экранные формы

Рис. Б.1.

Рис.Б.2.

Рис.Б.3.

Рис.Б.4.

Информация о работе Книжный магазин