362________________________________________________ 5

 num     ,     -
 Xpos    revers.

     .     
   .      -
     .     
  .

,      .   
    .     , -
     .

     .      ;,
      .      i
- . ,     FormCreate 
,   :

Imagel->Canvas->Brush->Color = 0;

Imagel->Canvas->Rectangle(90,0,200,100);

Imagel->Canvas->Brush->Color = clWhite;

   .      ;:

 ,   . 5.16 .      
 .   -,     
,       .   
    .     , <
     OpenPictureDialog    :

FormCreate  

if (OpenPictureDialogl->Execute())

Imagel->Picture->LoadFromFile(OpenPictureDialogl->FileName);

          
-  .    , 
. 5.16 .     ,       i,,
  , , ,  .

    ?    
-  ,   ,   
.    -   , ,  ,  -
     pmNotXor    .

         . 
         ;

 File | Save Project As... .       .
 File Save As... .       ,  
    .

    TBitmap:

Graphics::TBitmap *BitMap;

  ,       , 
  .   FormCreate  

. 5.16

 

 
 
()   ()
