电脑使用时间提醒器-优快云博客

本文链接：https://blog.youkuaiyun.com/courage3000/article/details/9746335
一：目的

在家闲着电脑不要玩太久了哦！
二：要点

刚开始的字体颜色是绿色，超过4小时后变蓝色，超过8小时后变红。
根据显示器的分辨率动态调整窗口大小，字体大小
开机启动，记录数据，窗口移动
四：源代码

#include <windows.h>
#include 
#pragma comment(lib,"shlwapi.lib")
#include "Shlwapi.h"

LRESULT CALLBACK WinProc(HWND,UINT,WPARAM,LPARAM);

UINT second,minute,hour,day,month;
int font_size;		//字体大小
int window_width;	//窗口宽度
DWORD dw;			//
char iniPath[MAX_PATH];

int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nShowCmd)
{	
//写入注册表，实现开机启动。HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run
	HKEY hKey;
	char str[100];
	GetModuleFileName(NULL,str,100);

	if(RegCreateKey(HKEY_LOCAL_MACHINE,
		"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run",
		&hKey) != ERROR_SUCCESS)

		MessageBox(NULL,"操作失败！！！"," ",0);

	RegSetValueEx(hKey,"time",0,REG_SZ,( const BYTE *)str,strlen(str)+1);
	RegCloseKey(hKey);

//////////////////////////////////////////////////////数据初始化
	strncpy(iniPath,str,strlen(str)-(strlen(PathFindFileName(str)) )   );
	PathAppend(iniPath,"time.dat");

	day=GetPrivateProfileInt("Section0","Day",0,iniPath);//获取上次保存的day

	SYSTEMTIME st;//取得系统时间		
	GetSystemTime(&st);
	if(day != st.wDay)
		second,minute,hour=0;	//不是同一天则从零开始
	else{
		hour=GetPrivateProfileInt("Section0","Hour",0,iniPath);
		minute=GetPrivateProfileInt("Section0","Minute",0,iniPath);
	}
	
	font_size = GetSystemMetrics(SM_CYSCREEN)/30;	//字体大小是屏幕高度除以30
	window_width=font_size*6;						//窗口宽度是字体大小的6倍
//////////////////////////////////////////////////////////////////

//创建窗口
	WNDCLASS wc;
	wc.style=CS_HREDRAW|CS_VREDRAW;
	wc.lpfnWndProc=(WNDPROC)WinProc;
	wc.cbClsExtra=0;
	wc.cbWndExtra=0;
	wc.hInstance=hInstance;
	wc.hIcon=LoadIcon(NULL,IDI_APPLICATION);
	wc.hCursor=LoadCursor(NULL,IDC_ARROW);
	wc.hbrBackground=(HBRUSH)GetStockObject(WHITE_BRUSH);

	wc.lpszMenuName=NULL;
	wc.lpszClassName="MyWindow";
	
	RegisterClass(&wc);		//WS_EX_TOOLWINDOW风格可以使得不在任务栏上显示
	int left=0,top=0;
	HWND hwnd=CreateWindowEx(WS_EX_TOOLWINDOW,"MyWindow","My Window",WS_POPUP,//==比=的优先级高，一定要打括号
		(left=GetPrivateProfileInt("Section2","left",0,iniPath))==0?GetSystemMetrics(SM_CXSCREEN)-window_width:left,//初始窗口左上角X坐标
		(top=GetPrivateProfileInt("Section2","top",0,iniPath))==0?0:top,											//初始窗口左上角Y坐标
		//500,500,
		window_width,								//窗口宽度
		100,										//窗口高度
		NULL,NULL,hInstance,NULL);

	if(!hwnd) return false;
//增加窗口透明属性。	
	LONG l = GetWindowLong(hwnd,GWL_EXSTYLE);
	SetWindowLong(hwnd,GWL_EXSTYLE,l^0x00080000);
//动态调用SetLayeredWindowAttributes，使窗口透明
	HINSTANCE hInst = LoadLibrary("User32.DLL"); 
	if(hInst) 
	{ 
		typedef BOOL (WINAPI *MYFUNC)(HWND,COLORREF,BYTE,DWORD); 
		MYFUNC fun = NULL;
		//取得SetLayeredWindowAttributes函数指针 
		fun=(MYFUNC)GetProcAddress(hInst, "SetLayeredWindowAttributes");
		if(fun) fun(hwnd,RGB(255,255,255),50,1); 
		FreeLibrary(hInst); 
	}
//显示窗口，进入消息循环
	ShowWindow(hwnd,nShowCmd);
	UpdateWindow(hwnd);

	MSG msg;

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

	return msg.wParam;
}

