inherit.cpp

很经典的数据库代码

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

#include <vcl.h>
#pragma hdrstop

#include "Inherit.h"         //MDIChild被继承子窗体头文件
#include "DataModule.h"      //数据模块窗体头文件
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TF_Inherit *F_Inherit;
//---------------------------------------------------------------------------
__fastcall TF_Inherit::TF_Inherit(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TF_Inherit::FormClose(TObject *Sender,
      TCloseAction &Action)
{   /*****窗口关闭事件*****/
    Action = caFree;  //释放空间
}
//---------------------------------------------------------------------------