Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лаб S++BuilderZert27каз.doc
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
7.48 Mб
Скачать

DataModule-ге орналастыру

Қосымша коды:

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

#include <vcl\vcl.h>

#pragma hdrstop

#include "cust1.h"

#include "custdm1.h" // деректер модуліне сілтеме

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

#pragma link "Grids"

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent*

Owner): TForm(Owner)

{

}

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

void __fastcall TForm1::Button1Click(TObject *Sender)

{

if (DataModule1->Table1->Active)

{

DataModule1->Table1->Close();

Button1->Caption = "Открыть таблицу &клиентов";

}

else

{

DataModule1->Table1->Open();

Button1->Caption= "Закрыть таблицу &клиентов";

};

}

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

void __fastcall TForm1::Button2Click(TObject *Sender)

{

if (DataModule1->Query1->Active)

{

DataModule1->Query1->Active = false;

Button2->Caption = "Открыть таблицу &заказов";}

else

{

DataModule1->Query1->Active = true;

Button2->Caption = "Закрыть таблицу &заказов";

}

}

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

void __fastcall TForm1::RadioButton1Click(TObject *Sender)

{

DBGrid1->DataSource = DataModule1->DataSource1;

}

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

void __fastcall TForm1::RadioButton2Click(TObject *Sender)

{

DBGrid1->DataSource = DataModule1->DataSource2;

}

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

void __fastcall TForm1::RadioButton3Click(TObject *Sender)

{

DBGrid1->DataSource = DataModule1->DataSource3;

}

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

void __fastcall TForm1::Button3Click(TObject *Sender)

{

if (DataModule1->Table1->Active)

{

DataModule1->Table1->SetRangeStart();

DataModule1->Table1->Fields[0]->AsString = Edit1->Text;

DataModule1->Table1->SetRangeEnd();

DataModule1->Table1->Fields[0]->AsString = Edit2->Text;

DataModule1->Table1->ApplyRange();

}

}

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

Өзіндік жұмысқа тапсырмалар

DataModule және TQuery компоненттерін қолданып деректер қоры қосымшасын құру:

  1. Жоғарғы оқу орнының студенттері туралы мәліметтер.

  2. Автотранспорттық шаруашылық жұмысы.

  3. Компьютерлік фирма жұмысы.

  4. Аэропорт кассасы жұмысы.

  5. Оқытушылардың жүктемесiн есептеу

  6. Автосалон жұмысы.

  7. Поликлиника дәрігерлері туралы мәліметтер.

  8. Кітапхана.

  9. Аэропорт анықтамалық бюросының мәліметтері.

  10. Стоматология.

13 - зертханалық жұмыс.

QReport парағын пайдаланып есеп беруді ұйымдастыру

Әдістемелік нұсқаулар

C++ Builder ортасында есеп беруді құру үшін компоненттер палитрасындағы QReport беті қолданылады. Бұл компоненттер жиыны кестелерді, сұраныстарды, тізімдерді, мәтіндік файлдарды, массивтерді C++ Builder дизайнер формасын қолдана отырып есеп беруді жобалайды және баспаға шығарады.

C++ Builder ортасының Forms объектілер репозитариясы бетінде есеп берудің 3 шаблоны бар:

Шаблон

Сипаттамасы

QuickReport Mailing Labels

Пошталық этикеттер құру шаблоны

QuickReport List

Қарапайым кестелік есеп беруді құру шаблоны

QuickReport Master/detail

Master/Detail есеп беруін құру шаблоны.