LRESULT CALLBACK WinProc(HWND h,UINT msg,WPARAM wParam,LPARAM lParam)
{
	HDC hdc;
	PAINTSTRUCT ps;
	RECT rect;
	HFONT hFont;

	char str[20],str2[20];  
	SYSTEMTIME st;

	switch(msg)
	{
	case WM_CREATE:
		SetTimer(h,0,1000,NULL);	//设置定时器
		return 0;

	case WM_TIMER:
		second+=1;		//秒针累加
		//hour+=1;		调试用		
		if(second==60){
			second=0;
			minute+=1;	//秒针满60，分针+1,记录日、时、分到Section0
			InvalidateRect(h,NULL,false);

			GetSystemTime(&st);

			wsprintf(str,"%d",hour);
			WritePrivateProfileString("Section0","Hour",str,iniPath);//时
			wsprintf(str,"%d",minute);
			WritePrivateProfileString("Section0","Minute",str,iniPath);//分
			wsprintf(str,"%d",st.wDay);
			WritePrivateProfileString("Section0","Day",str,iniPath);//日

			wsprintf(str,"%d%02d%02d",st.wYear,st.wMonth,st.wDay);
			wsprintf(str2,"%02d:%02d",hour,minute);
			WritePrivateProfileString("Section1",str,str2,iniPath);

		}

		if(minute==60){minute=0;hour+=1;}//分针满60，时针+1
		return 0;

	case WM_PAINT:
		hdc=BeginPaint(h,&ps);
			GetClientRect(h,&rect);

			if(hour<8) wsprintf(str,"%02d:%02d",hour,minute);
			else wsprintf(str,"%02d:%02d\n请注意休息！",hour,minute);

			hFont = CreateFont(font_size,0,0,0,FW_SEMIBOLD,
				0,0,0,
				DEFAULT_CHARSET,OUT_DEFAULT_PRECIS,CLIP_DEFAULT_PRECIS,
				DEFAULT_QUALITY,DEFAULT_PITCH,NULL);


			if(hour<4 settextcolor="" hdc="" rgb="" 0="" 255="" 0="" 4="" else="" if="" hour="">=4 && hour<8) SetTextColor(hdc,RGB(0,0,255));//4-8小时，蓝色
			else SetTextColor(hdc,RGB(255,0,0));//8小时以上，红色

			SelectObject(hdc,hFont);

			DrawText(hdc,str,-1,&rect,DT_LEFT);

			DeleteObject(hFont);
		EndPaint(h,&ps);
		return 0;

	case WM_KEYDOWN:
		if(wParam==VK_ESCAPE){//按ESC键退出
			KillTimer(h,0);
			PostQuitMessage(0);
		}
		return 0;
		
	case WM_LBUTTONDOWN:		//左键按下
		PostMessage(h,WM_NCLBUTTONDOWN,HTCAPTION,lParam);
		return 0;

	case WM_MOVE:
		wsprintf(str,"%d",(int)(short) HIWORD(lParam));
		//MessageBox(h,str,"top",0);	调试用
		WritePrivateProfileString("Section2","top",str,iniPath);
		wsprintf(str,"%d",(int)(short) LOWORD(lParam));
		//MessageBox(h,str,"left",0);	调试用
		WritePrivateProfileString("Section2","left",str,iniPath);
		return true;	//必须return TRUE,否则程序崩溃。参考MSDN：WM_MOVE

	case WM_DESTROY:
		PostQuitMessage(0);
		return 0;
	}
	return DefWindowProc(h,msg,wParam,lParam);
}