📄 project1.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", frmMain);
USEFORM("Login.cpp", frmLogin);
USEFORM("Student.cpp", frmStudent);
USEFORM("AdminMan.cpp", frmAdmin);
USEFORM("YXMan.cpp", frmYXMan);
USEFORM("WorkMan.cpp", frmWorkMan);
USEFORM("CommonFrm.cpp", frmCommon);
USEFORM("About.cpp", frmAbout);
USEFORM("AdminMain.cpp", frmAdminMan);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
try
{
Application->Initialize();
Application->CreateForm(__classid(TfrmMain), &frmMain);
Application->CreateForm(__classid(TfrmLogin), &frmLogin);
Application->CreateForm(__classid(TfrmStudent), &frmStudent);
Application->CreateForm(__classid(TfrmAdmin), &frmAdmin);
Application->CreateForm(__classid(TfrmYXMan), &frmYXMan);
Application->CreateForm(__classid(TfrmCommon), &frmCommon);
Application->CreateForm(__classid(TfrmWorkMan), &frmWorkMan);
Application->CreateForm(__classid(TfrmAbout), &frmAbout);
Application->CreateForm(__classid(TfrmAdminMan), &frmAdminMan);
Application->Run();
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
catch (...)
{
try
{
throw Exception("");
}
catch (Exception &exception)
{
Application->ShowException(&exception);
}
}
return 0;
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -