MOOC清华《VC++面向对象与可视化程序设计》第3章补例：诗文扇面

#include <windows.h>
#include <tchar.h>
#include <math.h>
#define PI 3.141592653
BOOLEAN InitWindowClass(HINSTANCE hInstance,int nCmdShow);
LRESULT CALLBACK WndProc(HWND,UINT,WPARAM,LPARAM);
HFONT CreateMyFont(TCHAR * fontName,int height,int lean);//创建自定义字体，
//三个参数分别是字体名称，字体大小，字体的倾斜度，倾斜度以/10为一个逻辑单位
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nCmdShow){
    MSG msg;
	if(!InitWindowClass(hInstance,nCmdShow)){
	    MessageBox(NULL,L"创建窗口失败！",_T("创建窗口"),NULL);
		return 1;
	}
	while(GetMessage(&msg,NULL,0,0)){
	    TranslateMessage(&msg);
		DispatchMessage(&msg);
	}
	return (int) msg.wParam;
}
LRESULT CALLBACK WndProc(HWND hWnd,UINT message,WPARAM wParam,LPARAM lParam){
    HDC hDC;
	PAINTSTRUCT ps;
	HFONT font;
	HPEN hPen;
	LPCWSTR title=L"长征 毛泽东",poem[8]={L"红军不怕远征难",L"万水千山只等闲",
		L"五岭逶迤腾细浪",L"乌蒙磅礴走泥丸",L"金沙水拍云崖暖",L"大渡桥横铁索寒",
		L"更喜岷山千里雪",L"三军过后尽开颜"};
	int r,r0,i,j=-1,fontSize,fontSize0,color;
	RECT clientDimension;//存放客户区的尺寸
	POINT begin,end,org;//保存点的信息，org表示圆心坐标
	double sita;//表示文字倾斜及画图时的角度
	switch(message){
	case WM_SIZE:
		InvalidateRect(hWnd,NULL,true);
		break;
	case WM_PAINT:
		hDC=BeginPaint(hWnd,&ps);
		hPen=CreatePen(PS_DASH,1,RGB(127,127,127));
		SelectObject(hDC,hPen);
		GetClientRect(hWnd,&clientDimension);//获取客户区的尺寸
		if((clientDimension.right-clientDimension.left)<400||
			(clientDimension.bottom-clientDimension.top)<300){//判断屏幕尺寸
		    MessageBox(hWnd,L"屏幕尺寸太小，无法绘图！",L"错误信息",0);
			break;
		}
	    r=(clientDimension.bottom-clientDimension.top)*8/10;//用屏幕高度的4/5作为扇形的半径
		org.x=(clientDimension.right-clientDimension.left)/2;
		org.y=(clientDimension.bottom-clientDimension.top)*9/10;//将圆心坐标定在屏幕中间下方的9/10处
		Arc(hDC,org.x-r,org.y-r,org.x+r,org.y+r,org.x+(int)(r*sin(PI/3)),
			org.y-(int)(r*cos(PI/3)),org.x-(int)(r*sin(PI/3)),
			org.y-(int)(r*cos(PI/3)));//画外围圆弧
		for(sita=PI/6;sita<=PI*5/6;sita+=PI*2/27){
		    begin.x=org.x+(int)(r*cos(sita));
			begin.y=org.y-(int)(r*sin(sita));
			MoveToEx(hDC,begin.x,begin.y,NULL);
			end.x=org.x;
			end.y=org.y;
			LineTo(hDC,end.x,end.y);
		}//画折线
		r0=r*2/5;//用外围圆弧半径的2/5作为内围圆弧半径
		Arc(hDC,org.x-r0,org.y-r0,org.x+r0,org.y+r0,org.x+(int)(r0*sin(PI/3)),
			org.y-(int)(r0*cos(PI/3)),org.x-(int)(r0*sin(PI/3)),
			org.y-(int)(r0*cos(PI/3)));//画内侧圆弧
		sita=PI/6+PI*4/15/5;//右侧第一列角度，这个角度是粗略计算加上反复调试试出来的
		fontSize0=fontSize=(r-r0)/7;//字体的大小
		r0=r-20;//半径逐步减小
		for(i=0;i<6;i++){
		    LPCWSTR outInfo=&title[i];//逐步取诗的标题字
			fontSize-=3;
			font=CreateMyFont(L"楷体_GB2312",fontSize-5,(int)(-(sita+PI/15)*1800/PI));//创建字体
			SelectObject(hDC,font);//将创建的字体句柄选入设备环境
			begin.x=org.x+(int)(r0*cos(sita));
			begin.y=org.y-(int)(r0*sin(sita));//计算输出文字的坐标
			TextOut(hDC,begin.x,begin.y,outInfo,1);//输出文字
			r0-=fontSize;//文字位置由外向内移动
			DeleteObject(font);
		}
		for(sita=PI/6+PI*4/27-PI/40;sita<PI*5/6;sita+=PI*2/27){
			//角度从右向左，角度与以下计算位置及字体倾斜相配合
			fontSize=fontSize0;
			r0=r-20;
			j++;
			color=0;
			for(i=0;i<7;i++){
				color+=255/7;
				SetTextColor(hDC,RGB(255-color,0,color));
				LPCWSTR outInfo=&poem[j][i];
				fontSize-=3;
				font=CreateMyFont(L"华文行楷",fontSize,(int)(((sita-PI/2)*1800/PI))%3600);
				SelectObject(hDC,font);
				begin.x=org.x+(int)(r0*cos(sita));
				begin.y=org.y-(int)(r0*sin(sita));
				TextOut(hDC,begin.x,begin.y,outInfo,1);
				r0-=fontSize;
				DeleteObject(font);
				Sleep(50);//输出一个文字暂停0.1秒
			}
		}
		EndPaint(hWnd,&ps);//结束绘图
		break;
	case WM_DESTROY:
		PostQuitMessage(0);//调用PostQuitMessage发出WM_QUIT消息
		break;
	default:
		return DefWindowProc(hWnd,message,wParam,lParam);//默认时采用系统消息默认处理函数
		break;
	}
	return 0;
}
HFONT CreateMyFont(TCHAR * fontName,int height,int lean){
    return CreateFont(
		height,
		0,
		lean,
		0,
		FW_HEAVY,
		0,
		0,
		0,
		GB2312_CHARSET,
		OUT_DEFAULT_PRECIS,
		CLIP_DEFAULT_PRECIS,
		DEFAULT_QUALITY,
		DEFAULT_PITCH|FF_DONTCARE,
		fontName
		);
}
BOOLEAN InitWindowClass(HINSTANCE hInstance,int nCmdShow){
    WNDCLASSEX wcex;
	HWND hWnd;
	TCHAR szWindowClass[]=L"窗口示例";
	TCHAR szTitle[]=L"字体及位置示例";
	wcex.cbSize=sizeof(WNDCLASSEX);
	wcex.style=0;
	wcex.lpfnWndProc=WndProc;
	wcex.cbClsExtra=0;
	wcex.cbWndExtra=0;
	wcex.hInstance=hInstance;
	wcex.hIcon=LoadIcon(hInstance,MAKEINTRESOURCE(IDI_APPLICATION));
	wcex.hCursor=LoadCursor(NULL,IDC_ARROW);
	wcex.hbrBackground=(HBRUSH)GetStockObject(WHITE_BRUSH);
	wcex.lpszMenuName=NULL;
	wcex.lpszClassName=szWindowClass;
	wcex.hIconSm=LoadIcon(wcex.hInstance,MAKEINTRESOURCE(IDI_APPLICATION));
	if(!RegisterClassEx(&wcex))
		return FALSE;
	hWnd=CreateWindow(
		szWindowClass,
		szTitle,
		WS_OVERLAPPEDWINDOW,
		CW_USEDEFAULT,CW_USEDEFAULT,
		CW_USEDEFAULT,CW_USEDEFAULT,
		NULL,
		NULL,
		hInstance,
		NULL
		);
	if(!hWnd)
		return FALSE;
	ShowWindow(hWnd,nCmdShow);
	UpdateWindow(hWnd);
	return TRUE;
}