out.cpp

snl语言是一个简单的具有嵌套过程定义的过程式语言

// out.cpp : implementation file
//

#include "stdafx.h"
#include "face.h"
#include "out.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// Cout dialog


Cout::Cout(CWnd* pParent /*=NULL*/)
	: CDialog(Cout::IDD, pParent)
{
	    tagVARIANT test;
	test.vt=VT_ERROR|VT_EMPTY;
	this->m_textout.LoadFile("c:\\result.txt",test);
    UpdateData(false);	
	//{{AFX_DATA_INIT(Cout)
	//}}AFX_DATA_INIT
}


void Cout::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(Cout)
	DDX_Control(pDX, IDC_RICHTEXTCTRL1, m_textout);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(Cout, CDialog)
	//{{AFX_MSG_MAP(Cout)
		// NOTE: the ClassWizard will add message map macros here
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// Cout message handlers

BEGIN_EVENTSINK_MAP(Cout, CDialog)
    //{{AFX_EVENTSINK_MAP(Cout)
	ON_EVENT(Cout, IDC_RICHTEXTCTRL1, 1 /* Change */, OnChangeRichtextctrl1, VTS_NONE)
	ON_EVENT(Cout, IDC_RICHTEXTCTRL1, -600 /* Click */, OnClickRichtextctrl1, VTS_NONE)
	ON_EVENT(Cout, IDC_RICHTEXTCTRL1, -605 /* MouseDown */, OnMouseDownRichtextctrl1, VTS_I2 VTS_I2 VTS_I4 VTS_I4)
	ON_EVENT(Cout, IDC_RICHTEXTCTRL1, 2 /* SelChange */, OnSelChangeRichtextctrl1, VTS_NONE)
	//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

void Cout::OnChangeRichtextctrl1() 
{
    tagVARIANT test;
	test.vt=VT_ERROR|VT_EMPTY;
	this->m_textout.LoadFile("c:\\result.txt",test);		
}

void Cout::OnClickRichtextctrl1() 
{
    tagVARIANT test;
	test.vt=VT_ERROR|VT_EMPTY;
	this->m_textout.LoadFile("c:\\result.txt",test);
    UpdateData(false);
}

void Cout::OnMouseDownRichtextctrl1(short Button, short Shift, long x, long y) 
{
    tagVARIANT test;
	test.vt=VT_ERROR|VT_EMPTY;
	this->m_textout.LoadFile("c:\\result.txt",test);
    UpdateData(false);
}

void Cout::OnSelChangeRichtextctrl1() 
{
    tagVARIANT test;
	test.vt=VT_ERROR|VT_EMPTY;
	this->m_textout.LoadFile("c:\\result.txt",test);
    UpdateData(false);	
}