【原創】WinMo仿wp7關機、重啟、關屏（關機需HTCUtil支持）

--------------------------------------------------------------------------------------------------------------------------------------- .h

#include "RdWrtIni.h"
#include <time.h>
#include <atlbase.h>
#include <pm.h>

// 重啟數據定義
#define CTL_CODE( DeviceType, Function, Method, Access ) ( ((DeviceType) << 16) | ((Access) << 14) | ((Function) << 2) | (Method) )
#define FILE_DEVICE_HAL 0x00000101
#define METHOD_BUFFERED 0
#define FILE_ANY_ACCESS 0
#define IOCTL_HAL_REBOOT CTL_CODE(FILE_DEVICE_HAL, 15, METHOD_BUFFERED, FILE_ANY_ACCESS)

extern "C" __declspec(dllimport) BOOL KernelIoControl(DWORD dwIoControlCode,
LPVOID lpInBuf,
DWORD nInBufSize,
LPVOID lpOutBuf,
DWORD nOutBufSize,
LPDWORD lpBytesReturned);

#define MAX_LOADSTRING 100
#define TimeInterval 1	// 計時器間隔
#define PROFILE		_T(".\\MetroOff.ini")

void DrawUI(HDC hDC, int type, int Distance);						// 繪圖操作
void FillSolidRect(HDC hDC, RECT rect, COLORREF clr);							// 填充純色（當Profile.isLoadImage == FALSE）
void CALLBACK TimerProc(HWND hwnd, UINT message, UINT iTimerID, DWORD dwTime);	// 用作釋放光標后滑塊恢復原狀
void ShutDownWM();		// 僅支持HTC

struct Profile
{
BOOL		isLoadImage;			// 是否加載圖片

WCHAR		szScreenOff[MAX_PATH];	// 關屏圖片路徑
WCHAR		szReboot[MAX_PATH];		// 重啟圖片路徑
WCHAR		szShutDown[MAX_PATH];	// 關機圖片路徑

COLORREF	clrScreenOff;			// 關屏色彩
COLORREF	clrReboot;				// 重啟色彩
COLORREF	clrShutDown;			// 關機色彩

int			Status;					// 初始操作狀態：（0:關屏 1:關機 2:重啟）
};

Profile		g_Profile;	// 配置文件
int			g_Pos;		// 滑塊位置  注意：考慮最大最小值，防止超過最大位移
int			g_Width;	// 屏幕寬度
int			g_Height;	// 屏幕長度
POINT		g_Spt;		// 起始座標
POINT		g_Ept;		// 瞬時座標
UINT_PTR	g_TimerID;	// 定時器ID
HWND		g_hWnd;		// 全局窗口句柄
HFONT		g_FontL;	// 大字體											退出時銷毀
HFONT		g_FontS;	// 小字體											退出時銷毀
LOGFONT		g_lf;		// 初始化時使用

HDC			g_ScrDC;	// 原始桌面DC										退出時銷毀
HDC			g_BkgDC;	// 保存桌面的DC										退出時銷毀

HBITMAP		g_BkgBmp;	// 保存桌面的畫布									退出時銷毀
HBITMAP		g_BlkBmp;	// 內存畫布，用作滑塊貼圖							退出時銷毀

BOOL g_Drag;			// 是否在拖動滑塊

--------------------------------------------------------------------------------------------------------------------------------------- .cpp

// MetroOff.cpp : 定义应用程序的入口点。
//

#include "stdafx.h"
#include "MetroOff.h"

// 全局变量:
HINSTANCE			g_hInst;			// 当前实例

// 此代码模块中包含的函数的前向声明:
ATOM			MyRegisterClass(HINSTANCE, LPTSTR);
BOOL			InitInstance(HINSTANCE, int);
LRESULT CALLBACK	WndProc(HWND, UINT, WPARAM, LPARAM);

