MFC和CLIPS交互例程

例子展示了在CLIPS内部将数据传到MFC内，并显示在界面。使用打印跳转技术，可将ＣＬＩＰＳ内部事实等数据打印到ＭＦＣ程序内部。

// MFCCLIPS.cpp : 定义应用程序的类行为。
//

#include “stdafx.h“
#include “MFCCLIPS.h“
#include “MFCCLIPSDlg.h“

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// CMFCCLIPSApp

BEGIN_MESSAGE_MAP（CMFCCLIPSApp CWinApp）
	ON_COMMAND（ID_HELP &CWinApp::onhelp）
END_MESSAGE_MAP（）


// CMFCCLIPSApp 构造

CMFCCLIPSApp::CMFCCLIPSApp（）
{
	// 支持重新启动管理器
	m_dwRestartManagerSupportFlags = AFX_RESTART_MANAGER_SUPPORT_RESTART;

	// TODO: 在此处添加构造代码，
	// 将所有重要的初始化放置在 InitInstance 中
}


// 唯一的一个 CMFCCLIPSApp 对象

CMFCCLIPSApp theApp;


// CMFCCLIPSApp 初始化

BOOL CMFCCLIPSApp::InitInstance（）
{
	// 如果一个运行在 Windows XP 上的应用程序清单指定要
	// 使用 ComCtl32.dll 版本 6 或更高版本来启用可视化方式，
	//则需要 InitCommonControlsEx（）。  否则，将无法创建窗口。
	INITCOMMONCONTROLSEX InitCtrls;
	InitCtrls.dwSize = sizeof（InitCtrls）;
	// 将它设置为包括所有要在应用程序中使用的
	// 公共控件类。
	InitCtrls.dwICC = ICC_WIN95_CLASSES;
	InitCommonControlsEx（&InitCtrls）;

	CWinApp::InitInstance（）;


	AfxEnableControlContainer（）;

	// 创建 shell 管理器，以防对话框包含
	// 任何 shell 树视图控件或 shell 列表视图控件。
	CShellManager *pShellManager = new CShellManager;

	// 激活“Windows Native”视觉管理器，以便在 MFC 控件中启用主题
	CMFCVisualManager::SetDefaultManager（RUNTIME_CLASS（CMFCVisualManagerWindows））;

	// 标准初始化
	// 如果未使用这些功能并希望减小
	// 最终可执行文件的大小，则应移除下列
	// 不需要的特定初始化例程
	// 更改用于存储设置的注册表项
	// TODO: 应适当修改该字符串，
	// 例如修改为公司或组织名
	SetRegistryKey（_T（“应用程序向导生成的本地应用程序“））;

	CMFCCLIPSDlg dlg;
	m_pMainWnd = &dlg;
	INT_PTR nResponse = dlg.DoModal（）;
	if （nResponse == IDOK）
	{
		// TODO: 在此放置处理何时用
		//  “确定”来关闭对话框的代码
	}
	else if （nResponse == IDCANCEL）
	{
		// TODO: 在此放置处理何时用
		//  “取消”来关闭对话框的代码
	}
	else if （nResponse == -1）
	{
		TRACE（traceAppMsg 0 “警告: 对话框创建失败，应用程序将意外终止。\n“）;
		TRACE（traceAppMsg 0 “警告: 如果您在对话框上使用 MFC 控件，则无法 #define _AFX_NO_MFC_CONTROLS_IN_DIALOGS。\n“）;
	}

	// 删除上面创建的 shell 管理器。
	if （pShellManager != NULL）
	{
		delete pShellManager;
	}

	// 由于对话框已关闭，所以将返回 FALSE 以便退出应用程序，
	//  而不是启动应用程序的消息泵。
	return FALSE;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2017-03-17 17:36  MFCCLIPS\
     目录           0  2017-03-16 11:27  MFCCLIPS\.vs\
     目录           0  2017-03-16 11:27  MFCCLIPS\.vs\MFCCLIPS\
     目录           0  2017-03-16 11:27  MFCCLIPS\.vs\MFCCLIPS\v14\
     文件       41472  2017-03-17 17:35  MFCCLIPS\.vs\MFCCLIPS\v14\.suo
     目录           0  2017-03-17 17:36  MFCCLIPS\MFCCLIPS\
     文件        1306  2017-03-16 11:27  MFCCLIPS\MFCCLIPS.sln
     文件        8306  2017-03-16 15:33  MFCCLIPS\MFCCLIPS\clipscpp.h
     文件      108548  2017-03-16 11:31  MFCCLIPS\MFCCLIPS\MFCCLIPS.APS
     文件        2396  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\MFCCLIPS.cpp
     文件         455  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\MFCCLIPS.h
     文件       10948  2017-03-16 11:31  MFCCLIPS\MFCCLIPS\MFCCLIPS.rc
     文件       10892  2017-03-17 09:21  MFCCLIPS\MFCCLIPS\MFCCLIPS.vcxproj
     文件        2144  2017-03-17 09:21  MFCCLIPS\MFCCLIPS\MFCCLIPS.vcxproj.filters
     文件        3717  2017-03-17 11:43  MFCCLIPS\MFCCLIPS\MFCCLIPSDlg.cpp
     文件        1062  2017-03-17 10:05  MFCCLIPS\MFCCLIPS\MFCCLIPSDlg.h
     文件         462  2017-03-16 16:32  MFCCLIPS\MFCCLIPS\myCLIPSRouter.cpp
     文件         313  2017-03-16 16:29  MFCCLIPS\MFCCLIPS\myCLIPSRouter.h
     文件        4055  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\ReadMe.txt
     目录           0  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\res\
     文件        1326  2017-03-16 11:31  MFCCLIPS\MFCCLIPS\resource.h
     文件       67777  2015-07-06 21:54  MFCCLIPS\MFCCLIPS\res\MFCCLIPS.ico
     文件         672  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\res\MFCCLIPS.rc2
     文件         141  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\stdafx.cpp
     文件        1578  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\stdafx.h
     文件         240  2017-03-16 11:27  MFCCLIPS\MFCCLIPS\targetver.h