338  5

. 5.10

 ,  

Polygon           Polyline           Rectangle        RoundRecl

Imagel->Canvas->Font->Style  fsBold;

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

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

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

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

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

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

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

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

POINT points[5] ;

points[0] = Point(30,150)
points[l] = Point (40,130)
points[2] = Point(50,140)
points [3] = Point(60,130)
points[4] = Point(70,150)
Imagel->Canvas->Polygon(points,4) ;

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

points[0]. += 100;

points[I].x += 100;

points[2].x += 100;

points[3].x += 100;

points [4].x += 100;

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

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

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

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

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

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

  .       !
  .       ,    
 ,   ,   .

          TextO
ut,  :

void _fastcall TextOutfint X, int Y, const System::AnsiString Text);

     ,   
       Font  ,  
  .  ,       ,
   .

5.1.3.4 Brush  

    Brush  .      
    . Brush   ,     ;

.  Color   .  Style 
  ()    :