int WINAPI WinMain(HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPTSTR    lpCmdLine,
int       nCmdShow)
{
MSG msg;

// 执行应用程序初始化:
if (!InitInstance(hInstance, nCmdShow))
{
return FALSE;
}

// 主消息循环:
while (GetMessage(&msg, NULL, 0, 0))
{
TranslateMessage(&msg);
DispatchMessage(&msg);
}

return (int) msg.wParam;
}

//
//  函数: MyRegisterClass()
//
//  目的: 注册窗口类。
//
//  注释:
//
ATOM MyRegisterClass(HINSTANCE hInstance, LPTSTR szWindowClass)
{
WNDCLASS wc;

wc.style         = CS_HREDRAW | CS_VREDRAW;
wc.lpfnWndProc   = WndProc;
wc.cbClsExtra    = 0;
wc.cbWndExtra    = 0;
wc.hInstance     = hInstance;
wc.hIcon         = LoadIcon(hInstance, _T("MetroOff.ico"));
wc.hCursor       = 0;
wc.hbrBackground = (HBRUSH) GetStockObject(WHITE_BRUSH);
wc.lpszMenuName  = 0;
wc.lpszClassName = szWindowClass;

return RegisterClass(&wc);
}

//
//   函数: InitInstance(HINSTANCE, int)
//
//   目的: 保存实例句柄并创建主窗口
//
//   注释:
//
//        在此函数中，我们在全局变量中保存实例句柄并
//        创建和显示主程序窗口。
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
HWND hWnd;
TCHAR szTitle[MAX_LOADSTRING] = _T("");		// 标题栏文本
TCHAR szWindowClass[MAX_LOADSTRING] = _T("MetroOff");	// 主窗口类名

g_hInst = hInstance; // 将实例句柄存储在全局变量中

// 在应用程序初始化期间，应调用一次 SHInitExtraControls 以初始化
// 所有设备特定控件，例如，CAPEDIT 和 SIPPREF。
SHInitExtraControls();

//如果它已经在运行，则将焦点置于窗口上，然后退出
hWnd = FindWindow(szWindowClass, szTitle);
if (hWnd)
{
// 将焦点置于最前面的子窗口
// “| 0x00000001”用于将所有附属窗口置于前台并
// 激活这些窗口。
SetForegroundWindow((HWND)((ULONG) hWnd | 0x00000001));
return 0;
}

if (!MyRegisterClass(hInstance, szWindowClass))
{
return FALSE;
}

hWnd = CreateWindow(szWindowClass, szTitle, WS_VISIBLE,
CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, NULL, NULL, hInstance, NULL);

if (!hWnd)
{
return FALSE;
}

ShowWindow(hWnd, SW_HIDE);
UpdateWindow(hWnd);

// 加入初始化代碼
g_Profile.isLoadImage = (BOOL)GetPrivateProfileInt(_T("Load"), _T("Bool"), 0, PROFILE);
GetPrivateProfileString(_T("Image"), _T("ScreenOff"),	_T(""), g_Profile.szScreenOff,	MAX_PATH, PROFILE);
GetPrivateProfileString(_T("Image"), _T("Reboot"),		_T(""), g_Profile.szReboot,		MAX_PATH, PROFILE);
GetPrivateProfileString(_T("Image"), _T("ShutDown"),	_T(""), g_Profile.szShutDown,	MAX_PATH, PROFILE);
g_Profile.clrScreenOff	= (COLORREF)GetPrivateProfileInt(_T("Color"), _T("ScreenOff"),	47746, PROFILE);
g_Profile.clrReboot		= (COLORREF)GetPrivateProfileInt(_T("Color"), _T("Reboot"),		14851176, PROFILE);
g_Profile.clrShutDown	= (COLORREF)GetPrivateProfileInt(_T("Color"), _T("ShutDown"),	13260, PROFILE);
g_Profile.Status		= (int)GetPrivateProfileInt(_T("Initial"),	  _T("Status"),		0,		  PROFILE);

