api ga 演示程序 vc6.cpp

遗传算法演示程序 遗传算法演示程序

// API  GA  演示程序 VC6.cpp : Defines the entry point for the application.
//

#include "stdafx.h"
#include "resource.h"
#include "GA.h"
#define MAX_LOADSTRING 100
#define bet 20
// Global Variables:
HINSTANCE hInst;								// current instance
TCHAR szTitle[MAX_LOADSTRING];								// The title bar text
TCHAR szWindowClass[MAX_LOADSTRING];								// The title bar text
int con=0,count=0,co;
Gcalc ga;


// Foward declarations of functions included in this code module:
ATOM				MyRegisterClass(HINSTANCE hInstance);
BOOL				InitInstance(HINSTANCE, int);
LRESULT CALLBACK	WndProc(HWND, UINT, WPARAM, LPARAM);
LRESULT CALLBACK	About(HWND, UINT, WPARAM, LPARAM);
VOID CALLBACK ontimer( HWND hwnd,UINT message,UINT idTimer,DWORD dwTime);

int APIENTRY WinMain(HINSTANCE hInstance,
                     HINSTANCE hPrevInstance,
                     LPSTR     lpCmdLine,
                     int       nCmdShow)
{
 	// TODO: Place code here.
	MSG msg;
	HACCEL hAccelTable;

	// Initialize global strings
	LoadString(hInstance, IDS_APP_TITLE, szTitle, MAX_LOADSTRING);
	LoadString(hInstance, IDC_APIGAVC6, szWindowClass, MAX_LOADSTRING);
	MyRegisterClass(hInstance);

	// Perform application initialization:
	if (!InitInstance (hInstance, nCmdShow)) 
	{
		return FALSE;
	}

	hAccelTable = LoadAccelerators(hInstance, (LPCTSTR)IDC_APIGAVC6);

	// Main message loop:
	while (GetMessage(&msg, NULL, 0, 0)) 
	{
		if (!TranslateAccelerator(msg.hwnd, hAccelTable, &msg)) 
		{
			TranslateMessage(&msg);
			DispatchMessage(&msg);
		}
	}

	return msg.wParam;
}



//
//  FUNCTION: MyRegisterClass()
//
//  PURPOSE: Registers the window class.
//
//  COMMENTS:
//
//    This function and its usage is only necessary if you want this code
//    to be compatible with Win32 systems prior to the 'RegisterClassEx'
//    function that was added to Windows 95. It is important to call this function
//    so that the application will get 'well formed' small icons associated
//    with it.
//
ATOM MyRegisterClass(HINSTANCE hInstance)
{
	WNDCLASSEX wcex;

	wcex.cbSize = sizeof(WNDCLASSEX); 

	wcex.style			= CS_HREDRAW | CS_VREDRAW;
	wcex.lpfnWndProc	= (WNDPROC)WndProc;
	wcex.cbClsExtra		= 0;
	wcex.cbWndExtra		= 0;
	wcex.hInstance		= hInstance;
	wcex.hIcon			= LoadIcon(hInstance, (LPCTSTR)IDI_APIGAVC6);
	wcex.hCursor		= LoadCursor(NULL, IDC_ARROW);
	wcex.hbrBackground	= (HBRUSH)(COLOR_WINDOW+1);
	wcex.lpszMenuName	= (LPCSTR)IDC_APIGAVC6;
	wcex.lpszClassName	= szWindowClass;
	wcex.hIconSm		= LoadIcon(wcex.hInstance, (LPCTSTR)IDI_SMALL);

	return RegisterClassEx(&wcex);
}

//
//   FUNCTION: InitInstance(HANDLE, int)
//
//   PURPOSE: Saves instance handle and creates main window
//
//   COMMENTS:
//
//        In this function, we save the instance handle in a global variable and
//        create and display the main program window.
//
BOOL InitInstance(HINSTANCE hInstance, int nCmdShow)
{
   HWND hWnd;

   hInst = hInstance; // Store instance handle in our global variable

   hWnd = CreateWindow(szWindowClass, szTitle, WS_MAXIMIZE|WS_OVERLAPPEDWINDOW,       //|WS_VSCROLL| WS_HSCROLL,
      CW_USEDEFAULT, 0, CW_USEDEFAULT, 0, NULL, NULL, hInstance, NULL);

   if (!hWnd)
   {
      return FALSE;
   }

  // ShowWindow(hWnd, nCmdShow);
  ShowWindow(hWnd,SW_SHOWMAXIMIZED);
   UpdateWindow(hWnd);

   return TRUE;
}

