Програмування С++ в середовищі програмування C++ Builder

Автор работы: Пользователь скрыл имя, 16 Декабря 2013 в 00:43, курсовая работа

Краткое описание

Одним з найважливіших етапів на цьому шляху став винахід о орієнтованого підходу (ООП). Програми представляли собою послідовності інструкцій, тобто вони були орієнтовані на операції над деякими значеннями. При цьому було досить важко відстежити взаємозв'язок між ними, і зрозуміти логіку програми було набагато складніше. Виявилося, що такий підхід дозволяє програмістам працювати зовсім на іншому рівні абстракції і у своїх програмах оперувати поняттями відповідної предметної області: описавши клас об'єктів один раз, можна забути про те, як він улаштований. Використання об'єктно орієнтованого підходу також помітно спрощує написання і читання програм.

Содержание

Вступ

Загальна частина
Аналіз предметної області
Постановка задачі
Засоби програмної реалізації
Спеціальна частина
Опис програмної реалізації
Основні алгоритми програми
Методика роботи користувача з програмним продуктом
Висновок
Список використаних джерел

Скачать полностью (573.77 Кб) Сколько стоит заказать работу?
Прикрепленные файлы: 1 файл

КУРСОВАЯ_no.docx

— 590.59 Кб (Скачать документ)

 

 

 

 

 

ДОДАТОК А 

КОД ПРОГРАМИ

Unit1.cpp

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

 

#include <vcl.h>

#pragma hdrstop

#include "File1.h"

#include "Unit1.h"

#include "Unit3.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

TStringList *List=new TStringList;

tRobitnuk t;

int Meneger :: min_age=20;

int Meneger::max_age=80;

int Book :: min_age=20;

int Book::max_age=80;

int IT :: min_age=20;

int IT::max_age=80;

TForm * Formik;

TButton* button;

TButton* but;

TComboBox *ComboBox;

TListBox *ListBox;

AnsiString file;

//

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

__fastcall TForm1::TForm1(TComponent* Owner)

        : TForm(Owner)

{

 

//        TListBox *ListBox;

 

}

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

 

void __fastcall TForm1::Button1Click(TObject *Sender)

{

 

        if(ComboBox1->ItemIndex==0){

Memo1 ->Lines->Clear();

Memo1->Lines->LoadFromFile("D:\\easy\\main.txt");  } ;

        if(ComboBox1->ItemIndex ==1)

{Memo1 ->Lines->Clear();

Memo1->Lines->LoadFromFile("D:\\easy\\bookeeper.txt"); };

        if(ComboBox1->ItemIndex ==2)

{Memo1 ->Lines->Clear();

Memo1->Lines->LoadFromFile("D:\\easy\\IT.txt"); };

if(ComboBox1->ItemIndex ==3)

{Memo1 ->Lines->Clear();

Memo1->Lines->LoadFromFile("D:\\easy\\meneger.txt"); };

 

}

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

void __fastcall TForm1::Button2Click(TObject *Sender)

{

 

 

Form3->ShowModal() ;

}

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

 

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

 

void __fastcall TForm1::Button4Click(TObject *Sender)

{

Formik= new TForm(Application);

TButton* button=new TButton(Formik);

button->Name="btn";

TComboBox *ComboBox=new TComboBox(Formik);

ComboBox->Name="cb";

TListBox *ListBox=new TListBox(Formik);

ListBox->Name="lb";

TButton* but=new TButton(Formik);

ListBox ->Parent=Formik;

ListBox->Top =50;

ComboBox ->Parent =Formik;

ComboBox->Items=ComboBox1 ->Items;

 

//ListBox->Items->LoadFromFile("D:\\easy\\bookeeper.txt");

 

but->Parent=Formik;

button->Parent=Formik;

button->Caption="Delete";

button->Left=160;

button->Top=15;

button->Show();

button->OnClick =Form1->Button5Click;

but->Caption ="Заполнить";

but->Left =160;

but->Top=40;

but->OnClick=Form1 ->Button3Click;

but->Show();

Formik->Caption="OneD";

Formik->ShowModal();

//delete Formik;

/*{((TListBox*)Formik->FindComponent("ListBox"));

 

if(ComboBox2->ItemIndex==0){

 

} ;

        if(ComboBox2->ItemIndex ==1)

{ListBox ->Items ->LoadFromFile("D:\\easy\\bookeper.txt"); };

        if(ComboBox2->ItemIndex ==2)

{ListBox ->Items -> LoadFromFile("D:\\easy\\IT.txt"); };

if(ComboBox2->ItemIndex ==3)

{ListBox ->Items -> LoadFromFile("D:\\easy\\meneger.txt"); };

}     */

 

}

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

