datamaintain.cpp

BCB 级联表的设计源代码。有需要的朋友可以看看。BCB这个东西不知道还有人用么。以往是我的最爱。

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

#include <vcl.h>
#pragma hdrstop
USERES("DataMaintain.res");
USEFORM("Main.cpp", frmMaintain);
USEFORM("Database.cpp", dmeDatabase); /* TDataModule: File Type */
USEFORM("Detail.cpp", frmDetail);
USEFORM("FieldText.cpp", frmFieldText);
USEFORM("RecordReport.cpp", frmRecordReport);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                 Application->Initialize();
                 Application->CreateForm(__classid(TfrmMaintain), &frmMaintain);
                 Application->CreateForm(__classid(TdmeDatabase), &dmeDatabase);
                 Application->CreateForm(__classid(TfrmDetail), &frmDetail);
                 Application->CreateForm(__classid(TfrmFieldText), &frmFieldText);
                 Application->CreateForm(__classid(TfrmRecordReport), &frmRecordReport);
                 Application->Run();
        }
        catch (Exception &exception)
        {
                 Application->ShowException(&exception);
        }
        return 0;
}
//---------------------------------------------------------------------------