l.cpp

VC实验：图形程序设计及其应用 在屏幕上出现一个圆心沿正弦曲线轨迹移动的实心圆

// e.cpp : Defines the entry point for the application.
//

#include "stdafx.h"
#include "windows.h"
#include "stdlib.h"
#include "string.h"
#include "math.h"
#define Pi 3.1415926
long WINAPI WndProc(HWND hWnd,UINT iMessage,UINT wParam,LONG lParam);
double dfTheta=0,dfRange=100.0;
long i=0,j=0;
long lCentreX=0,lCentreY=0,lRadious=(long)(0.2*dfRange);
POINT lpSin[100];
int WINAPI WinMain(HINSTANCE hInstance,HINSTANCE hPrevInstance,LPSTR lpCmdLine,int nCmdShow)
{
MSG Message;
HWND hWnd;
WNDCLASS WndClass;
WndClass.cbClsExtra=0;
WndClass.cbWndExtra=0;
WndClass.hbrBackground=(HBRUSH)(GetStockObject(WHITE_BRUSH));
WndClass.hCursor=LoadCursor(NULL,IDC_ARROW);
WndClass.hIcon=LoadIcon(NULL,IDI_APPLICATION);
WndClass.hInstance=hInstance;
WndClass.lpfnWndProc=WndProc;
WndClass.lpszClassName="SIN";
WndClass.lpszMenuName=NULL;
WndClass.style=0;
if(!RegisterClass(&WndClass))
{
MessageBeep(0);
return FALSE;
}
hWnd=CreateWindow("SIN",
				  "实验一",
				  WS_OVERLAPPEDWINDOW,
				  CW_USEDEFAULT,
				  0,
				   CW_USEDEFAULT,
				   0,
				  NULL,
				  NULL,
				  hInstance,
				  NULL);
ShowWindow(hWnd,nCmdShow);
UpdateWindow(hWnd);
for(int j=0;j<100;j++)
{
lpSin[j].x=(long)(j*2*Pi/100*60);
lpSin[j].y=(long)(dfRange*sin(j*2*Pi/100));
}
while(GetMessage(&Message,0,0,0))
{
TranslateMessage(&Message);
DispatchMessage(&Message);
}
return Message.wParam;
}
long WINAPI WndProc(HWND hWnd,UINT iMessage,
					UINT wParam,LONG lParam)
{
HDC hDC;
HBRUSH hBrush;
HPEN hPen;
PAINTSTRUCT PtStr;
switch(iMessage)
{
case WM_PAINT:
	hDC=BeginPaint(hWnd,&PtStr);
	SetWindowOrgEx(hDC,-200,-200,NULL);
	hPen=CreatePen(PS_DASH,1,RGB(0,0,125));
	SelectObject(hDC,hPen);
	Polyline(hDC,lpSin,100);
	if(i<=25)
	{
	hPen=CreatePen(PS_DASH,1,RGB(100,0,0));
	hBrush=CreateHatchBrush(HS_BDIAGONAL,RGB(0,200,0));
	lRadious=(long)(dfRange*0.2+i%25*dfRange*0.4/25);
	}
	else if(i<=50)
	{
	hPen=CreatePen(PS_DASH,1,RGB(255,255,125));
	hBrush=CreateHatchBrush(HS_CROSS,RGB(125,0,0));
	lRadious=(long)(dfRange*0.2+i%25*dfRange*0.4/25);
	}
	else if(i<=75)
	{
	hPen=CreatePen(PS_DASH,1,RGB(0,0,255));
	hBrush=CreateHatchBrush(HS_DIAGCROSS,RGB(255,0,255));
	lRadious=(long)(dfRange*0.2+i%25*dfRange*0.4/25);
	}
	else
	{
	hPen=CreatePen(PS_DASH,1,RGB(0,0,0));
	hBrush=CreateHatchBrush(HS_VERTICAL,RGB(0,255,255));
	lRadious=(long)(dfRange*0.2+i%25*dfRange*0.4/25);
	}
	SelectObject(hDC,hBrush);
	SelectObject(hDC,hPen);
	lCentreX=lpSin[i].x;
     lCentreY=lpSin[i].y;
	 Ellipse(hDC,lCentreX-lRadious,lCentreY-lRadious,
		 lCentreX+lRadious,lCentreY+lRadious);
	 i++;
	 DeleteObject(hPen);
	 DeleteObject(hBrush);
	 EndPaint(hWnd,&PtStr);
	 Sleep(100);
	 if(i<1000)
		 InvalidateRect(hWnd,NULL,1);
	 return 0;
case WM_DESTROY:
	PostQuitMessage(0);
	return 0;
default:
	return(DefWindowProc(hWnd,iMessage,wParam,lParam));
}
}