void __fastcall TForm1::Button3Click(TObject *Sender)

{

TComponent *s=Formik->Components[0];//

TListBox *ll=((TListBox*)Formik->FindComponent("lb"));

TListBox *cb=((TListBox*)Formik->FindComponent("cb"));

if(cb){

        if(cb->ItemIndex==1)

        {

                if(ll)

           {ll->Items->LoadFromFile("D:\\easy\\bookeeper.txt");

            };

        }

        if(cb->ItemIndex==2)

        {

                if(ll)

           {ll->Items->LoadFromFile("D:\\easy\\IT.txt");

            }

        }

        if(cb->ItemIndex==3)

        {

                if(ll)

           {ll->Items->LoadFromFile("D:\\easy\\meneger.txt");

            }

        }

}

}

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

/*

} */

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

 

 

 

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

 

void __fastcall TForm1::Button5Click(TObject *Sender)

{

  TListBox *ll=((TListBox*)Formik->FindComponent("lb"));

  int h;

  if(ll){

  h=ll->ItemIndex;

  ll->Items->Delete(h);

  ll->Items->SaveToFile("D:\\easy\\main.txt"); }

}//---------------------------------------------------------------------------

Unit3.cpp

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

 

#include <vcl.h>

#pragma hdrstop

#include "File1.h"

#include "Unit1.h"

#include "Unit3.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm3 *Form3;

Meneger m;

IT it;

Book u;

int Meneger :: min_age=20;

int Meneger::max_age=80;

int Book :: min_age=20;

int Book::max_age=80;

int IT :: min_age=20;

int IT::max_age=80;

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

__fastcall TForm3::TForm3(TComponent* Owner)

        : TForm(Owner)

{

m.i=0;

}

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

 

void __fastcall TForm3::Button1Click(TObject *Sender)

{       int i;

 

        do{

        if (ComboBox1 ->ItemIndex ==0)

                {

                for(i=ListBox1 ->ItemIndex;i<10;i++)

               { m.Add() ;break;}

                }

 

        if(ComboBox1->ItemIndex ==1)

        {

         for(i=ListBox1 ->ItemIndex;i<10;i++)

         { u.Add() ;break;}

        };

        if(ComboBox1->ItemIndex ==2)

        {

         for(i=ListBox1 ->ItemIndex;i<10;i++)

         { it.Add() ;break;}

        };

         }while(Form3->ModalResult==mrOk);

     }

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

 

void __fastcall TForm3::Button2Click(TObject *Sender)

{

  if (ComboBox1 ->ItemIndex ==0)

 

 

  { Form3->ListBox1 ->Items->LoadFromFile("D:\\easy\\meneger.txt");} ;

 

 

        if(ComboBox1->ItemIndex ==1)

                {

 

           Form3->ListBox1 ->Items->LoadFromFile("D:\\easy\\bookeeper.txt");

                } ;

        if(ComboBox1->ItemIndex ==2)

        {

 

         { Form3->ListBox1 ->Items->LoadFromFile("D:\\easy\\IT.txt");}

        };

 

 

}

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

File1.h

#include "Unit1.h"

#include "Unit3.h"

#include <string.h>

  struct men{

        int stazh,age,plata;

        AnsiString name;

        } ;

        men a[10];

 

        struct it{

        int stazh,age,plata;

        AnsiString name;

        } ;

        men b[10];

 

         struct book{

        int stazh,age,plata;

        AnsiString name;

        } ;

        men c[10];

 

 

 

class tRobitnuk{

public:

        TForm *Form;

        int number,age;

        float ex;

        AnsiString plus;

        static int  max_age;

        static int  min_age;

};

 

