TCLTools.cpp 2.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293
  1. // TCLTools.cpp : 定义应用程序的类行为。
  2. //
  3. #include "stdafx.h"
  4. #include "TCLTools.h"
  5. #include "TCLToolsDlg.h"
  6. #ifdef _DEBUG
  7. #define new DEBUG_NEW
  8. #endif
  9. // CTCLToolsApp
  10. BEGIN_MESSAGE_MAP(CTCLToolsApp, CWinAppEx)
  11. ON_COMMAND(ID_HELP, &CWinApp::OnHelp)
  12. END_MESSAGE_MAP()
  13. // CTCLToolsApp 构造
  14. CTCLToolsApp::CTCLToolsApp()
  15. {
  16. // TODO: 在此处添加构造代码,
  17. // 将所有重要的初始化放置在 InitInstance 中
  18. }
  19. // 唯一的一个 CTCLToolsApp 对象
  20. CTCLToolsApp theApp;
  21. // CTCLToolsApp 初始化
  22. BOOL CTCLToolsApp::InitInstance()
  23. {
  24. // 如果一个运行在 Windows XP 上的应用程序清单指定要
  25. // 使用 ComCtl32.dll 版本 6 或更高版本来启用可视化方式,
  26. //则需要 InitCommonControlsEx()。否则,将无法创建窗口。
  27. INITCOMMONCONTROLSEX InitCtrls;
  28. InitCtrls.dwSize = sizeof(InitCtrls);
  29. // 将它设置为包括所有要在应用程序中使用的
  30. // 公共控件类。
  31. InitCtrls.dwICC = ICC_WIN95_CLASSES;
  32. InitCommonControlsEx(&InitCtrls);
  33. CWinAppEx::InitInstance();
  34. AfxEnableControlContainer();
  35. TCLCommand tclCommand;
  36. tclCommand.SetInternalCMDParams(BIN_CMD);
  37. if ( tclCommand.Open(21, _T("baud=115200 parity=N data=8 stop=1")) )
  38. {
  39. CommandParam cmdpara;
  40. tclCommand.SendCommand("EnterFactory", cmdpara);
  41. tclCommand.SendCommand("GetProjectId", cmdpara);
  42. tclCommand.SendCommand("GetSoftVersion", cmdpara);
  43. tclCommand.SendCommand("GetDeviceId", cmdpara);
  44. tclCommand.SendCommand("LeaveFactory", cmdpara);
  45. }
  46. // 标准初始化
  47. // 如果未使用这些功能并希望减小
  48. // 最终可执行文件的大小,则应移除下列
  49. // 不需要的特定初始化例程
  50. // 更改用于存储设置的注册表项
  51. // TODO: 应适当修改该字符串,
  52. // 例如修改为公司或组织名
  53. SetRegistryKey(_T("应用程序向导生成的本地应用程序"));
  54. CTCLToolsDlg dlg;
  55. m_pMainWnd = &dlg;
  56. INT_PTR nResponse = dlg.DoModal();
  57. if (nResponse == IDOK)
  58. {
  59. // TODO: 在此放置处理何时用
  60. // “确定”来关闭对话框的代码
  61. }
  62. else if (nResponse == IDCANCEL)
  63. {
  64. // TODO: 在此放置处理何时用
  65. // “取消”来关闭对话框的代码
  66. }
  67. // 由于对话框已关闭,所以将返回 FALSE 以便退出应用程序,
  68. // 而不是启动应用程序的消息泵。
  69. return FALSE;
  70. }