apimemory.txt

内存监视器

#include <windows.h>
#include <stdio.h>
#include <stdlib.h>

HPEN pen[3];
HBRUSH	hbrush;
POINT	RecordCurvePoint[326];
bool	RecotrCurveFlag = 0;
int		RecotrCurveIndex = 325;
int   cxChar=LOWORD (GetDialogBaseUnits ());
int   cyChar=HIWORD (GetDialogBaseUnits ());
char	*pch[12]=
{
	"单位",
	"当前内存使用情况",
	"内存使用记录",
	"兆字节(MB)",
	"千字节(KB)",
	"字节(Byte)",
	"内存总数",
	"Static",
	"空闲内存",
	"Static",
	"页面文件",
	"Static"
};

void defPen()
{
	pen[0] = (HPEN)CreatePen(0,1,RGB(255,0,0));
	pen[1] = (HPEN)CreatePen(0,1,RGB(10,200,50));
	pen[2] = (HPEN)CreatePen(0,1,RGB(0,0,255));
	hbrush = CreateSolidBrush(RGB(50,50,50));
}

LRESULT CALLBACK WindowProc(
  HWND hwnd,      // handle to window
  UINT uMsg,      // message identifier
  WPARAM wParam,  // first message parameter
  LPARAM lParam   // second message parameter
);


int WINAPI WinMain(
  HINSTANCE hInstance,  // handle to current instance
  HINSTANCE hPrevInstance,  // handle to previous instance
  LPSTR lpCmdLine,      // pointer to command line
  int nCmdShow          // show state of window
)
{
	WNDCLASS WndCls;
	WndCls.cbClsExtra = 0;
	WndCls.cbWndExtra = 0;
	WndCls.hbrBackground = (HBRUSH)GetStockObject(COLOR_BTNFACE + 1);//WHITE_BRUSH
	WndCls.hCursor = LoadCursor(NULL,IDC_ARROW);
	WndCls.hIcon = LoadIcon(NULL, IDI_APPLICATION);
	WndCls.lpfnWndProc = WindowProc;
	WndCls.hInstance = hInstance;
	WndCls.lpszClassName = "Memory";
	WndCls.lpszMenuName = NULL;
	WndCls.style = CS_HREDRAW | CS_VREDRAW;
	if(!RegisterClass(&WndCls))
	{
		::MessageBox(NULL, "注册窗口失败!", "提示框", MB_OK);
		return 0;
	}

	HWND hwnd = CreateWindow("Memory",
				"内存状态查看器",
				WS_OVERLAPPEDWINDOW & ~WS_MAXIMIZEBOX & ~WS_OVERLAPPED & ~WS_THICKFRAME,//禁止最大化
				CW_USEDEFAULT,
				CW_USEDEFAULT,
				350,
				430,
				NULL,
				NULL,
				hInstance,
				NULL);
	ShowWindow(hwnd, SW_SHOWNORMAL);
	UpdateWindow(hwnd);

	MSG	msg;
	while(GetMessage(&msg, NULL, 0, 0))
	{
		TranslateMessage(&msg);
		DispatchMessage(&msg);
	}

	return 0;
}