class Kerivnuk: public tRobitnuk

{   public:

        tRobitnuk r;

        struct ker{

        int stazh,age,plata;

        char name[30];

        };

         void Rewrite();

         void Show();

 

};

 

class Meneger: public tRobitnuk{

 

public:

   men m;

tRobitnuk r;int i;

 

 

   void Rewrite(){};

   void Show(){};

   void Add();

   static int  max_age;

        static int  min_age;

};

      void Meneger::Add()

      {   TStringList *List=new TStringList;

       

        a[i].name=Form3->Edit1->Text;

 

     {a[i].age=StrToInt( Form3->Edit2->Text ); }

 

 

     a[i].stazh=StrToInt( Form3->Edit3->Text );

     a[i].plata=StrToInt( Form3->Edit4->Text );

        AnsiString s1;

         if(StrToInt( Form3->Edit2->Text )<=max_age && StrToInt( Form3->Edit2->Text )>=min_age ){

         s1= ("MENEGERS  " +a[i].name+" " +a[i].age+" " +a[i].stazh+" " +a[i].plata);

         Form3->ListBox1 ->ItemIndex =i;

         Form3->ListBox1->Items->Add(s1);  }

         else ShowMessage("Error.Input correct age");

         Form3->ListBox1->Items->SaveToFile("D:\\easy\\meneger.txt");

 

 

 

} ;

 

 

 

//--------

class IT: public tRobitnuk{

 

public:

tRobitnuk r;

int i,w;

   AnsiString dodatk,fname;

   void Rewrite(){};

   void Show(){};

   void Add();

    static int  max_age;

        static int  min_age;

};

 

void IT::Add()

      {

 

       TStringList *List=new TStringList;

 

        b[i].name=Form3->Edit1->Text;

        if(StrToInt( Form3->Edit2->Text )<=max_age || StrToInt( Form3->Edit2->Text )>=min_age )

     {b[i].age=StrToInt( Form3->Edit2->Text ); }

     else

      //Form3->Edit2->SetFocus() ;

     b[i].stazh=StrToInt( Form3->Edit3->Text );

     b[i].plata=StrToInt( Form3->Edit4->Text );

        AnsiString s1;

       if(StrToInt( Form3->Edit2->Text )<=max_age && StrToInt( Form3->Edit2->Text )>=min_age ){

         s1= ("IT  " +b[i].name+" " +b[i].age+" " +b[i].stazh+" " +b[i].plata);

         Form3->ListBox1 ->ItemIndex =i;

         Form3->ListBox1->Items->Add(s1);

         }

         else ShowMessage("Error.Input correct age");

         Form3->ListBox1->Items->SaveToFile("D:\\easy\\IT.txt");

 

 

 

} ;

 

 

//--------

 

class Book: public tRobitnuk{

 

public:

tRobitnuk r;

int i;

   float ex;

   AnsiString dodatk,fname;

   void Rewrite(){};

   void Show(){};

   void Add();

    static int  max_age;

    static int  min_age;

};

 

 

 

void Book::Add()

      {   TStringList *List=new TStringList;

 

        c[i].name=Form3->Edit1->Text;

        if(StrToInt( Form3->Edit2->Text )<=max_age || StrToInt( Form3->Edit2->Text )>=min_age )

     {c[i].age=StrToInt( Form3->Edit2->Text ); }

     else

      Form3->Edit2->SetFocus() ;

     c[i].stazh=StrToInt( Form3->Edit3->Text );

     c[i].plata=StrToInt( Form3->Edit4->Text );

        AnsiString s1;

          if(StrToInt( Form3->Edit2->Text )<=max_age && StrToInt( Form3->Edit2->Text )>=min_age ){

         s1= ("BOOKEPER  " +c[i].name+" " +c[i].age+" " +c[i].stazh+" " +c[i].plata);

         Form3->ListBox1 ->ItemIndex =i;

         Form3->ListBox1->Items->Add(s1);

         }else ShowMessage("Error.Input correct age");

         Form3->ListBox1->Items->SaveToFile("D:\\easy\\bookeeper.txt");

 

 

 

} ;

 

 

 


Информация о работе Програмування С++ в середовищі програмування C++ Builder