创新can调试器Linux版
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

34 lines
1.1 KiB

4 years ago
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #pragma hdrstop
  4. //---------------------------------------------------------------------------
  5. USEFORM("Unit1.cpp", Form1);
  6. //---------------------------------------------------------------------------
  7. WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
  8. {
  9. try
  10. {
  11. Application->Initialize();
  12. Application->Title = "USB CAN Demo(��о�����Ƽ����޹�˾)";
  13. Application->CreateForm(__classid(TForm1), &Form1);
  14. Application->Run();
  15. }
  16. catch (Exception &exception)
  17. {
  18. Application->ShowException(&exception);
  19. }
  20. catch (...)
  21. {
  22. try
  23. {
  24. throw Exception("");
  25. }
  26. catch (Exception &exception)
  27. {
  28. Application->ShowException(&exception);
  29. }
  30. }
  31. return 0;
  32. }
  33. //---------------------------------------------------------------------------