home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1997 April
/
Chip_1997-04_cd.bin
/
prezent
/
cb
/
data.z
/
MASTAPP.CPP
< prev
next >
Wrap
C/C++ Source or Header
|
1997-01-16
|
3KB
|
51 lines
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("main.cpp", MainForm);
USEDATAMODULE("Datamod.cpp", MastData);
USEFORM("about.cpp", AboutBox);
USEFORM("qrycust.cpp", QueryCustDlg);
USEFORM("brparts.cpp", BrPartsForm);
USEFORM("brcstord.cpp", BrCustOrdForm);
USEFORM("edcust.cpp", EdCustForm);
USEFORM("pickdate.cpp", BrDateForm);
USEFORM("srchdlg.cpp", SearchDlg);
USEFORM("splash.cpp", SplashForm);
USEFORM("edparts.cpp", EdPartsForm);
USEFORM("edorders.cpp", EdOrderForm);
USEFORM("mainprnt.cpp", MainPrintForm);
USEFORM("preview.cpp", PrevForm);
USEFORM("CustRpt.cpp", CustReportForm);
USEFORM("OrderRpt.cpp", OrdersReportForm);
USEFORM("Invoice.cpp", InvoiceReportForm);
USEFORM("PickRep.cpp", PickOrdDlg);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
Application->Initialize();
Application->Title = "Marine Adventures Order Entry";
Application->HelpFile = "C:\\ebony\\Examples\\db\\mastapps\\Mastapp.hlp";
Application->CreateForm(__classid(TMainForm), &MainForm);
Application->CreateForm(__classid(TMastData), &MastData);
Application->CreateForm(__classid(TAboutBox), &AboutBox);
Application->CreateForm(__classid(TQueryCustDlg), &QueryCustDlg);
Application->CreateForm(__classid(TBrPartsForm), &BrPartsForm);
Application->CreateForm(__classid(TBrCustOrdForm), &BrCustOrdForm);
Application->CreateForm(__classid(TEdCustForm), &EdCustForm);
Application->CreateForm(__classid(TBrDateForm), &BrDateForm);
Application->CreateForm(__classid(TSearchDlg), &SearchDlg);
Application->CreateForm(__classid(TEdPartsForm), &EdPartsForm);
Application->CreateForm(__classid(TEdOrderForm), &EdOrderForm);
Application->CreateForm(__classid(TMainPrintForm), &MainPrintForm);
Application->CreateForm(__classid(TPrevForm), &PrevForm);
Application->CreateForm(__classid(TCustReportForm), &CustReportForm);
Application->CreateForm(__classid(TOrdersReportForm), &OrdersReportForm);
Application->CreateForm(__classid(TInvoiceReportForm), &InvoiceReportForm);
Application->CreateForm(__classid(TPickOrdDlg), &PickOrdDlg);
Application->Run();
return 0;
}
//---------------------------------------------------------------------------