filename.~cp

来自「一个仪器的核心程序,它控制通信等方面的工作.」· ~CP 代码 · 共 27 行

//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("filename.res");
USEFORM("filen.cpp", Form1);
USEFORM("TextCon.cpp", Form2);
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
		Application->Initialize();
		Application->Title = "Extract Filename";
		Application->CreateForm(__classid(TForm1), &Form1);
		Application->CreateForm(__classid(TForm2), &Form2);
		Application->Run();
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	return 0;
}
//---------------------------------------------------------------------------