sysinfo.cpp

来自「使用改进的遗传算法实现简单的高校排课」· C++ 代码 · 共 23 行

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

#include <vcl.h>
#pragma hdrstop

#include "sysinfo.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TSysInfoForm *SysInfoForm;
//---------------------------------------------------------------------------
__fastcall TSysInfoForm::TSysInfoForm(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TSysInfoForm::FormClose(TObject *Sender, TCloseAction &Action)
{
     Action = caFree;          
}
//---------------------------------------------------------------------------