//---------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------
USEFORM("Main.cpp", MainForm);
USEFORM("ChildWin.cpp", MDIChild);
USERES("..\..\..\res\LEAD.res");
USEFORM("about.cpp", AboutBox);
USEUNIT("Userbtmp.cpp");
USEFORM("RangeDlg.cpp", RangeDlg);
USEFORM("PattDlg.cpp", PatternDlg);
USEFORM("CrtAnim.cpp", CtrAnimationDlg);
USEFORM("ColorMrg.cpp", ColorMerg);
USEFORM("AnimStng.cpp", AnimtionStng);
USELIB("..\..\..\..\lib\ltwen_bc.lib");
USEFILE("BrowseFileDlg.h");
USEUNIT("BrowseFileDlg.cpp");

#include "all.h"
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
   //Load Needed LEAD libraries
   LBase::LoadLibraries(LT_FIL | LT_KRN | LT_DIS | LT_EFX |
                        LT_TWN | LT_DLG | LT_IMG | LT_ISI |
                        LT_SCR | LT_TMB | LT_LST);
   LBase::SetErrorListDepth(100);
   WRPUNLOCKSUPPORT();

   Application->Initialize();
   Application->CreateForm(__classid(TMainForm), &MainForm);
   Application->CreateForm(__classid(TAboutBox), &AboutBox);
   Application->CreateForm(__classid(TRangeDlg), &RangeDlg);
   Application->CreateForm(__classid(TPatternDlg), &PatternDlg);
   Application->CreateForm(__classid(TCtrAnimationDlg), &CtrAnimationDlg);
   Application->CreateForm(__classid(TColorMerg), &ColorMerg);
   Application->CreateForm(__classid(TAnimtionStng), &AnimtionStng);
   Application->Run();
   return 0;
}
//---------------------------------------------------------------------