//
//  FUNCTION: WndProc(HWND, unsigned, WORD, LONG)
//
//  PURPOSE:  Processes messages for the main window.
//
//  WM_COMMAND	- process the application menu
//  WM_PAINT	- Paint the main window
//  WM_DESTROY	- post a quit message and return
//
//
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{

	int wmId, wmEvent;
	PAINTSTRUCT ps;
	HDC hdc;
	int min=0;
	int i;
	switch (message) 
	{
			
		case WM_COMMAND:
			wmId    = LOWORD(wParam); 
			wmEvent = HIWORD(wParam); 
			// Parse the menu selections:
			switch (wmId)
			{
				case IDM_ABOUT:
				   DialogBox(hInst, (LPCTSTR)IDD_ABOUTBOX, hWnd, (DLGPROC)About);
				   break;
				case IDM_EXIT:
				   DestroyWindow(hWnd);
				   break;
				case ID_START:
						if(con==0)
						{
						ga=*(new Gcalc);
						count=0;
						SetTimer(hWnd,0,bet,ontimer);
						con++;
						}
						break;
				case ID_OVER:
						con=0;
						count=0;
						KillTimer(hWnd,0);
						break;
				case ID_STOP:
						KillTimer(hWnd,0);
						break;

				default:
				   return DefWindowProc(hWnd, message, wParam, lParam);
			}
			break;
		case WM_PAINT:
			hdc = BeginPaint(hWnd, &ps);
			Rectangle(hdc,0,0,1500,1500);//刷屏

			for( i=0;i<N;i++)
			{
				if(ga.f(ga.m[min])>ga.f(ga.m[i]))
					min=i;
			}
			if(con!=0)
			for( i=0;i<NUM;i++)
			{
				Point pos=ga.pos[ga.m[min].road[i]],q=ga.pos[ga.m[min].road[(i+1)%NUM]];
				Rectangle(hdc,pos.x,pos.y,pos.x+2,pos.y+2);
				Rectangle(hdc,q.x,q.y,q.x+2,q.y+2);
				LPPOINT  po=new tagPOINT;
				MoveToEx(hdc,pos.x,pos.y,po);
				LineTo(hdc,q.x ,q.y );
				delete po;
			}
			EndPaint(hWnd, &ps);
			break;
		case WM_KEYDOWN:

				if(con==0&&(LOWORD(wParam)==VK_RETURN||LOWORD(wParam)==VK_SPACE))
		{
			ga=*(new Gcalc);
			count=0;
			con++;
			SetTimer(hWnd,0,bet,ontimer);
		}
		else if(LOWORD(wParam)==VK_SPACE&&con!=0)
		{
			if(con%2==1)
			{
				KillTimer(hWnd,0);
				con++;
			}
			else
			{
				con++;
				SetTimer(hWnd,0,bet,ontimer);
			}
		}
		else if(LOWORD(wParam)==VK_END&&con!=0)
			KillTimer(hWnd,0),con=0,count=0;
		break;
		case WM_DESTROY:
			PostQuitMessage(0);
			break;
		default:
			return DefWindowProc(hWnd, message, wParam, lParam);
   }
   return 0;
}

// Mesage handler for about box.
LRESULT CALLBACK About(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
	switch (message)
	{
		case WM_INITDIALOG:
				return TRUE;

		case WM_COMMAND:
			if (LOWORD(wParam) == IDOK || LOWORD(wParam) == IDCANCEL) 
			{
				EndDialog(hDlg, LOWORD(wParam));
				return TRUE;
			}
			break;
	}
    return FALSE;
}
VOID CALLBACK ontimer( HWND hWnd,UINT message,UINT idTimer,DWORD dwTime)
{
HDC hdc=GetDC(hWnd);
	//SetDCBrushColor(hdc,RGB(255,255,255));//设置画刷的颜色
	Rectangle(hdc,0,0,1500,1500);//刷屏

	int min=0;
	for(int i=0;i<N;i++)
	{
		if(ga.f(ga.m[min])>ga.f(ga.m[i]))
			min=i;
	}
	for( i=0;i<NUM;i++)
	{
	//	SetDCPenColor(hdc,RGB(255,0,0));//设置画刷的颜色
	//	HPEN pen1=CreatePen(PS_SOLID,2,RGB(0,230,0));
	//	SelectObject(hdc,pen1);

		Point pos=ga.pos[ga.m[min].road[i]],q=ga.pos[ga.m[min].road[(i+1)%NUM]];
		Rectangle(hdc,pos.x,pos.y,pos.x+2,pos.y+2);
		Rectangle(hdc,q.x,q.y,q.x+2,q.y+2);
	//	SetDCPenColor(hdc,RGB(0,0,0));
		LPPOINT  po=new tagPOINT;
		MoveToEx(hdc,pos.x,pos.y,po);
//		SetDCPenColor(hdc,RGB(255,0,0));
		LineTo(hdc,q.x ,q.y );
		delete po;
	}
	count++;
//PWSTR Buff=new WCHAR[256];LPWSTR Buff=new WCHAR[256];
	char  Buff[256];
  	sprintf(Buff,TEXT("第%d次循环  长：%d"),count,ga.f(ga.m[min]));
	TextOut(hdc,850,100,Buff,strlen(Buff));
	ga.calc(1);
//	delete Buff;
}