📄 book.dpr
字号:
{
模块名称:工程文件
使用方法:无
返回值: 无
}
program Book;
uses
Registry,
Windows,
Forms,
Main in 'Main.pas' {FormMain},
Setup in 'Setup.pas' {FormSetup},
InputYe in 'InputYe.pas' {FormInputYe},
About in 'About.pas' {FormAbout},
Game in 'Game.pas' {FormGame},
GameAbout in 'GameAbout.pas' {FormGameAbout},
Mess in 'Mess.pas' {FormMess},
LabelInput in 'LabelInput.pas' {FormLabelInput},
ClearNew in 'ClearNew.pas' {FormClearNew},
MoreName in 'MoreName.pas' {FormMoreName},
Alarm in 'Alarm.pas' {FormAlarm},
MP3Play in 'MP3Play.pas' {FormMP3Play},
Search in 'Search.pas' {FormSearch},
ZipPrev in 'ZipPrev.pas' {FormZipPrev},
Global in 'Global.pas';
{$R *.RES}
begin
//初始化程序
Application.Initialize;
Application.Title := '电子小说阅读器';
//建立注册表
g_Regini := TRegIniFile.Create('');
g_Regini.RootKey := HKEY_LOCAL_MACHINE;
//建立显示信息窗口
FormMess := TFormMess.Create(Application);
//建立MP3播放窗口
FormMP3Play := TFormMP3Play.Create(Application);
//建立查找窗口
FormSearch := TFormSearch.Create(Application);
//建立隐藏游戏窗口
FormGame := TFormGame.Create(Application);
//建立主窗口
Application.CreateForm(TFormMain, FormMain);
//运行程序
Application.Run;
//释放各个窗口
FormGame.Free;
FormSearch.Free;
FormMess.Free;
FormMP3Play.Free;
//释放注册表
g_Regini.Free;
//中断程序
Application.Terminate;
end.
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -