bas2pdb.cpp

来自「smallbasic for linux」· C++ 代码 · 共 26 行

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
USERES("bas2pdb.res");
USEFORM("conv_main.cpp", FCSMain);
USEUNIT("pdb.cpp");
USEFORM("conv_view.cpp", frmView);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
		Application->Initialize();
		Application->CreateForm(__classid(TFCSMain), &FCSMain);
		Application->CreateForm(__classid(TfrmView), &frmView);
		Application->Run();
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	return 0;
}
//---------------------------------------------------------------------------