usedlg.cpp

Thinkinc++English 电子书籍,英文版

// UseDlg.cpp : 实现文件
//

#include "stdafx.h"
#include "Use.h"
#include "UseDlg.h"
#include ".\usedlg.h"
#include <atlbase.h>

#ifdef _DEBUG
#define new DEBUG_NEW
#endif


// CUseDlg 对话框

LPCOLESTR lpwFileName = L"c:\\prime.stg";
LPCOLESTR lpwStreamName = L"persist";

CUseDlg::CUseDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CUseDlg::IDD, pParent)
{
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CUseDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
}

BEGIN_MESSAGE_MAP(CUseDlg, CDialog)
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	//}}AFX_MSG_MAP
	ON_BN_CLICKED(IDC_NEW, OnBnClickedNew)
	ON_BN_CLICKED(IDC_CONTINUE, OnBnClickedContinue)
	ON_BN_CLICKED(IDC_NEXT, OnBnClickedNext)
	ON_BN_CLICKED(IDCANCEL, OnBnClickedCancel)
END_MESSAGE_MAP()


// CUseDlg 消息处理程序

BOOL CUseDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// 设置此对话框的图标。当应用程序主窗口不是对话框时，框架将自动
	//  执行此操作
	SetIcon(m_hIcon, TRUE);			// 设置大图标
	SetIcon(m_hIcon, FALSE);		// 设置小图标

	// TODO: 在此添加额外的初始化代码
	GetDlgItem( IDC_NEXT )->EnableWindow( FALSE );

	HRESULT hr = m_spPrime.CreateInstance( _T("Simple17.Prime") );
	if( FAILED( hr ) )
	{
		AfxMessageBox( _T("注册了否？初始化了否？") );
		m_spPrime.Release();
		return TRUE;
	}

	CComQIPtr < IPersistStreamInit > spPSI;
	spPSI = m_spPrime;
	if( !spPSI )
	{
		AfxMessageBox( _T("没有找到持续性接口") );
		m_spPrime.Release();
	}

	return TRUE;  // 除非设置了控件的焦点，否则返回 TRUE
}

// 如果向对话框添加最小化按钮，则需要下面的代码
//  来绘制该图标。对于使用文档/视图模型的 MFC 应用程序，
//  这将由框架自动完成。

void CUseDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // 用于绘制的设备上下文

		SendMessage(WM_ICONERASEBKGND, reinterpret_cast<WPARAM>(dc.GetSafeHdc()), 0);

		// 使图标在工作矩形中居中
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// 绘制图标
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

//当用户拖动最小化窗口时系统调用此函数取得光标显示。
HCURSOR CUseDlg::OnQueryDragIcon()
{
	return static_cast<HCURSOR>(m_hIcon);
}

void CUseDlg::OnBnClickedNew()
{
	CComPtr < IStorage > spStorage;
	CComPtr < IStream > spStream;

	HRESULT hr = ::StgCreateDocfile(
		lpwFileName,
		STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE,
		0,
		&spStorage );
	if( FAILED( hr ) )
	{
		AfxMessageBox( _T("不能建立复合文件") );
		return;
	}
	hr = spStorage->CreateStream(
		lpwStreamName,
		STGM_CREATE | STGM_WRITE | STGM_SHARE_EXCLUSIVE,
		0,
		0,
		&spStream );
	if( FAILED( hr ) )
	{
		AfxMessageBox( _T("不能建立流") );
		return;
	}

	CComQIPtr < IPersistStreamInit > spPSI;
	spPSI = m_spPrime;
	if( !spPSI )
		AfxMessageBox( _T("组件没有提供持续性接口") );
	else
	{
		spPSI->InitNew();
		GetDlgItem( IDC_NEXT )->EnableWindow( TRUE );
	}
}

void CUseDlg::OnBnClickedContinue()
{
	CComPtr < IStorage > spStorage;
	CComPtr < IStream > spStream;

	HRESULT hr = ::StgOpenStorage(
		lpwFileName,
		NULL,
		STGM_READ | STGM_SHARE_EXCLUSIVE,
		NULL,
		0,
		&spStorage );
	if( FAILED( hr ) )
	{
		AfxMessageBox( _T("不能打开复合文件") );
		return;
	}

	spStorage->OpenStream(
		lpwStreamName,
		NULL,
		STGM_READ | STGM_SHARE_EXCLUSIVE,
		0,
		&spStream );
	if( FAILED( hr ) )
	{
		AfxMessageBox( _T("不能打开流读写") );
		return;
	}

	CComQIPtr < IPersistStreamInit > spPSI;
	spPSI = m_spPrime;
	if( !spPSI )
		AfxMessageBox( _T("组件没有提供持续性接口") );
	else
	{
		spPSI->Load( spStream );
		GetDlgItem( IDC_NEXT )->EnableWindow( TRUE );
	}
}

void CUseDlg::OnBnClickedNext()
{
	long nPrime = m_spPrime->GetNext();
	SetDlgItemInt( IDC_PRIME, nPrime );
}

void CUseDlg::OnBnClickedCancel()
{
	if( m_spPrime )
	{
		// 这里本应该取得 IPersistStreamInt 指针，但我们的处理却是
		// 取得 IPersistStream 指针，无所谓啦，反正 IPersistStreamInit
		// 指针是从 IPersistStream 继承来的，而且我们这里也不需要调用
		// IPersistStreamInit::InitNew() 函数
		CComQIPtr < IPersistStream > spPS;
		spPS = m_spPrime;

		HRESULT hr = spPS->IsDirty();
		if( S_OK == hr )	// 数据已经改变，则需要保存
		{
			CComPtr < IStorage > spStorage;
			CComPtr < IStream > spStream;

			hr = ::StgOpenStorage(
				lpwFileName,
				NULL,
				STGM_READWRITE | STGM_SHARE_EXCLUSIVE,
				NULL,
				0,
				&spStorage );
			if( SUCCEEDED( hr ) )
			{
				spStorage->OpenStream(
					lpwStreamName,
					NULL,
					STGM_WRITE | STGM_SHARE_EXCLUSIVE,
					0,
					&spStream );
				if( SUCCEEDED( hr ) )
					spPS->Save( spStream, TRUE );
			}
		}
	}
	OnCancel();
}