LRESULT CALLBACK WindowProc(
  HWND hwnd,      // handle to window
  UINT uMsg,      // message identifier
  WPARAM wParam,  // first message parameter
  LPARAM lParam   // second message parameter
)
{
	RECT WndRect;
	POINT point[2];
	HDC hdc;
	HPEN	hOldPen;
	MEMORYSTATUS MemInfo;
	unsigned long mem[3];
	char ch[30];
	char ch_kk[6] = {"(MB)"};
	static int	 flag = 1;
	static HWND hBtnWnd[13];
	static int m_offset = 1;//竖直网格线的偏移量
	int i;
	int BtnHeight = 13 * cyChar / 4, BtnWidth = 0, BtnDistance = 10;
	switch(uMsg)
	{
	case WM_CREATE:
		SetTimer(hwnd, 1, 500, NULL);//设置定时器
		defPen();//定义画笔
		//创建按纽
		for(i = 1; i < 4; i++)//创建3个组框
		{
			hBtnWnd[i-1] = CreateWindow(TEXT("button"), "单位",WS_CHILD | WS_VISIBLE |  BS_GROUPBOX ,
						cxChar-4,	BtnDistance,
						42 * cxChar, BtnHeight,
						hwnd, (HMENU) (i-1),
						((LPCREATESTRUCT) lParam)->hInstance, NULL) ;//BS_AUTORADIOBUTTON
			BtnDistance=BtnDistance + BtnHeight + 10;
			BtnHeight = (13 * cyChar) * 2*i / 4;
		}
		//创建三个单选按钮
		BtnDistance = cxChar;
		BtnWidth = 0;
		for(i = 0; i < 3; i++)
		{
			hBtnWnd[3+i] = CreateWindow(TEXT("button"), "兆字节(MB)",WS_CHILD | WS_VISIBLE | BS_AUTORADIOBUTTON | WS_BORDER,
						BtnDistance,	cyChar+16,
						13 * cxChar, 5 * cyChar / 4,
						hwnd, (HMENU) (3+i),
						((LPCREATESTRUCT) lParam)->hInstance, NULL) ;//BS_AUTORADIOBUTTON
			BtnWidth = 12 * cxChar;
			BtnDistance=BtnDistance + BtnWidth + 15;
		}
		//创建6个静态文本框
		GetWindowRect(hBtnWnd[1],&WndRect);
		point[0].x = WndRect.left;
		point[0].y = WndRect.top;
		ScreenToClient(hwnd, &point[0]);
		BtnHeight = 5 * cyChar / 4;
		BtnDistance = 20;
		for(i = 0; i < 3; i++)
		{
			hBtnWnd[6+i*2] = CreateWindow(TEXT("static"), "物理内存总数",WS_CHILD | WS_VISIBLE | WS_BORDER | SS_CENTER,
						point[0].x+5,point[0].y+BtnDistance,
						13 * cxChar, 5 * cyChar / 4,
						hwnd, (HMENU)(6+i*2),
						((LPCREATESTRUCT) lParam)->hInstance, NULL) ;
			hBtnWnd[6+i*2+1] = CreateWindow(TEXT("static"), "256",WS_CHILD | WS_VISIBLE | WS_BORDER | SS_RIGHT,
						point[0].x+115,point[0].y+BtnDistance,
						20 * cxChar+55, 5 * cyChar / 4,
						hwnd, (HMENU)(6+i*2+1),
						((LPCREATESTRUCT) lParam)->hInstance, NULL) ;
			BtnDistance  = BtnDistance + BtnHeight + 6;
		}
		//创建内存使用记录绘图框
		GetWindowRect(hBtnWnd[2],&WndRect);
		point[0].x = WndRect.left;
		point[0].y = WndRect.top;
		ScreenToClient(hwnd, &point[0]);
		hBtnWnd[12] = CreateWindow(TEXT("static"), "",WS_CHILD | WS_VISIBLE | WS_BORDER,
						point[0].x+5,point[0].y+20,
						325, 180,
						hwnd, (HMENU)(12),
						((LPCREATESTRUCT) lParam)->hInstance, NULL) ;
		//初始化子窗口文本及
		for(i = 0; i < 12; i++)
		{
			SetWindowText(hBtnWnd[i], pch[i]);
		}
		SendMessage(hBtnWnd[3], BM_SETCHECK, 1, 0) ;//让"MB"初始选中
		//设置静态文本框信息
		GlobalMemoryStatus(&MemInfo);//获取内存信息
		switch(flag)
		{
		case 1:
			mem[0] = MemInfo.dwTotalPhys/(1024*1024);
			mem[1] = MemInfo.dwAvailPhys/(1024*1024);
			mem[2] = MemInfo.dwTotalPageFile/(1024*1024);
			strcpy(ch_kk, "(MB)");
			break;
		case 2:
			mem[0] = MemInfo.dwTotalPhys/1024;
			mem[1] = MemInfo.dwAvailPhys/1024;
			mem[2] = MemInfo.dwTotalPageFile/1024;
			strcpy(ch_kk, "(KB)");
			break;
		case 3:
			mem[0] = MemInfo.dwTotalPhys;
			mem[1] = MemInfo.dwAvailPhys;
			mem[2] = MemInfo.dwTotalPageFile;
			strcpy(ch_kk, "(Byte)");
			break;
		}
		for(i = 0; i < 3; i++)
		{
			sprintf(ch, "%d%s", mem[i], ch_kk);
			SetWindowText(hBtnWnd[7+2*i], ch);
		}
		//初始化内存使用曲线的坐标点
		for(i = 0; i < 325; i++)
		{
			RecordCurvePoint[i].x = i;
			RecordCurvePoint[i].y = 0;
		}
		RecordCurvePoint[i].x = i;
		if(flag == 3)
		{
			mem[1] /= 1024;
			mem[0] /= 1024;
		}
		RecordCurvePoint[i].y = 180*mem[1]/mem[0];
		sprintf(ch, "%s%d", "当前内存使用情况%",100-100*mem[1]/mem[0]);
		SetWindowText(hBtnWnd[2], ch);
 		break;

	case WM_TIMER:
		m_offset += 1;
		GlobalMemoryStatus(&MemInfo);//获取内存信息
		switch(flag)
		{
		case 1:
			mem[0] = MemInfo.dwTotalPhys/(1024*1024);
			mem[1] = MemInfo.dwAvailPhys/(1024*1024);
			mem[2] = MemInfo.dwTotalPageFile/(1024*1024);
			strcpy(ch_kk, "(MB)");
			break;
		case 2:
			mem[0] = MemInfo.dwTotalPhys/1024;
			mem[1] = MemInfo.dwAvailPhys/1024;
			mem[2] = MemInfo.dwTotalPageFile/1024;
			strcpy(ch_kk, "(KB)");
			break;
		case 3:
			mem[0] = MemInfo.dwTotalPhys;
			mem[1] = MemInfo.dwAvailPhys;
			mem[2] = MemInfo.dwTotalPageFile;
			strcpy(ch_kk, "(Byte)");
			break;
		}
		for(i = 0; i < 3; i++)
		{
			sprintf(ch, "%d%s", mem[i], ch_kk);
			SetWindowText(hBtnWnd[7+2*i], ch);
		}

		hdc=GetDC(hwnd);
		//设置矩形背景
		GetWindowRect(hBtnWnd[12],&WndRect);
		point[0].x = WndRect.left;
		point[0].y = WndRect.top;
		point[1].x = WndRect.right;
		point[1].y = WndRect.bottom;
		ScreenToClient(hwnd, &point[0]);
		ScreenToClient(hwnd, &point[1]);
		WndRect.left = point[0].x;
		WndRect.top = point[0].y;
		WndRect.right = point[1].x;
		WndRect.bottom = point[1].y;
		FillRect(hdc, &WndRect, hbrush);

		//画网格线
		hOldPen = (HPEN)SelectObject(hdc, pen[1]);
		GetWindowRect(hBtnWnd[12],&WndRect);
		point[0].x = WndRect.left;
		point[0].y = WndRect.top;
		point[1].x = WndRect.right;
		point[1].y = WndRect.bottom;
		ScreenToClient(hwnd, &point[0]);
		ScreenToClient(hwnd, &point[1]);
		for(i = 0; i < 10; i++)
		{
			MoveToEx(hdc, point[0].x, point[0].y +(WndRect.bottom - WndRect.top)*i/10, NULL);
			LineTo(hdc, point[1].x, point[0].y + (WndRect.bottom - WndRect.top)*i/10);
		}
		if(m_offset >= 18)//两条网格线的间距为18
		{
			m_offset = m_offset % 18;
		}
		for(i = 1; i <= (WndRect.right-WndRect.left)*10/(WndRect.bottom - WndRect.top); i++)
		{
			MoveToEx(hdc, point[0].x + (WndRect.bottom - WndRect.top)*i/10 - m_offset, point[0].y ,NULL);
			LineTo(hdc, point[0].x + (WndRect.bottom - WndRect.top)*i/10 - m_offset, point[1].y);
		}
		SelectObject(hdc, hOldPen);
		
		//画记录曲线
		RecotrCurveIndex--;
		if(RecotrCurveIndex < 1)
		{
			RecotrCurveFlag = 1;
		}
		for(i = 0; i < 325; i++)
		{
			RecordCurvePoint[i].y = RecordCurvePoint[i+1].y;
		}
		if(flag == 3)
		{
			mem[1] /= 1024;
			mem[0] /= 1024;
		}
		RecordCurvePoint[i].y = 180*mem[1]/mem[0];
		sprintf(ch, "%s%d", "当前内存使用情况%",100-100*mem[1]/mem[0]);
		SetWindowText(hBtnWnd[2], ch);
		hOldPen = (HPEN)SelectObject(hdc, pen[0]);
		if(!RecotrCurveFlag)
		{
			for(i = RecotrCurveIndex; i < 325; i++)
			{
				point[0].x = WndRect.left+RecordCurvePoint[i].x-1;
				point[0].y = WndRect.top+RecordCurvePoint[i].y+1;
				point[1].x = WndRect.left+RecordCurvePoint[i+1].x-1;
				point[1].y = WndRect.top+RecordCurvePoint[i+1].y+1;
				ScreenToClient(hwnd, &point[0]);
				ScreenToClient(hwnd, &point[1]);
				SetPixel(hdc, point[0].x, point[0].y, RGB(255,0,0));
				MoveToEx(hdc, point[0].x, point[0].y, NULL);
				LineTo(hdc, point[1].x, point[1].y);
			}
		}
		else
		{
			for(i = 1; i < 325; i++)
			{
				point[0].x = WndRect.left+RecordCurvePoint[i].x-1;
				point[0].y = WndRect.top+RecordCurvePoint[i].y+1;
				point[1].x = WndRect.left+RecordCurvePoint[i+1].x-1;
				point[1].y = WndRect.top+RecordCurvePoint[i+1].y+1;
				ScreenToClient(hwnd, &point[0]);
				ScreenToClient(hwnd, &point[1]);
				SetPixel(hdc, point[0].x, point[0].y, RGB(255,0,0));
				MoveToEx(hdc, point[0].x, point[0].y, NULL);
				LineTo(hdc, point[1].x, point[1].y);
			}
		}
		SelectObject(hdc, hOldPen);
		ReleaseDC(hwnd,hdc);
		break;

	case WM_PAINT:
		PAINTSTRUCT ps;
		hdc=BeginPaint(hwnd,&ps);
		EndPaint(hwnd,&ps);
		break;

	case WM_CTLCOLORBTN:
		hdc = GetDC(hwnd);
		SetBkColor(hdc, RGB(255,0,255));
		ReleaseDC(hwnd,hdc);
        break ;

	case WM_COMMAND:
		if(HIWORD(wParam) == BN_CLICKED)
		{
			flag = LOWORD(wParam) - 2;
			//立即更新静态文本框内容
			GlobalMemoryStatus(&MemInfo);//获取内存信息
			switch(flag)
			{
			case 1:
				mem[0] = MemInfo.dwTotalPhys/(1024*1024);
				mem[1] = MemInfo.dwAvailPhys/(1024*1024);
				mem[2] = MemInfo.dwTotalPageFile/(1024*1024);
				strcpy(ch_kk, "(MB)");
				break;
			case 2:
				mem[0] = MemInfo.dwTotalPhys/1024;
				mem[1] = MemInfo.dwAvailPhys/1024;
				mem[2] = MemInfo.dwTotalPageFile/1024;
				strcpy(ch_kk, "(KB)");
				break;
			case 3:
				mem[0] = MemInfo.dwTotalPhys;
				mem[1] = MemInfo.dwAvailPhys;
				mem[2] = MemInfo.dwTotalPageFile;
				strcpy(ch_kk, "(Byte)");
				break;
			}
			for(i = 0; i < 3; i++)
			{
				sprintf(ch, "%d%s", mem[i], ch_kk);
				SetWindowText(hBtnWnd[7+2*i], ch);
			}
		}
		break;

	case WM_CLOSE:
		DestroyWindow(hwnd);
		break;

	case WM_DESTROY:
		PostQuitMessage(0);
		break;

	default:
		return DefWindowProc(hwnd, uMsg, wParam, lParam);
	}
	return 0;
}