Файл: курсач(10).docx

Висновок

При розробці цього проекту я закріпила, поглибила та узагальнила знання, які використала на лекціях та практичних заняттях з дисципліни «Об’єктно - орієнтована технологія програмування» та при роботі з середовищем програмування і компілятором «Borland С++ 6», створюючи свої класи необхідні для функціонування даної програми.

Завдяки набутим знанням я створила програму «Акваріумні рибки», яка представлена у графічному вигляді та безперервному русі мешканців акваріума.

Література

1. Архангельский А.Я. Программирование в C++ Builder, 7 изд., Бином, 2010. — 1304 с.

2. Бобровский С. Самоучитель программирования на C++ в системе C++ Builder. ДЕСС, 2003. — 810 с.

3. Культин Н.Б. Самоучитель C++ Builder., Высшая школа, 2006. — 380 с.

4. Архангельский А.Я. C++ Builder 6 справочное пособие, 2005. — 635 с.

5. Алексанкин Т.А. Borland C++, 2003 — 540 с.

6. Ермолаев В., Сорока Т. C++ Builder Книга рецептов, 2003. — 560 с.

7. Культин Н.Б. C++ Builder в задачах и примерах, 2000. — 400 с.

8. Бобровский С. Технологии C++ Builder., 2005. — 490 с.

9. Парта С. Язык программирования C++ Лекции и упражениния, 1999. – 630 с.

Додаток а Лістинг модуля Unit1

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

TAquarium akv;

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

void __fastcall TForm1::Button1Click(TObject *Sender)

{

Label1->Hide();

Label2->Hide();

Label3->Hide();

Label4->Hide();

Image2->Hide();

DoubleBuffered=true;

akv.Init(Image1);

akv.Run();

Timer1->Enabled=true;

}

void __fastcall TForm1::Timer1Timer(TObject *Sender)

{

Image1->Canvas->Draw(0,0,akv.back);

for(int i=0;i<10;i++)

{

if(akv.ruba[i].Fpos.x>=1350||akv.ruba[i].Fpos.x<=10)

{

akv.ruba[i].Fspeed=-akv.ruba[i].Fspeed;

if(akv.ruba[i].Fspeed<0){ akv.ruba[i].Rubka->LoadFromFile("н.bmp"); if(i==6||i==8) akv.ruba[i].Rubka->LoadFromFile("назад.bmp");else if(i==7||i==9)akv.ruba[i].Rubka->LoadFromFile("наз.bmp");

}

}

if(akv.ruba[i].Fspeed>0) {akv.ruba[i].Rubka->LoadFromFile("т.bmp");if(i==6||i==8) akv.ruba[i].Rubka->LoadFromFile("тр.bmp");else if(i==7||i==9)akv.ruba[i].Rubka->LoadFromFile("бмп.bmp");

}

// akv.povorot(akv.ruba[i]);

akv.ruba[i].Fpos=Point(akv.ruba[i].Fpos.x+=akv.ruba[i].Fspeed,akv.ruba[i].Fpos.y);

Image1->Canvas->Draw(akv.ruba[i].Fpos.x,akv.ruba[i].Fpos.y,akv.ruba[i].Rubka);

}

}

void __fastcall TForm1::Button2Click(TObject *Sender)

{

Close();

}