wincon8000_a.cpp

《WinCE.NET嵌入式工业用控制器及自动控制系统设计》的源代码

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
USERES("WinCON8000_A.res");
USEFORM("main.cpp", Form1);
USEFORM("About.cpp", AboutBox);
USEUNIT("STD_SUB.cpp");
USEFORM("OpenTCP.cpp", OpenTCPDlg);
USELIB("MBToolb.lib");
USEFORM("TMCN_Def.cpp", TMCNDefDlg);
USEFORM("DIDO_Def.cpp", DIDODefDlg);
USEFORM("AIAO_Def.cpp", AIAODefDlg);
USEFORM("MBMaster_Dlg.cpp", MBMasterDlg);
USEFORM("TAGDef.cpp", Form2);
USEFORM("AIAO_Dlg.cpp", AIAODlg);
USEFORM("DIDO_Dlg.cpp", DIDODlg);
USEFORM("TMCN_Dlg.cpp", TMCNDlg);
USEFORM("IOModule.cpp", IOModule_Dlg);
USEFORM("MixDisp_Dlg.cpp", MixDispDlg);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(TForm1), &Form1);
                 Application->CreateForm(__classid(TAboutBox), &AboutBox);
                 Application->CreateForm(__classid(TOpenTCPDlg), &OpenTCPDlg);
                 Application->CreateForm(__classid(TTMCNDefDlg), &TMCNDefDlg);
                 Application->CreateForm(__classid(TDIDODefDlg), &DIDODefDlg);
                 Application->CreateForm(__classid(TAIAODefDlg), &AIAODefDlg);
                 Application->CreateForm(__classid(TMBMasterDlg), &MBMasterDlg);
                 Application->CreateForm(__classid(TForm2), &Form2);
                 Application->CreateForm(__classid(TAIAODlg), &AIAODlg);
                 Application->CreateForm(__classid(TDIDODlg), &DIDODlg);
                 Application->CreateForm(__classid(TTMCNDlg), &TMCNDlg);
                 Application->CreateForm(__classid(TIOModule_Dlg), &IOModule_Dlg);
                 Application->CreateForm(__classid(TMixDispDlg), &MixDispDlg);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        return 0;
}
//---------------------------------------------------------------------------