?? easyhis.cpp
字號:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
USERES("EasyHIS.res");
USEFORM("src\BaseFrm.cpp", frmBase);
USEFORM("src\MainFrm.cpp", frmMain);
USEFORM("src\ProInfFrm.cpp", frmProInf);
USEFORM("src\LogonFrm.cpp", frmLogon);
USEFORM("src\MainDm.cpp", dmMain); /* TDataModule: File Type */
USEUNIT("src\ConstUnt.cpp");
USEUNIT("src\DBConn.cpp");
USEFORM("src\NewCltFrm.cpp", frmNewClt);
USEFORM("src\OptInfFrm.cpp", frmOptInf);
USEFORM("src\BasicInfFrm.cpp", frmBasicInf);
USEFORM("src\OptKndFrm.cpp", frmOptKnd);
USEFORM("src\ChPwdFrm.cpp", frmChPwd);
USEFORM("src\TableManFrm.cpp", frmTableMan);
USEFORM("src\WizardFrm.cpp", frmWizard);
USEFORM("src\MedicalFrm.cpp", frmMedical);
USEFORM("src\ExamFrm.cpp", frmExam);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->Title = "EasyHIS Beta 0.91";
Application->CreateForm(__classid(TdmMain), &dmMain);
Application->CreateForm(__classid(TfrmMain), &frmMain);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
return 0;
}
//---------------------------------------------------------------------------
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -