 -  _____39

//

//  main
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)

{

try

{

Application->Initialize() ;

Application->CreateForm(_classic! (TFormI), &Forml) ;

Application->CreateForm( classid(TForm2), &Form2);

Application->Run();

}
catch (Exception Sexception)

(

Application->ShowException(Sexception) ;

)
return 0;

)

//

    ,     '#'.
     .    
   #include,         .  -
         .  -
,       . -
,  #include <vcl.h>    vcl.h, -
 ,      C++Buil-
der.

       USERES 
USEFORM.  ,       ,
  .       .  -
       USEFORM,  .
C++Builder      
USEFORM   ,    .   -
    ,   (, Unitl.cpp),
     .

        
   WinMain.     
  .      -
,  Windows     
  .       -
    API Windows (API Windows   -
  Windows,    ).  -
 WinMain      
(      ). -
          , -
 ,      . 
       
          -
   WinExec.     -
.         ShowWindow.

    WinMain   ,  
       .

   WinMain   ,   
.       Application->Initialize()
    .  -
 Application->CreateForm    . 