VC+＋编写的组态软件源代码

使用VC++6.0完成的组态软件，包含完整源代码。

//
//******************************************
//模块功能:显示位图文件程序
//设计者:张新民
//设计时间:1998/10/12
//最后修改时间:1998/10/13
//*******************************************
//*******************************************
//

#include “stdafx.h“
#include 
#include 
#include “dibapi.h“

    HDIB m_hDIB;
	CPalette* m_palDIB;
	CSize m_sizeDoc;

//////////////////////////////////////////////


void InitDIBData（）
{
	if （m_palDIB != NULL）
	{
		delete m_palDIB;
		m_palDIB = NULL;
	}
	if （m_hDIB == NULL）
	{
		return;
	}
	// Set up document size
	LPSTR lpDIB = （LPSTR） ::GlobalLock（（HGLOBAL） m_hDIB）;
	if （::DIBWidth（lpDIB） > INT_MAX ||::DIBHeight（lpDIB） > INT_MAX）
	{
		::GlobalUnlock（（HGLOBAL） m_hDIB）;
		::GlobalFree（（HGLOBAL） m_hDIB）;
		m_hDIB = NULL;
			
		MessageBox（NULL “不能初始化模板!“ NULL MB_ICONINFORMATION | MB_OK）;
		return;
	}
	m_sizeDoc = CSize（（int） ::DIBWidth（lpDIB） （int） ::DIBHeight（lpDIB））;
	::GlobalUnlock（（HGLOBAL） m_hDIB）;
	// Create copy of palette
	m_palDIB = new CPalette;
	if （m_palDIB == NULL）
	{
		// we must be really low on memory
		::GlobalFree（（HGLOBAL） m_hDIB）;
		m_hDIB = NULL;
		return;
	}
	if （::CreateDIBPalette（m_hDIB m_palDIB） == NULL）
	{
		// DIB may not have a palette
		delete m_palDIB;
		m_palDIB = NULL;
		return;
	}
	return;
}


//***********************************************
//函数功能:在当前HDC上在指定区域绘制一个位图文件
//hdc 为dc.m_hDC调用
//lprect:当前显示位图RECT指针
//lpfile:显示位图文件名称
//************************************************

VOID WINAPI dbmp（HDC hdcLPRECT lprectLPSTR lpfile ）
{
	CFile file;
	CFileException fe;
	if （!file.Open（lpfile CFile::modeRead | CFile::shareDenyWrite &fe））
			return ;
	
	//DeleteContents（）;

	// replace calls to Serialize with ReadDIBFile function
	TRY
	{
		m_hDIB = ::ReadDIBFile（file）;
	}
	CATCH （CFileException eLoad）
	{
		file.Abort（）; // will not throw an exception
		m_hDIB = NULL;
		return ;
	}
	END_CATCH

	InitDIBData（）;

	if （m_hDIB == NULL）
	{
		// may not be DIB format
		
		MessageBox（NULL “错误!“ NULL MB_ICONINFORMATION | MB_OK）;
		return ;
	}

		if （m_hDIB != NULL）
	{
		LPSTR lpDIB = （LPSTR） ::GlobalLock（（HGLOBAL） m_hDIB）;
		int cxDIB = （int） ::DIBWidth（lpDIB）;         // Size of DIB - x
		int cyDIB = （int） ::DIBHeight（lpDIB）;        // Size of DIB - y
		::GlobalUnlock（（HGLOBAL） m_hDIB）;
		CRect rcDIB;
		rcDIB.top = rcDIB.left = 0;
		rcDIB.right = cxDIB;
		rcDIB.bottom = cyDIB;
		
	
		::PaintDIB（hdc lprect m_hDIB
			&rcDIB m_palDIB）;
	}
  ::GlobalFree（（HGLOBAL）m_hDIB）;

	return ;
}

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----
     目录           0  2012-05-09 15:23  组态\
     文件         432  2012-04-12 11:53  组态\1.mpj
     文件         328  2012-04-12 11:54  组态\1112.mpj
     文件         644  2012-04-12 11:59  组态\3333.mpj
     文件         688  2009-08-01 09:15  组态\3434.mpj
     文件        2678  1999-08-03 07:23  组态\Bmp.cpp
     文件        1735  1999-07-09 08:20  组态\ChildFrm.cpp
     文件        1311  1999-06-17 08:20  组态\ChildFrm.h
     文件        2411  1999-09-02 02:37  组态\CISBitmap.cpp
     文件         809  1999-08-25 08:31  组态\CISBitmap.h
     文件         777  1999-07-09 04:08  组态\cmytreectrl.cpp
     文件        1167  1999-07-06 00:58  组态\cmytreectrl.h
     文件       18277  2001-04-24 22:28  组态\ColorPickerDlg.cpp
     文件        2472  1999-12-13 00:16  组态\ColorPickerDlg.h
     文件        4356  1999-08-01 07:17  组态\Common.cpp
     文件         959  1999-08-01 07:18  组态\Common.h
     文件        7761  2000-09-29 14:46  组态\Data.h
     文件       10092  2000-01-11 01:30  组态\dataconfig.cpp
     文件        1644  1999-07-13 03:29  组态\dataconfig.h
     文件        6828  2001-05-12 02:16  组态\dataunit.cpp
     文件        1487  1999-07-10 08:39  组态\dataunit.h
     目录           0  2012-05-09 15:23  组态\Debug\
     文件       12299  2012-04-12 11:51  组态\Debug\Bmp.obj
     文件       15977  2012-04-12 11:51  组态\Debug\ChildFrm.obj
     文件        9321  2012-04-12 11:51  组态\Debug\CISBitmap.obj
     文件        9398  2012-04-12 11:51  组态\Debug\cmytreectrl.obj
     文件       63058  2012-04-12 11:51  组态\Debug\ColorPickerDlg.obj
     文件       13682  2012-04-12 11:51  组态\Debug\Common.obj
     文件       34526  2012-04-12 11:51  组态\Debug\dataconfig.obj
     文件       33837  2012-04-12 11:51  组态\Debug\dataunit.obj
     文件       26220  2012-04-12 11:51  组态\Debug\devset.obj
............此处省略189个文件信息