BlendVsMergeC.cpp 741 B

1234567891011121314151617181920212223242526272829303132
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. USEFORM("fMainC.cpp", Form1);
  5. //---------------------------------------------------------------------------
  6. int WINAPI _tWinMain(HINSTANCE, HINSTANCE, LPTSTR, int)
  7. {
  8. try
  9. {
  10. Application->Initialize();
  11. Application->MainFormOnTaskBar = true;
  12. Application->CreateForm(__classid(TForm1), &Form1);
  13. Application->Run();
  14. }
  15. catch (Exception &exception)
  16. {
  17. Application->ShowException(&exception);
  18. }
  19. catch (...)
  20. {
  21. try
  22. {
  23. throw Exception("");
  24. }
  25. catch (Exception &exception)
  26. {
  27. Application->ShowException(&exception);
  28. }
  29. }
  30. return 0;
  31. }
  32. //---------------------------------------------------------------------------