PClip.cpp
上传用户:lulishicai
上传日期:2010-03-01
资源大小:13202k
文件大小:1k
源码类别:

Delphi/CppBuilder

开发平台:

C++ Builder

  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. USERES("PClip.res");
  5. USEUNIT("PClip.cpp");
  6. USEFORM("Clip.cpp", Form1);
  7. //---------------------------------------------------------------------------
  8. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  9. {
  10.         try
  11.         {
  12.                  Application->Initialize();
  13.                  Application->CreateForm(__classid(TForm1), &Form1);
  14.                  Application->Run();
  15.         }
  16.         catch (Exception &exception)
  17.         {
  18.                  Application->ShowException(&exception);
  19.         }
  20.         return 0;
  21. }
  22. //---------------------------------------------------------------------------