Hello VCL

Project1.cpp

// Project1.cpp
//---------------------------------------------------------------------------

#include <vcl.h> // VCL 사용 시, 기본은 이거...
#pragma hdrstop // 프리컴파일러 최적화 ; #include 처리 후에 써 준다...

USEFORM("Unit1.cpp", Form1); // 매크로 ; 폼을 사용한다는 매크로이겄슴...

WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) // entry point 
{
  try // try ... catch ... 
  {
    Application->Initialize(); // Applicatoin 은 singleton instance 이다..
                               // extern PACKAGE TApplication* Application;

    SetApplicationMainFormOnTaskBar(Application, true); 
      // Forms.SetApplicationMainFormOnTaskBar
    
    Application->CreateForm(__classid(TForm1), &Form1); // 폼 만드시고..
    Application->Run(); //  application 실행하슈...
    
  }
  catch (Exception &exception)
  {
    Application->ShowException(&exception); // 왠만하면 이 아래로 안 오시길 기원함댜...
  }
  catch (...)
  {
    try
    {
      throw Exception("");
    }
    catch (Exception &exception)
    {
      Application->ShowException(&exception);
    }
  }
  return 0;
}