МЕНЮ


Фестивали и конкурсы
Семинары
Издания
О МОДНТ
Приглашения
Поздравляем

НАУЧНЫЕ РАБОТЫ


  • Инновационный менеджмент
  • Инвестиции
  • ИГП
  • Земельное право
  • Журналистика
  • Жилищное право
  • Радиоэлектроника
  • Психология
  • Программирование и комп-ры
  • Предпринимательство
  • Право
  • Политология
  • Полиграфия
  • Педагогика
  • Оккультизм и уфология
  • Начертательная геометрия
  • Бухучет управленчучет
  • Биология
  • Бизнес-план
  • Безопасность жизнедеятельности
  • Банковское дело
  • АХД экпред финансы предприятий
  • Аудит
  • Ветеринария
  • Валютные отношения
  • Бухгалтерский учет и аудит
  • Ботаника и сельское хозяйство
  • Биржевое дело
  • Банковское дело
  • Астрономия
  • Архитектура
  • Арбитражный процесс
  • Безопасность жизнедеятельности
  • Административное право
  • Авиация и космонавтика
  • Кулинария
  • Наука и техника
  • Криминология
  • Криминалистика
  • Косметология
  • Коммуникации и связь
  • Кибернетика
  • Исторические личности
  • Информатика
  • Инвестиции
  • по Зоология
  • Журналистика
  • Карта сайта
  • Система рейтингового контроля знаний

    --

    #endif

    RichАbt.h:

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

    --

    #ifndef RichAbtH

    #define RichAbtH

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

    --

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

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

    --

    class TForm2 : public TForm

    {

    __published:

    TImage *ProgramIcon;

    TButton *OKButton;

    public:

    virtual __fastcall TForm2(TComponent *Owner);

    };

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

    --

    extern TForm2 *Form2;

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

    --

    #endif

    Sort.h:

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

    -

    #ifndef SortH

    #define SortH

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

    -

    #include

    #include

    #include

    #include

    #include

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

    -

    class TForm4 : public TForm

    {

    __published: // IDE-managed Components

    TBevel *Bevel1;

    TComboBox *ComboBox1;

    TLabel *Label1;

    TButton *Button1;

    TButton *Button2;

    void __fastcall ComboBox1Change(TObject *Sender);

    private: // User declarations

    public: // User declarations

    __fastcall TForm4(TComponent* Owner);

    };

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

    -

    extern TForm4 *Form4;

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

    -

    #endif

    Unit1.h:

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

    -

    #ifndef Unit1H

    #define Unit1H

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

    -

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include

    #include "Grids.hpp"

    #include

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

    -

    class TForm3 : public TForm

    {

    __published: // IDE-managed Components

    TLabel *Label1;

    TLabel *Label2;

    TLabel *Label3;

    TLabel *Label4;

    TDBEdit *DBEdit3;

    TDBEdit *DBEdit6;

    TLabel *Label6;

    TLabel *Label7;

    TDBEdit *DBEdit8;

    TButton *Button1;

    TButton *Button2;

    TButton *Button5;

    TLabel *Label5;

    TDBEdit *DBEdit4;

    TDBEdit *DBEdit1;

    TDBEdit *DBEdit2;

    TLabel *Label8;

    TDBEdit *DBEdit5;

    TBitBtn *BitBtn1;

    TBitBtn *BitBtn2;

    TButton *Button3;

    TStatusBar *StatusBar1;

    void __fastcall FormCreate(TObject *Sender);

    void __fastcall Button1Click(TObject *Sender);

    void __fastcall Button2Click(TObject *Sender);

    void __fastcall Button6Click(TObject *Sender);

    void __fastcall Button4Click(TObject *Sender);

    void __fastcall Button5Click(TObject *Sender);

    void __fastcall Table1AfterOpen(TDataSet *DataSet);

    void __fastcall Button3Click(TObject *Sender);

    private: // User declarations

    public: // User declarations

    __fastcall TForm3(TComponent* Owner);

    };

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

    -

    extern TForm3 *Form3;

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

    -

    #endif

    2. Файлы с методами:

    Project1.cpp:

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

    -

    #include

    #pragma hdrstop

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

    -

    USEFORM("kur1.cpp", Form1);

    USEFORM("Richabt.cpp", Form2);

    USERES("Project1.res");

    USEFORM("Report.cpp", QRListForm);

    USEDATAMODULE("Datam.cpp", DM1);

    USEFORM("Unit1.cpp", Form3);

    USEFORM("Findcust.cpp", fmFindCust);

    USEFORM("Sort.cpp", Form4);

    USEFORM("filter.cpp", Form5);

    USEFORM("filename.cpp", Form6);

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

    -

    WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

    {

    try

    {

    Application->Initialize();

    Application->CreateForm(__classid(TForm1), &Form1);

    Application->CreateForm(__classid(TQRListForm), &QRListForm);

    Application->CreateForm(__classid(TDM1), &DM1);

    Application->CreateForm(__classid(TForm3), &Form3);

    Application->CreateForm(__classid(TfmFindCust), &fmFindCust);

    Application->CreateForm(__classid(TForm4), &Form4);

    Application->CreateForm(__classid(TForm5), &Form5);

    Application->CreateForm(__classid(TForm6), &Form6);

    Application->Run();

    }

    catch (Exception &exception)

    {

    Application->ShowException(&exception);

    }

    return 0;

    }

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

    -

    Kur1.cpp:

    #include

    #include

    #pragma hdrstop

    #include "kur1.h"

    #include "RichAbt.h"

    #include "Datam.h"

    #include "Report.h"

    #include "Unit1.h"

    #include "Findcust.h"

    #include "Sort.h"

    #include "filter.h"

    #include "filename.h"

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

    -

    #pragma link "Grids"

    #pragma resource "*.dfm"

    TForm1 *Form1;

    AnsiString ff;

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

    -

    __fastcall TForm1::TForm1(TComponent* Owner)

    : TForm(Owner)

    {

    ff=Form1->Caption;

    }

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

    -

    void __fastcall TForm1::N10Click(TObject *Sender)

    {

    Form1->Caption=ff;

    Form6->ShowModal();

    N2->Enabled=true;

    N20->Enabled=true;

    N5->Enabled=true;

    N14->Enabled=true;

    N16->Enabled=true;

    Form1->Caption =Form1->Caption+"->"+DM1->Table1->TableName;

    }

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

    -

    void __fastcall TForm1::N17Click(TObject *Sender)

    {

    Close();

    }

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

    -

    void __fastcall TForm1::N14Click(TObject *Sender)

    {

    QRListForm->QuickReport->Print();

    }

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

    -

    void __fastcall TForm1::N5Click(TObject *Sender)

    {

    DBGrid1->Visible=false;

    DBNavigator1->Enabled=false;

    BitBtn1->Enabled=false;

    BitBtn2->Enabled=false;

    BitBtn3->Enabled=false;

    }

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

    -

    void __fastcall TForm1::N2Click(TObject *Sender)

    {

    DBGrid1->Visible=true;

    DBNavigator1->Enabled=true;

    BitBtn1->Enabled=true;

    DBGrid1->ReadOnly=true;

    BitBtn2->Enabled=true;

    BitBtn3->Enabled=true;

    }

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

    -

    void __fastcall TForm1::N16Click(TObject *Sender)

    {

    QRListForm->QuickReport->Preview();

    }

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

    -

    void __fastcall TForm1::N20Click(TObject *Sender)

    {

    Form3->ShowModal();

    DM1->Table1->Refresh();

    }

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

    -

    void __fastcall TForm1::BitBtn1Click(TObject *Sender)

    {

    DBGrid1->DataSource=DM1->DataSource2;

    fmFindCust->ShowModal();

    if (fmFindCust->ModalResult == mrOk)

    DM1->Table1->GotoCurrent(DM1->Table1);

    }

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

    -

    void __fastcall TForm1::BitBtn2Click(TObject *Sender)

    {

    DBGrid1->DataSource=DM1->DataSource1;

    Form4->ShowModal();

    if (Form4->ModalResult == mrOk)

    DM1->Table1->GotoCurrent(DM1->Table1);

    }

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

    -

    void __fastcall TForm1::BitBtn3Click(TObject *Sender)

    {

    DBGrid1->DataSource=DM1->DataSource1;

    Form5->ShowModal();

    if (Form4->ModalResult == mrOk)

    DM1->Table1->GotoCurrent(DM1->Table1);

    }

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

    -

    void __fastcall TForm1::N7Click(TObject *Sender)

    {

    if ( OpenDialog1->Execute() )

    {

    Form1->Caption=ff;

    N2->Enabled=true;

    N20->Enabled=true;

    N5->Enabled=true;

    N14->Enabled=true;

    N16->Enabled=true;

    if (DM1->Table1->Active == true )

    DM1->Table1->Active = false;

    DM1->Table1->DatabaseName = ExtractFilePath( OpenDialog1->FileName );

    DM1->Table1->TableName = ExtractFileName( OpenDialog1->FileName );

    DM1->Table1->Active = true;

    Form1->Caption =Form1->Caption+"->"+DM1->Table1->TableName;

    }

    }

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

    -

    void __fastcall TForm1::N4Click(TObject *Sender)

    {

    Form2= new TForm2(Application);

    Form2->ShowModal();

    delete Form2;

    }

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

    -

    Datam.cpp:

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

    -

    #include

    #pragma hdrstop

    #include "Datam.h"

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

    -

    #pragma resource "*.dfm"

    TDM1 *DM1;

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

    -

    __fastcall TDM1::TDM1(TComponent* Owner)

    : TDataModule(Owner)

    {

    }

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

    -

    filename.cpp:

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

    -

    #include

    #pragma hdrstop

    #include "filename.h"

    #include "Datam.h"

    #include "kur1.h"

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

    -

    #pragma resource "*.dfm"

    TForm6 *Form6;

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

    -

    __fastcall TForm6::TForm6(TComponent* Owner)

    : TForm(Owner)

    {

    }

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

    -

    void __fastcall TForm6::Button1Click(TObject *Sender)

    {

    DM1->Table1->Active=false;

    DM1->Query1->Active=false;

    if (Edit1->Text == "")

    Edit1->Text="ITF.db";

    TFileStream *Old = new TFileStream("baza1.db", fmOpenRead);

    TFileStream *New = new TFileStream(Edit1->Text,fmCreate);

    New->CopyFrom(Old, Old->Size);

    delete Old; delete New;

    DM1->Table1->TableName=Edit1->Text;

    DM1->Query1->Active=true;

    DM1->Table1->Active=true;

    }

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

    -

    filter.cpp:

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

    -

    #include

    #pragma hdrstop

    #include "filter.h"

    #include "Datam.h"

    #include "kur1.h"

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

    -

    #pragma resource "*.dfm"

    TForm5 *Form5;

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

    -

    __fastcall TForm5::TForm5(TComponent* Owner)

    : TForm(Owner)

    {

    }

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

    -

    void __fastcall TForm5::Button3Click(TObject *Sender)

    {

    AnsiString filter;

    filter=Edit1->Text;

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

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

    if (ComboBox1->Text == "L.L.+."){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Where A=\""+filter+"\"");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "Lръєы№ЄхЄ"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Where W=\""+filter+"\"");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "TяхЎшры№эюёЄ№"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Where Q=\""+filter+"\"");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "+Ёєяяр"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Where S=\""+filter+"\"");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "TЁ.+рыы"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Where Z>="+filter);

    DM1->Query1->Open();

    DM1->Table1->Open();}}

    else

    {

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza ");

    DM1->Query1->Open();

    DM1->Table1->Open();}}

    else{

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza ");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    DM1->Table1->Refresh();}

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

    -

    findcust.cpp:

    #include

    #pragma hdrstop

    #include "FindCust.h"

    #include "Datam.h"

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

    -

    #pragma resource "*.dfm"

    TfmFindCust* fmFindCust;

    char field[2]={'A','Z'};

    char w1;

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

    -

    __fastcall TfmFindCust::TfmFindCust(TComponent* Owner)

    : TForm(Owner)

    {

    }

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

    -

    void __fastcall TfmFindCust::ComboBox1Change(TObject *Sender)

    {

    if (ComboBox1->Text == "L.L.+.")

    w1=field[0];

    else if (ComboBox1->Text == "TЁ.+рыы")

    {w1=field[1];

    //Edit1->Text = "";

    }

    else

    ComboBox1->Text ="L.L.+.";

    w1=field[0];

    }

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

    void __fastcall TfmFindCust::Edit1Change(TObject *Sender)

    {

    bool Success;

    Set flags;

    flags Table1->Locate(w1,Edit1->Text,flags);

    DM1->Table1->Refresh();

    }

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

    -

    Report.cpp:

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

    #include

    #pragma hdrstop

    #include "Report.h"

    #include "Datam.h"

    #include "kur1.h"

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

    #pragma resource "*.dfm"

    TQRListForm *QRListForm;

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

    // QuickReport simple list

    // - Connect a datasource to the QuickReport component

    // - Put QRDBText components on the Detail band

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

    __fastcall TQRListForm::TQRListForm(TComponent* AOwner)

    : TForm(AOwner)

    {

    }

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

    void __fastcall TQRListForm::QRGroup1NeedData(AnsiString &Value)

    {

    //QuickReport->NewPage();

    }

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

    -

    RichAbt.cpp:

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

    --

    //Borland C++Builder

    //Copyright (c) 1987, 1997 Borland International Inc. All Rights Reserved.

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

    --

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

    #include

    #pragma hdrstop

    #include "RichAbt.h"

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

    --

    #pragma resource "*.dfm"

    TForm2 *Form2;

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

    --

    __fastcall TForm2::TForm2(TComponent *Owner)

    : TForm(Owner)

    {

    }

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

    --

    Sort.cpp:

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

    -

    #include

    #pragma hdrstop

    #include "Sort.h"

    #include "Datam.h"

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

    -

    #pragma resource "*.dfm"

    TForm4 *Form4;

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

    -

    __fastcall TForm4::TForm4(TComponent* Owner)

    : TForm(Owner)

    {

    }

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

    -

    void __fastcall TForm4::ComboBox1Change(TObject *Sender)

    {

    if (ComboBox1->Text == "L.L.+."){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Order by A asc");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "Lръєы№ЄхЄ"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Order by W asc");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "TяхЎшры№эюёЄ№"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Order by Q asc");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "+Ёєяяр"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Order by S asc");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    else if (ComboBox1->Text == "Lръєы№ЄхЄ"){

    DM1->Query1->SQL->Clear();

    DM1->Query1->SQL->Append("Select * From baza Order by Z asc");

    DM1->Query1->Open();

    DM1->Table1->Open();}

    DM1->Table1->Refresh();

    }

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

    -

    Unit1.cpp:

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

    -

    #include

    #pragma hdrstop

    #include "Unit1.h"

    #include "Datam.h"

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

    -

    #pragma link "Grids"

    #pragma resource "*.dfm"

    TForm3 *Form3;

    char predmet1[9]={'H','N','U','J','M','I','K','1','O'};

    char predmet2[9]={'E','D','C','R','F','V','T','G','B'};

    double ozenka1[12];

    int i=0;

    double r;

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

    -

    __fastcall TForm3::TForm3(TComponent* Owner)

    : TForm(Owner)

    {

    }

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

    -

    void __fastcall TForm3::FormCreate(TObject *Sender)

    {

    //-юсрты хь эютє¦ чряшё№ т срчє

    DM1->Table1->Append();

    }

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

    -

    void __fastcall TForm3::Button1Click(TObject *Sender)

    {

    if(DM1->Table1->State == dsInsert||DM1->Table1->State == dsEdit)

    DM1->Table1->Post();

    DM1->Table1->Append();

    for(i=0;iEnabled=true;

    Button2->Enabled=true;

    DBEdit8->DataField='x';

    DBEdit5->DataField='y';

    DBEdit5->ReadOnly=false;

    DBEdit8->ReadOnly=false;

    DBEdit1->ReadOnly=false;

    DBEdit2->ReadOnly=false;

    DBEdit4->ReadOnly=false;

    DBEdit6->ReadOnly=false;

    DBEdit4->Visible=false;

    Label8->Visible=false;

    DM1->Table1->Refresh();

    }

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

    -

    void __fastcall TForm3::Button6Click(TObject *Sender)

    {

    if ( !DM1->Table1->Bof )

    DM1->Table1->Prior();

    i=10;

    }

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

    -

    void __fastcall TForm3::Button4Click(TObject *Sender)

    {

    if ( !DM1->Table1->Eof )

    DM1->Table1->Next();

    i=10;

    }

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

    -

    void __fastcall TForm3::Button2Click(TObject *Sender)

    {

    DM1->Table1->Delete();

    DM1->Table1->Refresh();

    if(DM1->Table1->Eof && DM1->Table1->Bof )

    Button2->Enabled=false;

    DBEdit4->Visible=false;

    Label8->Visible=false;

    }

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

    -

    void __fastcall TForm3::Button5Click(TObject *Sender)

    {

    if(iGetTextLen();

    char *name = new char[++Size];

    DBEdit8->GetTextBuf(name,Size);

    DBEdit8->Text = name;

    r=atoi(name);

    ozenka1[i]=r;

    delete name;

    r=0;

    DBEdit5->DataField=predmet1[i];

    DBEdit8->DataField=predmet2[i];

    i++;

    Button3->Enabled=true;

    }

    else {if(i==9){

    int Size = DBEdit8->GetTextLen();

    char *name = new char[++Size];

    DBEdit8->GetTextBuf(name,Size);

    DBEdit8->Text = name;

    r=atoi(name);

    ozenka1[i]=r;

    delete name;

    r=0;}

    ozenka1[10]=(ozenka1[0]+ozenka1[1]+ozenka1[2]+ozenka1[3]+ozenka1[4]+ozenka1[

    5]+ozenka1[6]+ozenka1[7]+ozenka1[8]+ozenka1[9])/10;

    DBEdit4->SelText=ozenka1[10];

    DM1->Table1->FieldValues["Z"] = ozenka1[10];

    Button5->Enabled=false;

    Button3->Enabled=false;

    DBEdit5->ReadOnly=true;

    DBEdit8->ReadOnly=true;

    DBEdit1->ReadOnly=true;

    DBEdit2->ReadOnly=true;

    DBEdit4->ReadOnly=true;

    DBEdit6->ReadOnly=true;

    DBEdit4->Visible=true;

    Label8->Visible=true;

    }}

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

    -

    void __fastcall TForm3::Table1AfterOpen(TDataSet *DataSet)

    {

    if(DM1->Table1->Eof && DM1->Table1->Bof )

    Button2->Enabled=false;

    }

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

    -

    void __fastcall TForm3::Button3Click(TObject *Sender)

    {

    if(i>=0)

    {i--;

    DBEdit5->DataField=predmet1[i];

    DBEdit8->DataField=predmet2[i];

    }

    else

    Button3->Enabled=false;

    Button5->Enabled=true;}

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

    -

    Список использованной литературы

    1. Трахтенгерц Э.А. «Компьютерная поддержка принятия решений»

    2. Том Сван «Программирование в Borland C++ 5.02»

    3. «Объектно-ориентированный анализ»

    4. Мэт Теллес «Borland С++ Builder»

    -----------------------

    O8: Осуществляется ввод строк

    запроса

    6. Просмотр пер. печ (Г)

    1

    1

    Интерфейс

    ID Основной

    управление

    О3.4: Вернуть

    [pic]

    Выполнение

    продукций

    Запрос чистых

    ID Операции

    [pic]

    результата

    Возврат

    Ввод данных

    данные

    Использует

    ID Основной

    Интерфейс

    Содержит

    Содержится в

    [pic]

    Получить вектор

    запросы

    Отвечает на

    данные

    Запрашивает

    запроса

    Выполнение

    связь

    Обеспечивает

    данные

    Получить

    Ответ

    Запрос

    количества

    Передача

    Ошибка

    О3.4: Вернуть

    управление

    -

    R6

    ID Базы

    R4

    R8

    R3

    R12

    R1

    R9

    [pic]

    [pic]

    X1.2: Получить

    данные

    X1.3:Ошибка

    заполнения

    Порождает O6: Редактирование БД

    Операции.Сохранение)

    (ID Основной Интерфейс.ID

    Вызывается операция

    O9: Осуществляется сохранение БД

    Операции.Обновление)

    (ID Основной Интерфейс.ID

    Вызывается операция

    5. Запись в БД (ЗБД)

    *описание действия

    *номер записи

    *ID Базы данных (R6)

    4. База данных (БД)

    *статус

    *число записей

    *ID псевдоним базы

    3. Печать (Х)

    *вектор-заполнитель

    X1: Инициал.

    *количество студентов

    окно диалога

    2. Операции над БД (ОБД)

    *статус

    *путь к базе данных

    *имя базы данных

    *ID Операции

    O7: Осуществляется обновление БД

    1. Основной интерфейс (ОИ)

    *Создание базы данных

    *ID Базы данных (R12)

    *ID Хранилища

    Операции.Редактирование)

    (ID Основной Интерфейс.ID

    Вызывается операция

    O6: Осуществляется редактирование БД

    Операции.Создание)

    (ID Основной Интерфейс.ID

    Вызывается операция

    O2: Осуществляется создание БД

    Операции.Открытие)

    (ID Основной Интерфейс.ID

    Вызывается операция

    O3: Осуществляется открытие БД

    ID Основной Интерфейс.ID Операции.ID ввода данных

    Создается объект ввода данных

    ID Основной Интерфейс.ID Операции.Имя БД= ""

    ID Основной Интерфейс.ID Операции.Путь к БД= ""

    ID Основной Интерфейс, ID Операции

    Создается объект на главной форме

    (ID Основной Интерфейс)

    O1. Создается главная форма

    БД

    Обновление

    7

    Сохранение

    9

    Ввод в Базу

    8

    БД

    Редактирование

    6

    Закрытие БД

    5

    открытие

    Неуспешное

    4

    базы

    Открытие

    3

    базы

    Создание

    2

    Инициализация

    Интерфейс

    ID Основной

    ID Файла

    ID Таблицы

    файла

    Атрибуты

    таблицу

    O2.2 Создать

    в новый файл

    О2.1 Сохранить

    Вызывается операция

    (ID Основной Интерфейс.ID

    Операции.Генерация)

    O5: Осуществляется закрытие БД

    Вызывается операция

    (ID Основной Интерфейс.ID

    Операции.Закрытие)

    Порождает O1: Инициализация БД

    Порождает O5: Закрытие БД

    O3: Осуществляется открытие БД

    Вызывается операция

    (ID Основной Интерфейс.ID

    Операции.Открытие)

    Порождает O6:

    Редактирование

    БД

    Операции

    O4: Неуспешное открытие

    (ID Основной Интерфейс.ID

    Операции.Открытие.Статус)

    Количеств студ.

    Ф4.1:Получить

    BDE(i):Результат запроса

    BDE(i):Запрос

    OS(i):Результат запроса

    БД (i):Запрос

    запроса

    АА(i):Результат

    OS(i):Запрос

    AAB(i):Результат запроса

    АА(i):Запрос

    SYS5:Закрыть БД

    SYS4:Открыть БД

    SYS3: Сохранить БД

    SYS2:Создать БД

    SYS1:Редактировать БД

    ЭВМ

    ОС

    абстракции

    Аппаратные

    Х3.1: Вернуть опеч. лист

    X2:

    *один студент

    *текущее число студентов

    Интерфейс

    ID Основной

    [pic]

    О5:Закрыть БД

    О3:Открыть БД

    О2:Создать БД

    О6:Редактировать БД

    О9: Сохранить БД

    Г3.2:Поиск

    Г3.1:Фильтрация

    Г4.6:Сортировка

    Г4.1: Получить размер группы

    Г4.2: Получить длину группы

    Г3.2:Получить по одному

    Г3.1:Получить по всем

    ID Базы

    Х3:Сгенерировать количество

    O3:Получить имя БД

    Гф3: Ввести все данные

    Гф2: Устоновить поле

    Г1:Принять решение

    Г2: Решение принято

    Гф1: Произвести ввод

    дерево

    Д1:Построить

    Сообщение для пользователя

    Запрос пользователя

    BDE

    База данных

    Печать

    Перемещение по БД

    Инициализация

    2

    Откл. Редактир.

    Базы

    Операции над БД

    3

    Формирование

    Поиска,фильтр.,сортир.

    4

    Формирование

    групп

    5

    Отчет

    6

    Печать

    Г1. Создается объект ввода данных

    (ID Основной Интерфейс.ID Операции над БД.ID ввода данных)

    ID Основной Интерфейс.ID Операции над БД.ID Ввод данных.Ф.И.О.

    ID Основной Интерфейс.ID Операции над БД.ID Ввод данных.Факультет

    ID Основной Интерфейс.ID Операции над БД.ID Ввод данных.Специальность

    ID Основной Интерфейс.ID Операции над БД.ID Ввод данных.Группа

    ID Основной Интерфейс.ID Операции над БД.ID Ввод данных.Предмет=10

    ID Основной Интерфейс.ID Операции над БД.ID Ввод данных.Оценка=10

    Г2: Из базы данных ID Основной Интерфейс.ID Операции

    над БД.ID Запись в БД отключение редактирования

    ID Основной Интерфейс.ID Операции над БД.сортировка, фильтрация, поиск

    Г3: Происходит просмотр введенных данных

    ID Основной Интерфейс.ID Операции над БД.ID Переход по строкам

    Г4: Происходит формирование групп на основе введенных данных

    ID Основной Интерфейс.ID Операции над БД.ID Формировать по выбору

    Г5: Происходит формирование готовых групп

    ID Основной Интерфейс.ID Операции над БД.ID .Фильтр по сортир., фил.

    Г6: Объект печать

    ID Основной Интерфейс.ID Операции над БД.ID формирование групп

    Ввод данных

    Просморт данных

    Просмотр перед печатью

    Ввод данных

    интерфейс

    Основной

    Пользователь

    Страницы: 1, 2, 3


    Приглашения

    09.12.2013 - 16.12.2013

    Международный конкурс хореографического искусства в рамках Международного фестиваля искусств «РОЖДЕСТВЕНСКАЯ АНДОРРА»

    09.12.2013 - 16.12.2013

    Международный конкурс хорового искусства в АНДОРРЕ «РОЖДЕСТВЕНСКАЯ АНДОРРА»




    Copyright © 2012 г.
    При использовании материалов - ссылка на сайт обязательна.