4 практикалық ЖҰмыс. Қосымша құруда тізімдерді пайдалану Әдістемелік нұСҚаулар

C++Builder ортасында құрылатын қосымшалардағы тізімнің көмегімен таңдау жұмысын ұйымдастыру үшін Standart панелінің ListBox, ComboBox компоненттерін қолдануға болады.

Мысалы,

ComboBox1->Items.LoadFromFile(„с:\Gruppa\Family.txt‟);

ЖАТТЫҒУ ЖҰМЫСТАРЫ

Студент пен оқытушы туралы ақпарат бере алатын қарапайым қосымша құру керек. Әрбір студент немесе оқытушы туралы ақпарат оның фамилиясына сәйкес аталатын *.txt файлда сақталсын. Қосымша құруда тізімдерді пайдаланыңыз.

Орындалуы. Қосымша үш /4.1, 4.2, 4.3 –суреттер/ терезеден тұрады. «Анықтама» терезесіндегі батырмалар көмегімен «Студенттер» немесе «Оқытушылар» терезелерінің біріне көшуге болады. Бұл терезелерде сәйкесінше студент немесе оқытушы туралы нақты мәлімет алынады. «Анықтама» терезесі (Form1) үшін жазылған программа мәтіні:

#include "Unit1.h"

#include "Unit2.h"

#include "Unit3.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

void __fastcall TForm1::Button1Click(TObject *Sender)

{

Form2->Show();

void __fastcall TForm1::Button2Click(TObject *Sender)

{

Form3->Show();

void __fastcall TForm1::Button3Click(TObject *Sender)

{

Form1->Close();

#include "Unit2.h"

#include "Unit1.h"

#include "Unit3.h"

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

#pragma package(smart_init)

#pragma link "SHDocVw_OCX"

#pragma resource "*.dfm"

TForm2 *Form2;

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

__fastcall TForm2::TForm2(TComponent* Owner)

: TForm(Owner)

{

}

void __fastcall TForm2::Button1Click(TObject *Sender)

{

Form1->Show();

Form2->Hide();

}

// Студенттер тізімі жазылған ListBox1 компонентін шерту оқиғасының коды

void __fastcall TForm2::ListBox1Click(TObject *Sender)

{

if (Form2->ListBox1->ItemIndex==0) M

(Form2->ListBox1->ItemIndex==1)

Memo1->Lines->LoadFromFile("Жумагазы.txt");

if (Form2->ListBox1->ItemIndex==2)

Memo1->Lines->LoadFromFile("Имангалиева.txt");

}

#include "Unit3.h"

#include "Unit1.h"

#include "Unit2.h"

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

#pragma package(smart_init)

#pragma link "SHDocVw_OCX"

#pragma resource "*.dfm"

TForm3 *Form3;

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

void __fastcall TForm3::TForm3(TComponent* Owner)

: TForm(Owner)

{

}

void __fastcall TForm3::ComboBox1Change(TObject *Sender)

{

if(ComboBox1->ItemIndex==0)

if(ComboBox1->ItemIndex==1)

Memo1->Lines->LoadFromFile("Асанова.txt");

}

void __fastcall TForm3::Button1Click(TObject *Sender)

{

Form1->Show();

Form2->Hide();