g_Width  = GetSystemMetrics(SM_CXSCREEN);
g_Height = GetSystemMetrics(SM_CYSCREEN);
g_Pos    = g_Height / 2;
g_Spt.x  = 0;
g_Spt.y  = 0;
g_Ept.x  = 0;
g_Ept.y  = 0;
g_TimerID = 0;
g_hWnd   = hWnd;
g_Drag = FALSE;

// 設置字體
memset(&g_lf, 0, sizeof(LOGFONT));
g_lf.lfQuality = CLEARTYPE_QUALITY;
g_lf.lfHeight  = g_Width/5;
g_lf.lfWeight  = g_Width/10;
g_FontL = CreateFontIndirect(&g_lf);

g_lf.lfHeight = g_Width/16;
g_lf.lfWeight = g_Width/16;
g_FontS = CreateFontIndirect(&g_lf);

// 獲取屏幕圖像
g_ScrDC  = GetDC(NULL);
g_BkgBmp = CreateCompatibleBitmap(g_ScrDC, g_Width, g_Height);
g_BkgDC  = CreateCompatibleDC(g_ScrDC);
SelectObject(g_BkgDC, g_BkgBmp);
BitBlt(g_BkgDC, 0, 0, g_Width, g_Height, g_ScrDC, 0, 0, SRCCOPY);

if (g_Profile.isLoadImage)
{
switch (g_Profile.Status)
{
case 0:
g_BlkBmp = SHLoadImageFile(W2T(g_Profile.szScreenOff));
break;

case 1:
g_BlkBmp = SHLoadImageFile(W2T(g_Profile.szShutDown));
break;

case 2:
g_BlkBmp = SHLoadImageFile(W2T(g_Profile.szReboot));
break;

default:
break;
}
}
else
{
g_BlkBmp = CreateCompatibleBitmap(g_ScrDC, g_Width, g_Height);
}

// 窗口全屏化
ShowWindow(hWnd, SW_SHOW);

RECT rc;
GetWindowRect(hWnd, &rc);
SHFullScreen(hWnd, SHFS_HIDETASKBAR | SHFS_HIDESIPBUTTON);
HWND hWndCB = ::SHFindMenuBar(hWnd);
ShowWindow(hWndCB, SW_HIDE);

MoveWindow(hWnd,
rc.left,
rc.top - g_Width / 240 * 26,
rc.right,
rc.bottom + g_Width / 240 * 26,
TRUE);

return TRUE;
}

//
//  函数: WndProc(HWND, UINT, WPARAM, LPARAM)
//
//  目的: 处理主窗口的消息。
//
//  WM_COMMAND	- 处理应用程序菜单
//  WM_PAINT	- 绘制主窗口
//  WM_DESTROY	- 发送退出消息并返回
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
PAINTSTRUCT ps;
HDC hdc;

static SHACTIVATEINFO s_sai;

