//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("InstallManager.res");
USEFORM("MainFrm.cpp", MainForm);
USEFORM("StatusFrm.cpp", StatusForm);
USEFORM("RemoteMntFrm.cpp", RemoteMntForm);
USEFORM("InfoFrm.cpp", InfoForm);
USEFORM("cipherfrm.cpp", CipherForm);
USEFORM("UninstallFrm.cpp", UninstallForm);
USELIB("libcurl.lib");
USELIB("curl\lib\ws2_32.lib");
USELIB("..\..\..\icu-sword\as_is\borland\icudatab.lib");
USEUNIT("..\..\swwinlog.cpp");
USEUNIT("..\..\..\sword\src\mgr\installmgr.cpp");
USELIB("..\..\..\sword\lib\libsword.lib");
USELIB("..\..\..\icu-sword\as_is\borland\icuuc.lib");
USELIB("..\..\..\icu-sword\as_is\borland\icuin.lib");
USEUNIT("..\..\..\sword\src\mgr\curlftpt.cpp");
USEUNIT("..\..\..\sword\src\mgr\ftptrans.cpp");
USELIB("..\..\clucene\clucene.lib");
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
	try
	{
		Application->Initialize();
		Application->Title = "Install Manager";
		Application->CreateForm(__classid(TMainForm), &MainForm);
		Application->CreateForm(__classid(TStatusForm), &StatusForm);
		Application->CreateForm(__classid(TRemoteMntForm), &RemoteMntForm);
		Application->CreateForm(__classid(TInfoForm), &InfoForm);
		Application->CreateForm(__classid(TCipherForm), &CipherForm);
		Application->CreateForm(__classid(TUninstallForm), &UninstallForm);
		Application->Run();
	}
	catch (Exception &exception)
	{
		Application->ShowException(&exception);
	}
	return 0;
}
//---------------------------------------------------------------------------