book.dpr

编写

program Book;

uses
  Forms,
  main in 'main.pas' {f_main},
  Setup in 'Setup.pas' {f_setup},
  ye in 'Ye.pas' {f_ye},
  helpa in 'helpa.pas' {f_help_about},
  helpag in 'helpag.pas' {f_help_about_game},
  helpaga in 'helpaga.pas' {f_help_about_game_about},
  mess in 'mess.pas' {f_mess},
  LabelIn in 'LabelIn.pas' {f_LabelIn},
  clearnew in 'clearnew.pas' {f_clearnew},
  togaut in 'togaut.pas' {f_TogAut},
  alarm in 'alarm.pas' {f_Alarm},
  mp3play in 'mp3play.pas' {f_mp3play},
  search in 'search.pas' {f_Search},
  zipprev in 'zipprev.pas' {f_zipprev};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '电子小说阅读器';
  Application.CreateForm(Tf_main, f_main);
  Application.CreateForm(Tf_setup, f_setup);
  Application.CreateForm(Tf_mp3play, f_mp3play);
  Application.CreateForm(Tf_mess, f_mess);
  Application.CreateForm(Tf_ye, f_ye);
  Application.CreateForm(Tf_LabelIn, f_LabelIn);
  Application.CreateForm(Tf_clearnew, f_clearnew);
  Application.CreateForm(Tf_Alarm, f_Alarm);
  Application.CreateForm(Tf_Search, f_Search);
  Application.CreateForm(Tf_TogAut, f_TogAut);
  Application.CreateForm(Tf_help_about, f_help_about);
  Application.CreateForm(Tf_help_about_game, f_help_about_game);
  Application.CreateForm(Tf_help_about_game_about, f_help_about_game_about);
  Application.CreateForm(Tf_zipprev, f_zipprev);
  Application.Run;
end.