switch (message)
{
case WM_CREATE:
// 初始化外壳程序激活信息结构
memset(&s_sai, 0, sizeof (s_sai));
s_sai.cbSize = sizeof (s_sai);
break;

case WM_PAINT:
hdc = BeginPaint(hWnd, &ps);

// TODO: 在此添加任意绘图代码...
DrawUI(hdc, g_Profile.Status, g_Pos);

EndPaint(hWnd, &ps);
break;

case WM_ERASEBKGND:
return 0;
break;

case WM_DESTROY:
PostQuitMessage(0);
break;

case WM_QUIT:
ReleaseDC(NULL, g_ScrDC);
DeleteDC(g_BkgDC);
DeleteObject(g_BkgBmp);
if (g_Profile.isLoadImage)
{
DeleteObject(g_BlkBmp);
}
DeleteObject(g_FontL);
DeleteObject(g_FontS);

break;

case WM_ACTIVATE:
// 向外壳程序通知我们的激活消息
SHHandleWMActivate(hWnd, wParam, lParam, &s_sai, FALSE);
break;

case WM_SETTINGCHANGE:
SHHandleWMSettingChange(hWnd, wParam, lParam, &s_sai);
break;

case WM_LBUTTONDOWN:
if (HIWORD(lParam) < g_Pos)
{
g_Drag = TRUE;

if (g_Spt.x == 0)
{
g_Spt.x = LOWORD(lParam);
g_Spt.y = HIWORD(lParam);
}
}

if (g_TimerID != 0)
{
KillTimer(NULL, g_TimerID);
g_TimerID = 0;
}
break;

case WM_MOUSEMOVE:
if (g_Drag)
{
g_Ept.x = LOWORD(lParam);
g_Ept.y = HIWORD(lParam);

g_Pos = g_Ept.y - g_Spt.y + g_Height/2;

if (g_Pos > g_Height)
{
g_Pos = g_Height;
}
else if (g_Pos < 0)
{
g_Pos = 0;
}

InvalidateRect(hWnd, NULL, FALSE);
UpdateWindow(hWnd);
}

break;

case WM_LBUTTONUP:
if (g_Drag)
{
g_Ept.x = LOWORD(lParam);
g_Ept.y = HIWORD(lParam);

g_Pos = g_Ept.y - g_Spt.y + g_Height/2;

if (g_Pos > g_Height)
{
g_Pos = g_Height;
}
else if (g_Pos < 0)
{
g_Pos = 0;
}

POINT Dist;
Dist.x = g_Ept.x - g_Spt.x;
Dist.y = g_Ept.y - g_Spt.y;

if (Dist.x < 0)
{
Dist.x = -Dist.x;
}
if (Dist.y < 0)
{
Dist.y = -Dist.y;
}

if (Dist.x < 16 && Dist.y < 16)
{
g_Profile.Status += 1;
if (g_Profile.Status > 2)
{
g_Profile.Status = 0;
}

DeleteObject(g_BlkBmp);
switch (g_Profile.Status)
{
case 0:
g_BlkBmp = SHLoadImageFile(W2T(g_Profile.szScreenOff));
break;

case 1:
g_BlkBmp = SHLoadImageFile(W2T(g_Profile.szShutDown));
break;

case 2:
g_BlkBmp = SHLoadImageFile(W2T(g_Profile.szReboot));
break;

default:
break;
}
}
g_TimerID = SetTimer(NULL, 0, TimeInterval, TimerProc);
g_Drag = FALSE;

InvalidateRect(hWnd, NULL, FALSE);
UpdateWindow(hWnd);
}
break;

default:
return DefWindowProc(hWnd, message, wParam, lParam);
}
return 0;
}

void ShutDownWM()
{
typedef int(*lpAPIFun)(BOOL);
lpAPIFun HTCUtilDeviceOff;

HINSTANCE hDll = LoadLibrary(_T("HTCUtil.dll"));

if (hDll != NULL)
{
HTCUtilDeviceOff = (lpAPIFun)GetProcAddress(hDll, _T("HTCUtilDeviceOff"));

if (HTCUtilDeviceOff != NULL)
{
HTCUtilDeviceOff(TRUE);
}
else
{
PostQuitMessage(0);
}
}
else
{
PostQuitMessage(0);
}

FreeLibrary(hDll);
}

void FillSolidRect(HDC hDC, RECT rect, COLORREF clr)
{
SetBkColor(hDC, clr);
ExtTextOut(hDC, 0, 0, ETO_OPAQUE, &rect, NULL, 0, NULL);
}

