bmpaccessdlg.cpp

在一些系统中

// BmpAccessDlg.cpp : implementation file
//

#include "stdafx.h"
#include "BmpAccess.h"
#include "BmpAccessDlg.h"

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

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CBmpAccessDlg dialog

CBmpAccessDlg::CBmpAccessDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CBmpAccessDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CBmpAccessDlg)
	m_id = _T("");
	m_name = _T("");
	m_sex = _T("");
	m_knowledge = _T("");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CBmpAccessDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CBmpAccessDlg)
	DDX_Control(pDX, IDC_LIST1, m_Grid);
	DDX_Control(pDX, IDC_PICTURESHOW, m_pictureshow);
	DDX_Control(pDX, IDC_PICTURE, m_picture);
	DDX_Text(pDX, IDC_EDIT1, m_id);
	DDX_Text(pDX, IDC_EDIT2, m_name);
	DDX_Text(pDX, IDC_EDIT3, m_sex);
	DDX_Text(pDX, IDC_EDIT4, m_knowledge);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CBmpAccessDlg, CDialog)
	//{{AFX_MSG_MAP(CBmpAccessDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTLIULAN, OnButliulan)
	ON_BN_CLICKED(IDC_BUTSHOW, OnButshow)
	ON_BN_CLICKED(IDC_BUTSAVE, OnButsave)
	ON_NOTIFY(NM_CLICK, IDC_LIST1, OnClickList1)
	ON_BN_CLICKED(IDC_BUTEXIT, OnButexit)
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CBmpAccessDlg message handlers

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

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	// TODO: Add extra initialization here
	::CoInitialize(NULL);
	try
	{
       m_pConnection.CreateInstance("ADODB.Connection");
	   CString strConnect="Provider=Microsoft.Jet.OLEDB.4.0;\
		   Data Source=./shujuku.mdb;Persist Security Info=False";
	   m_pConnection->Open((_bstr_t)strConnect,"","",adModeUnknown);
	}
	catch(_com_error e)
	{
		AfxMessageBox("数据库连接错误",0,0);
	}
	m_Grid.SetExtendedStyle(LVS_EX_FLATSB
		|LVS_EX_FULLROWSELECT
		|LVS_EX_HEADERDRAGDROP
		|LVS_EX_ONECLICKACTIVATE
		|LVS_EX_GRIDLINES);
	m_Grid.InsertColumn(0,"编号",LVCFMT_LEFT,100,0);
	m_Grid.InsertColumn(1,"姓名",LVCFMT_LEFT,100,1);
	m_Grid.InsertColumn(2,"性别",LVCFMT_LEFT,100,2);
	m_Grid.InsertColumn(3,"学历",LVCFMT_LEFT,100,3);
	AddToGrid();
	m_bExpand=FALSE;
	CRect rcDlg, rcMarker;
	GetWindowRect(rcDlg);
	m_nExpandedHeight = rcDlg.Height();
	GetDlgItem(IDC_COMPART)->GetWindowRect(rcMarker);
	m_nNormalHeight = (rcMarker.top - rcDlg.top);
	Display();
	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CBmpAccessDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CBmpAccessDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		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;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
	if (m_hbitmap != NULL)
	{
		CDC* pDC = m_picture.GetDC();
		CRect r;
		m_picture.GetClientRect(&r);
		//将位图选进设备场景中
		CDC memdc;	
		memdc.CreateCompatibleDC( pDC );
		memdc.SelectObject(m_hbitmap);
		BITMAP bmp;
		GetObject(m_hbitmap,sizeof(bmp),&bmp);
		pDC->StretchBlt(r.left,r.top,r.Width(),r.Height(),&memdc,0,0,
				bmp.bmWidth,bmp.bmHeight,SRCCOPY);	
		memdc.DeleteDC();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CBmpAccessDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CBmpAccessDlg::OnButliulan() 
{
	// TODO: Add your control notification handler code here
	CFileDialog m_dialog (true,"bmp",NULL,OFN_HIDEREADONLY | OFN_OVERWRITEPROMPT,
		"位图文件(*.bmp)|*.bmp",this);
	if (m_dialog.DoModal()==IDOK)
	{
		//取得图片的完整路径
		strText = m_dialog.GetPathName();
		m_hbitmap=(HBITMAP)::LoadImage(AfxGetInstanceHandle(),strText,IMAGE_BITMAP,
			0,0,LR_LOADFROMFILE|LR_DEFAULTCOLOR|LR_DEFAULTSIZE);
		if (m_hbitmap != NULL)
		{
			//在控件上绘制图片
			CDC* pDC = m_picture.GetDC();
			CRect r;
			m_picture.GetClientRect(&r);
			//将位图选进设备场景中
			CDC memdc;	
			memdc.CreateCompatibleDC( pDC );
			memdc.SelectObject(m_hbitmap);
			BITMAP bmp;
			GetObject(m_hbitmap,sizeof(bmp),&bmp);
			pDC->StretchBlt(r.left,r.top,r.Width(),r.Height(),&memdc,0,0,
					bmp.bmWidth,bmp.bmHeight,SRCCOPY);	
			memdc.DeleteDC();
		}
	}
}

void CBmpAccessDlg::Display()
{
	CRect rcDlg;
	GetWindowRect(rcDlg);
	if (m_bExpand)
	{
		rcDlg.SetRect( rcDlg.left, rcDlg.top, 
		rcDlg.left + rcDlg.Width(),
		rcDlg.top + m_nExpandedHeight);
	}
	else
	{
		rcDlg.SetRect(rcDlg.left, rcDlg.top, 
		rcDlg.left + rcDlg.Width(),
		rcDlg.top + m_nNormalHeight);
	}
	MoveWindow(rcDlg, TRUE);
}

void CBmpAccessDlg::OnButshow() 
{
	// TODO: Add your control notification handler code here
	m_bExpand = !m_bExpand;
	Display();
}

void CBmpAccessDlg::OnButsave() 
{
	// TODO: Add your control notification handler code here
	UpdateData(TRUE);
	if ((m_id.IsEmpty() || m_name.IsEmpty() || m_sex.IsEmpty() || m_knowledge.IsEmpty()))
	{
		MessageBox("基础信息不能为空.","提示");
		return;
	}
	HBITMAP m_hbitmap;
	if (m_hbitmap == NULL)
	{
		MessageBox("请从磁盘中加载图片信息.","提示");
		return;
	}
	m_pRecordset.CreateInstance(__uuidof(Recordset));
	m_pRecordset->Open("select * from picture",m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
	try
	{
		m_pRecordset->AddNew();//添加新行
		VARIANT	 m_bitdata;
		CFile m_file (strText,CFile::modeRead);
		DWORD m_filelen = m_file.GetLength()+1;
		char * m_bitbuffer = new char[m_filelen];
		m_file.ReadHuge(m_bitbuffer,m_filelen);
		m_file.Close();
		m_bitdata.vt= VT_ARRAY|VT_UI1;
		SAFEARRAY * m_psafe;
		SAFEARRAYBOUND m_band;
		m_band.cElements = m_filelen;
		m_band.lLbound = 0;
		m_psafe = SafeArrayCreate(VT_UI1,1,&m_band);
		for(long i=0; i < m_filelen ; i++)
		{
			SafeArrayPutElement(m_psafe,&i,m_bitbuffer++);
		}	
		m_bitdata.parray = m_psafe;
			
		m_pRecordset->GetFields()->GetItem("编号")->Value = (_bstr_t)m_id;
		m_pRecordset->GetFields()->GetItem("姓名")->Value = (_bstr_t)m_name;
		m_pRecordset->GetFields()->GetItem("性别")->Value = (_bstr_t)m_sex;
		m_pRecordset->GetFields()->GetItem("学历")->Value = (_bstr_t)m_knowledge;
		m_pRecordset->GetFields()->GetItem("照片")->AppendChunk(&m_bitdata);
		m_pRecordset->Update();
	}
	catch(...)
	{
		MessageBox("操作失败");
		return;
	}
	MessageBox("操作成功.");
	m_Grid.DeleteAllItems();
	AddToGrid();
}

void CBmpAccessDlg::AddToGrid()
{
	m_pRecordset.CreateInstance(__uuidof(Recordset));
	m_pRecordset->Open("select* from picture order by 编号 desc",m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
	while(!m_pRecordset->adoEOF)
	{
		m_Grid.InsertItem(0,"");
		m_Grid.SetItemText(0,0,(char*)(_bstr_t)m_pRecordset->GetCollect("编号"));
		m_Grid.SetItemText(0,1,(char*)(_bstr_t)m_pRecordset->GetCollect("姓名"));
		m_Grid.SetItemText(0,2,(char*)(_bstr_t)m_pRecordset->GetCollect("性别"));
		m_Grid.SetItemText(0,3,(char*)(_bstr_t)m_pRecordset->GetCollect("学历"));
		m_pRecordset->MoveNext();
	}
}

void CBmpAccessDlg::OnClickList1(NMHDR* pNMHDR, LRESULT* pResult) 
{
	// TODO: Add your control notification handler code here
	int pos;
	pos=m_Grid.GetSelectionMark();
	m_id=m_Grid.GetItemText(pos,0);
	CString sql;
	sql.Format("select*from picture where 编号='%s'",m_id);
	m_pRecordset.CreateInstance(__uuidof(Recordset));
	m_pRecordset->Open((_bstr_t)sql,m_pConnection.GetInterfacePtr(),adOpenDynamic,adLockOptimistic,adCmdText);
	HBITMAP m_hBitmap;
	//读取图像字段的实际大小
	long lDataSize = m_pRecordset->GetFields()->GetItem("照片")->ActualSize;
	char *m_pBuffer;  //定义缓冲变量
	if(lDataSize > 0)
	{
		//从图像字段中读取数据到varBLOB中
		_variant_t varBLOB;
		varBLOB = m_pRecordset->GetFields()->GetItem("照片")->GetChunk(lDataSize);
		if(varBLOB.vt == (VT_ARRAY | VT_UI1))
		{
			if(m_pBuffer = new char[lDataSize+1])	//分配必要的存储空间
			{	
				char *pBuf = NULL;
				SafeArrayAccessData(varBLOB.parray,(void **)&pBuf);
				memcpy(m_pBuffer,pBuf,lDataSize); //复制数据到缓冲区m_pBuffer
				SafeArrayUnaccessData (varBLOB.parray);
			
				//将数据转换为HBITMAP格式
				LPSTR hDIB;
				LPVOID lpDIBBits;
				BITMAPFILEHEADER bmfHeader;  //用于保存BMP文件头信息，包括类型、大小、位移量等
				DWORD bmfHeaderLen;  //保存文件头的长度
				bmfHeaderLen = sizeof(bmfHeader);  //读取文件头的长度
				//将m_pBuffer中文件头复制到bmfHeader中
				strncpy((LPSTR)&bmfHeader, (LPSTR)m_pBuffer, bmfHeaderLen); 	
				if (bmfHeader.bfType != (*(WORD*)"BM"))   //如果文件类型不对，则返回
				{
					MessageBox("BMP文件格式不准确");
					return;
				}
				hDIB = m_pBuffer + bmfHeaderLen;  //将指针移至文件头后面
				//读取BMP文件的图像数据，包括坐标及颜色格式等信息到BITMAPINFOHEADER对象
				BITMAPINFOHEADER &bmiHeader = *(LPBITMAPINFOHEADER)hDIB;
				//读取BMP文件的图像数据，包括坐标及颜色格式等信息到BITMAPINFO对象
				BITMAPINFO &bmInfo = *(LPBITMAPINFO)hDIB ;
				//根据bfOffBits属性将指针移至文件头后
				lpDIBBits = (m_pBuffer) + ((BITMAPFILEHEADER *)m_pBuffer)->bfOffBits;
				CClientDC dc(this);  //生成一个与当前窗口相关的CClientDC，用于管理输出设置
				//生成DIBitmap数据
				m_hBitmap = CreateDIBitmap(dc.m_hDC,&bmiHeader,CBM_INIT,lpDIBBits,&bmInfo,DIB_RGB_COLORS);
			}
		}
	}
	if(m_hBitmap != NULL)
	{
		CDC* pDC = m_pictureshow.GetDC();
		CRect r;
		m_pictureshow.GetClientRect(&r);
		//将位图选进设备场景中
		CDC memdc;	
		memdc.CreateCompatibleDC( pDC );
		memdc.SelectObject(m_hBitmap);
		BITMAP bmp;
		GetObject(m_hBitmap,sizeof(bmp),&bmp);
		pDC->StretchBlt(r.left,r.top,r.Width(),r.Height(),&memdc,0,0,
				bmp.bmWidth,bmp.bmHeight,SRCCOPY);	
		memdc.DeleteDC();
	}
	*pResult = 0;
}

void CBmpAccessDlg::OnButexit() 
{
	CDialog::OnCancel();
}