6.3.2 Програмування задачі б

Крок 1. На диску D:\ , у створеній папці Lab_6 , потрібно сформувати внутрішню папку Fіgures_6 для файлів проекту P_Fіgures_6.

Крок 2. На формі програми установіть компоненту Іmage1 і заповнить в програмний модуль U_Fіgures_6 наступний текст:

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

#include <vcl.h>

#pragma hdrstop

#include "U_figures_6.h"

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

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

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

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

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

void __fastcall TForm1::FormCreate(TObject *Sender)

{

Image1->Canvas->Font->Style << fsBold;

Image1->Canvas->Arc(10,10,90,90,90,50,10,50);

Image1->Canvas->TextOut(40,60,"Arc");

Image1->Canvas->Chord(110,10,190,90,190,50,110,50);

Image1->Canvas->TextOut(135,60,"Chord");

Image1->Canvas->Ellipse(210,10,290,50);

Image1->Canvas->TextOut(230,60,"Ellipse");

Image1->Canvas->Pie(310,10,390,90,390,30,310,30);

Image1->Canvas->TextOut(340,60,"Pie");

TPoint points[5];

points[0] = Point(30,150);

points[1] = Point(40,130);

points[2] = Point(50,140);

points[3] = Point(60,130);

points[4] = Point(70,150);

Image1->Canvas->Polygon(points,4);

Image1->Canvas->TextOut(30,170,"Polygon");

points[0].x += 100;

points[1].x += 100;

points[2].x += 100;

points[3].x += 100;

points[4].x += 100;

Image1->Canvas->Polyline(points,4);

Image1->Canvas->TextOut(130,170,"Polyline");

Image1->Canvas->Rectangle(230,120,280,160);

Image1->Canvas->TextOut(230,170,"Rectangle");

Image1->Canvas->RoundRect(330,120,380,160,20,20);

Image1->Canvas->TextOut(325,170,"RoundRect");

}

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

Крок 3. Виконайте командою Run компіляцію проекту файлів програми до задачі Б з лабораторної роботи № 6 та отримайте результат рисування стандартних фігур у вікні, як це показано на рис. 6-3.

Рис.6-3.

6.4 Контрольні питання до лабораторної роботи № 6

1. Поясніть у програмі С++ запис оператора до рисування за допомогою

пера Pen.

2. Поясніть, чому колір до одного пікселя записується у відповідний дво-

мірний масив даних.

3. Покажить у лістингу програми, як при рисуванні використовуються

компоненти Image1 та Image2.

4. Покажить, як для метода Ellips визначається рисування еліпсу або

окружності.

5. Яким чином до інструменту Pen задається вигляд до рисуємої лінії.

7. Література

1. Архангельский, А. Я. Программирование в С++ Builder 6

[Текст] / А. Я. Архангельский // – М.: ЗАО «Издательство

БИНОМ», 2002. – 1152 с. Библиогр.: с. 1150–1151. 4000 экз.

ISBN 5-7989-0239-0.

2. Архангельский, А. Я. С++ Builder 6. Справочное пособие. Книга 1. Язык С++ [Текст] / А. Я. Архангельский // – М.: ЗАО «Издательство БИНОМ», 2002. – 554 с. Библиогр.: с. 541–543. 4000 экз. ISBN 5-9518-0007-2.

3. Архангельский, А. Я. С++ Builder 6. Справочное пособие. Книга 2. Классы и компоненты [Текст] / А. Я. Архангельский // – М.: ЗАО «Издательство БИНОМ», 2002. – 528 с. Библиогр.: с. 525–526. 4000 экз. ISBN 5-9518-0009-9.

4. Культин, Н. Б. Самоучитель С++ Builder [Текст] / Н. Б. Культин // – СПб.: БХВ-Петербург, 2004. – 320 с. Библиогр.: с. 317. 4000 экз. ISBN 5-94157-378-2.

5. Шилд, Г. Полный справочник по С++ [Текст] / Г. Шилд // 4-е издание. : Пер. с англ. – М.: Издательский дом “Вильямс”, 2006. – 800 с. 3000 экз. ISBN 5-8459-0489-7.

104