   339

      Bitmap,    -
  TBitmap      -
.      8  8.    
 Bitmap,      , 
   Style.

 Bitmap       ,
,   ,     ,   
   :

Graphics::TBitmap *BrushBmp = new Graphics::TBitmap;

try

{

BrushBmp->LoadFromFile("MyBitmap.bmp") ;

Forml->Canvas->Brush->Bitmap = BrushBmp;

Forml->Canvas->FillRect(Rect(0,0,Forml->Width,Forml->Height)
}

finally
(

Forml->Canvas->Brush->Bitmap = NULL;

delete BrushBmp;

>

     BrushBmp  TBitmap    -
       MyBitmap.bmp.   Forml->Can-
vas->Brush->Bitmap     .   -
         . -
 FillRect      , -
   .        -
 OnResize,         
   .   (     -
) Bitmap   NULL,    
   Style.   BrushBmp ,
    .

      FillRect,  

void _fastcall FillRect(const Windows::TRect SRect);

       , -
  Rect.     TRect.     -
   Rect(Xl,Yl,X2,Y2),   Rect 
 ,   (XI, Y1)  (2, Y2).

 FillRect ,  ,    -
. , 

Imagel->Canvas->FillRect(Rect(0,0,Imagel->Width,Imagel->Height));

     Imagel.