pscnc.cpp

用BC++编写的带PIC-SERVO CMC运动控制器的3轴钻床控制器和G代码解释程序.

//---------------------------------------------------------------------------
#include <vcl\vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("main.cpp", MainForm);
USERES("PSCNC.res");
USELIB("nmclib02.lib");
USELIB("pathlib.lib");
USEFORM("warning.cpp", WarningForm);
USEFORM("home.cpp", HomeForm);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
		Application->Initialize();
		Application->CreateForm(__classid(TMainForm), &MainForm);
		Application->CreateForm(__classid(TWarningForm), &WarningForm);
		Application->CreateForm(__classid(THomeForm), &HomeForm);
		Application->Run();
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	return 0;
}
//---------------------------------------------------------------------------