 -  _____43

_fastcall TFormI(TComponent* Owner);

\ 

/'/_

extern PACKAGE TFormI *Formi;

//-

//     , , ,
//      ;

//          

//   

ftendif

 :

//-

include <vcl.h>'

ttpragma hdrstop

^include "Unitl.h"

//-

#pragma package(smart init)
ftpragma resource "*.dfm"

//     
//  ( , include),
//     

//    Formi
TFormI *Formi;

//-

//    Formi
_fastcall TFormI::TFormI(TComponent* Owner)

: TForm(Owner)
(

//     ,
//      

}
//_

/'/       ,
//         
//    ;

//       ,  
//  ,      
//  ,   

void _fastcall TFormI::ButtonlClick(TObject *Sender)
(
Close() ;

//-

   .     -
     .  , C++Builder  -
   include,   ,   
 , , , ,     -
 . ,       
.        -
 include .

      .  
   TFormI.    : _published  
,        -
   , private    ,  public  
 .      _published    -
    :  Buttoni  TButton  