teacher.dpr

来自「网络教室delphi源码」· DPR 代码 · 共 40 行

DPR
40
字号
program teacher;

uses
  Forms,
  MAIN in 'MAIN.pas' {Form1},
  TELock in 'TELock.pas' {Lockf},
  Sxinxi in 'Sxinxi.pas' {SxinxiF},
  jingcheng in 'jingcheng.pas' {jingchengf},
  Pingmu in 'Pingmu.pas' {PingMuf},
  YuanC in 'YuanC.pas' {YuanCf},
  TMovie in 'TMovie.pas' {TmovieF},
  Banji in 'Banji.pas' {BanJif},
  brushp in 'brushp.pas' {Brushf},
  Guangbo in 'Guangbo.pas' {Guangbof},
  Guanji in 'Guanji.pas' {Guanjif},
  Chongqi in 'Chongqi.pas' {ChongQif},
  TeacherMessage in 'TeacherMessage.pas' {MessageF},
  FastShe in 'FastShe.pas' {FastShef},
  TaoLun in 'TaoLun.pas' {TaoLunf},
  soundf in 'soundf.pas' {sound},
  jGuangbo in 'jGuangbo.pas' {jGuangbof},
  duijiangf in 'duijiangf.pas' {duijiang},
  exitf in 'exitf.pas' {exit1},
  aboutf in 'aboutf.pas' {about};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '网络教室';
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TjGuangbof, jGuangbof);
  Application.CreateForm(Tsound, sound);
  Application.CreateForm(Tduijiang, duijiang);
  Application.CreateForm(Texit1, exit1);
  Application.CreateForm(Tabout, about);
  Application.Run;
end.

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?