ga.cpp

来自「遗传算法求解tsp文题 里面包括了执行文件」· C++ 代码 · 共 27 行

//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Unit_Main.cpp", ASForm);
USEFORM("Unit1.cpp", AboutBox);
USEUNIT("Unit3.cpp");
USERES("GA.res");
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
		Application->Initialize();
		Application->Title = "TSP by Genetic Algorithm";
		Application->CreateForm(__classid(TASForm), &ASForm);
		Application->CreateForm(__classid(TAboutBox), &AboutBox);
		Application->Run();
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	return 0;
}
//---------------------------------------------------------------------------