void DrawUI(HDC hDC, int type, int Distance)
{
// 創建內存畫布，並將屏幕背景貼到內存畫布上
HDC MemDC = CreateCompatibleDC(NULL);
HBITMAP MemBmp = CreateCompatibleBitmap(g_ScrDC, g_Width, g_Height);
SelectObject(MemDC, MemBmp);
BitBlt(MemDC, 0, 0 , g_Width, g_Height, g_BkgDC, 0 , 0, SRCCOPY);

// 滑塊貼圖相關操作
HDC blkDC = CreateCompatibleDC(NULL);	// 創建滑塊內存DC
SelectObject(blkDC, g_BlkBmp);
TCHAR strInfo[] = _T("向下滑动以关机");	// 初始化說明文字

RECT rc;
rc.left = 0;
rc.right = g_Width;
rc.top = 0;
rc.bottom = g_Height;

switch (type)
{
case 0:			// 關屏
if (!g_Profile.isLoadImage)
{
FillSolidRect(blkDC, rc, g_Profile.clrScreenOff);
}
wsprintf(strInfo, _T("向下滑动以关屏"));
break;

case 1:			// 關機
if (!g_Profile.isLoadImage)
{
FillSolidRect(blkDC, rc, g_Profile.clrShutDown);
}
wsprintf(strInfo, _T("向下滑动以关机"));
break;

case 2:			// 重啟
if (!g_Profile.isLoadImage)
{
FillSolidRect(blkDC, rc, g_Profile.clrReboot);
}
wsprintf(strInfo, _T("向下滑动以重启"));
break;

default:
break;
}

BitBlt(MemDC, 0, 0, g_Width, Distance, blkDC, 0, g_Height - Distance, SRCCOPY);

// ------------------------------------------文字部份
SetBkMode(MemDC, TRANSPARENT);
SetTextColor(MemDC, RGB(255, 255, 255));
SelectObject(MemDC, g_FontL);

rc.left = g_Width/3;
rc.top = Distance - g_Height/2;
rc.bottom = Distance - g_Height/4;

// 時間貼圖
TCHAR str[8];
LPSYSTEMTIME lpSystemTime = new SYSTEMTIME;
GetLocalTime(lpSystemTime);
wsprintf(str, _T("%02d:%02d"), lpSystemTime->wHour, lpSystemTime->wMinute);
DrawText(MemDC, str, -1, &rc, DT_CENTER | DT_VCENTER);

// 文字貼圖
rc.left = 0;
rc.top = Distance - g_Height/16;
rc.bottom = Distance;
SelectObject(MemDC, g_FontS);
DrawText(MemDC, strInfo, -1, &rc, DT_CENTER | DT_VCENTER);

// 完成貼圖
BitBlt(hDC, 0, 0, g_Width, g_Height, MemDC, 0, 0, SRCCOPY);

// 清理
DeleteDC(MemDC);
DeleteDC(blkDC);
DeleteObject(MemBmp);

if (Distance >= g_Height)
{
switch (type)
{
case 0:			// 關屏
ReleaseDC(NULL, g_ScrDC);
DeleteDC(g_BkgDC);
DeleteObject(g_BkgBmp);
if (g_Profile.isLoadImage)
{
DeleteObject(g_BlkBmp);
}
DeleteObject(g_FontL);
DeleteObject(g_FontS);

SetSystemPowerState(NULL, POWER_STATE_SUSPEND, POWER_FORCE);
exit(0);

break;

case 1:			// 關機
ShutDownWM();
break;

case 2:			// 重啟
KernelIoControl(IOCTL_HAL_REBOOT, NULL, 0, NULL, 0, NULL);
break;

default:
break;
}
}
else if (Distance <= g_Height/4)
{
PostQuitMessage(0);
}
}

void CALLBACK TimerProc(HWND hwnd, UINT message, UINT iTimerID, DWORD dwTime)
{
if (g_Pos == g_Height/2)
{
InvalidateRect(g_hWnd, NULL, FALSE);
UpdateWindow(g_hWnd);
g_Spt.x = 0;
KillTimer(NULL, g_TimerID);
}
else
{
g_Pos = ((g_Pos - g_Height/2)*7)/8 + g_Height/2;

InvalidateRect(g_hWnd, NULL, FALSE);
UpdateWindow(g_hWnd);
}
}