这个实验的难点在于把下面这首诗竖向排列
“故人西辞黄鹤楼”,
“烟花三月下扬州”,
“孤帆远影碧空尽”,
“唯见长江天际流”,
#include<windows.h>
long WINAPI WndProc
(
HWND hWnd,
UINT iMessage,
UINT wParam,
LONG lParam
);
BOOL InitWindowsClass(HINSTANCE hInstance);
BOOL InitWindows(HINSTANCE hInstance, int nCmdShow);
//-------------------------------主函数--------------------------------------------------
int WINAPI WinMain(
HINSTANCE hInstance,
HINSTANCE hPrevInstance,
LPSTR lpCmdLine,
int nCmdShow)
{
MSG Message;
if (!InitWindowsClass(hInstance)) return FALSE;
if (!InitWindows(hInstance, nCmdShow))return FALSE;
while (GetMessage(&Message, 0, 0, 0))//消息循环
{
TranslateMessage(&Message);
DispatchMessage(&Message);
}
return Message.wParam;
}
//-----------------------------------消息处理函数-----------------------------------
long WINAPI WndProc(HWND hWnd, UINT iMessage, UINT wParam, LONG lParam)
{
HPEN hP;
HBRUSH hB;
static long nXChar, nYChar;
HDC hDC; //定义指向设备上下文的句柄
short x;
TEXTMETRIC tm;
short LnCount = 4;
PAINTSTRUCT PtStr; //定义指向包含绘图信息的结构体变量
const static TCHAR* textbuf[] =
{
L"故人西辞黄鹤楼",
L"烟花三月下扬州",
L"孤帆远影碧空尽",
L"唯见长江天际流",
};
switch (iMessage) //处理消息
{
case WM_PAINT: //处理重画消息
hDC = BeginPaint(hWnd, &PtStr); //开始绘画
for (int i = 4; i > 0; i--)
{
nXChar = 350 +( i+1) * 25;
nYChar = 10;
for (int j = 0; j < 7; j++)
{
nYChar = 10 + j * 25;
TextOut(hDC, nXChar, nYChar, (LPCWSTR)textbuf[4-i] + j, 1);
}
}
SetMapMode(hDC, MM_TEXT);
hP = CreatePen(PS_SOLID, 2, RGB(255, 0, 0));
SelectObject(hDC, hP);
MoveToEx(hDC, 80, 70, NULL);
LineTo(hDC, 40, 10);
MoveToEx(hDC, 40,10 , NULL);
LineTo(hDC, 120, 10);
MoveToEx(hDC, 80, 70, NULL);
LineTo(hDC, 120, 10);
Ellipse(hDC, 40, 70, 120, 160);
MoveToEx(hDC, 80, 160, NULL);
LineTo(hDC, 50, 190);
LineTo(hDC, 50, 220);
LineTo(hDC, 110, 220);
LineTo(hDC, 110, 190);
LineTo(hDC, 80, 160);
hB = (HBRUSH)GetStockObject(BLACK_BRUSH);
SelectObject(hDC, hB);
RoundRect(hDC, 180, 10, 260, 70, 10, 10);
Pie(hDC, 180, 70, 260, 160, 210, 70, 230, 70);
Rectangle(hDC, 180, 160, 260, 220);
EndPaint(hWnd, &PtStr);
return 0;
case WM_DESTROY: //结束应用程序
PostQuitMessage(0);
return 0;
default: //其他消息处理程序
return(DefWindowProc(hWnd, iMessage, wParam, lParam));
}
}
BOOL InitWindows(HINSTANCE hInstance, int nCmdShow)
{
HWND hWnd;
hWnd = CreateWindow(L"Bitmap", L"202可视化_实验一",
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;
}
BOOL InitWindowsClass(HINSTANCE hInstance)
{
WNDCLASS WndClass;
WndClass.cbWndExtra = 0;
WndClass.cbClsExtra = 0;
WndClass.hbrBackground = (HBRUSH)(GetStockObject(WHITE_BRUSH));
WndClass.hCursor = LoadCursor(NULL, MAKEINTRESOURCE(WHITE_BRUSH));
WndClass.hIcon = LoadIcon(NULL, MAKEINTRESOURCE(IDI_APPLICATION));
WndClass.hInstance = hInstance;
WndClass.lpfnWndProc = WndProc;
WndClass.lpszClassName = L"Bitmap";
WndClass.lpszMenuName = L"Menu";
WndClass.style = 0;
return RegisterClass(&WndClass);
}
结果如图所示：
