dialog_resource.cpp

< Visual C+++SQL Server数据库开发与实例>>一书中的实例核心源程序提供了几个案例的编程源代码。

// DIALOG_RESOURCE.cpp : implementation file
//

#include "stdafx.h"
#include "train.h"
#include "DIALOG_RESOURCE.h"
#include "ResourceInfo.h"
#include "ResourceSet.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CDIALOG_RESOURCE dialog


CDIALOG_RESOURCE::CDIALOG_RESOURCE(CWnd* pParent /*=NULL*/)
	: CDialog(CDIALOG_RESOURCE::IDD, pParent)
{
	//{{AFX_DATA_INIT(CDIALOG_RESOURCE)
		// NOTE: the ClassWizard will add member initialization here
	//}}AFX_DATA_INIT
}


void CDIALOG_RESOURCE::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CDIALOG_RESOURCE)
	DDX_Control(pDX, IDC_LIST1, m_content);
	//}}AFX_DATA_MAP
}


BEGIN_MESSAGE_MAP(CDIALOG_RESOURCE, CDialog)
	//{{AFX_MSG_MAP(CDIALOG_RESOURCE)
	ON_BN_CLICKED(IDC_BUTTONADD, OnButtonadd)
	ON_BN_CLICKED(IDC_BUTTONDEL, OnButtondel)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CDIALOG_RESOURCE message handlers

void CDIALOG_RESOURCE::OnButtonadd() 
{
	// TODO: Add your control notification handler code here
	CResourceInfo m_resourceinfo;
	if(m_database.IsOpen())
		m_database.Close();
	m_resourceinfo.m_database.Open(_T("train"));
	m_resourceinfo.DoModal();
	RefreshData();
}

BOOL CDIALOG_RESOURCE::OnInitDialog() 
{
	CDialog::OnInitDialog();
	m_content.InsertColumn(0,"资源代号");
	m_content.InsertColumn(1,"资源名称");
	m_content.InsertColumn(2,"资源状态标记");
	m_content.InsertColumn(3,"资源价钱");
	m_content.InsertColumn(4,"资源数量");
	m_content.InsertColumn(5,"资源备注");
	RECT rect;
	m_content.GetWindowRect(&rect);
	int wid = rect.right - rect.left;
	m_content.SetColumnWidth(0,wid/8);
	m_content.SetColumnWidth(1,wid*3/16);
	m_content.SetColumnWidth(2,wid/8);
	m_content.SetColumnWidth(3,wid*3/16);
	m_content.SetColumnWidth(4,wid/8);
	m_content.SetColumnWidth(5,wid/4);
	m_content.SetExtendedStyle(LVS_EX_FULLROWSELECT);
	RefreshData();


	// TODO: Add extra initialization here
	
	return TRUE;  // return TRUE unless you set the focus to a control
	              // EXCEPTION: OCX Property Pages should return FALSE
}

void CDIALOG_RESOURCE::RefreshData()
{
	if(!m_database.IsOpen()){
		m_database.Open(_T("train"));
	}
	m_content.DeleteAllItems();
	CResourceSet m_recordset(&m_database);
	CString strSQL;
	strSQL.Format("select * from TM_RESOURCE");
	m_recordset.Open(AFX_DB_USE_DEFAULT_TYPE,strSQL);
	CDBVariant varValue;
	if(m_recordset.GetRecordCount()!=0) m_recordset.MoveFirst();
	char buf[20];
	int i=0;
	CString strTemp;
	while(!m_recordset.IsEOF())
	{
		int temp=0;
		m_recordset.GetFieldValue(temp,varValue);
		sprintf(buf,"%d",varValue.m_iVal); m_content.InsertItem(i,buf);

		m_recordset.GetFieldValue(1,strTemp);
		m_content.SetItemText(i,1,strTemp);

		m_recordset.GetFieldValue(2,varValue);
		sprintf(buf,"%d",varValue.m_chVal); m_content.SetItemText(i,2,buf);

		m_recordset.GetFieldValue(3,varValue);
		sprintf(buf,"%f",varValue.m_dblVal); m_content.SetItemText(i,3,buf);

		m_recordset.GetFieldValue(4,varValue);
		sprintf(buf,"%d",varValue.m_iVal); m_content.SetItemText(i,4,buf);
		m_recordset.GetFieldValue(5,strTemp);
		m_content.SetItemText(i,5,strTemp);
		m_recordset.MoveNext();
		i++;
	}
}

void CDIALOG_RESOURCE::OnButtondel() 
{
	// TODO: Add your control notification handler code here
	int i=m_content.GetSelectionMark();
	CString strSQL;
	if(i==-1){
		MessageBox("please choose a record first!");
	}
	else{
		int keyid=atoi(m_content.GetItemText(i,0));
		strSQL.Format("delete from TM_RESOURCE where RESOURCE_ID=%d",keyid);
		m_database.ExecuteSQL(strSQL);
		m_database.Close();
		RefreshData();
	}
}

void CDIALOG_RESOURCE::OnCancel() 
{
	// TODO: Add extra cleanup here
	m_database.Close();
	CDialog::OnCancel();
}