threads.cpp

来自「C++ Builder 6 编程实例教程-北京希望电子出版社出版」· C++ 代码 · 共 30 行

//----------------------------------------------------------------------------
//Borland C++Builder
//Copyright (c) 1987, 1998-2002 Borland International Inc. All Rights Reserved.
//----------------------------------------------------------------------------
//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------
USEFILE("readme.txt");
USEFORM("ThSort.cpp", ThreadSortForm);
USEUNIT("Sortthd.cpp");
USERES("Threads.res");
//----------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
    Application->Initialize();
    Application->CreateForm(__classid(TThreadSortForm), &ThreadSortForm);
    Application->Run();
   }
   catch (Exception &exception)
   {
      Application->ShowException(&exception);
   }

   return 0;
}
//---------------------------------------------------------------------