tyhj.dpr

来自「一个简单的同学录软件」· DPR 代码 · 共 38 行

program tyhj;

uses
  Forms,
  frmlogin in 'frmlogin.pas' {FmLogin},
  xUtils in 'XUTILS.PAS',
  frmMain in 'frmMain.pas' {fmMain},
  rcdStud in 'rcdStud.pas',
  FrmDataIn in 'FrmDataIn.pas' {FmDataIn},
  FrmCardView in 'FrmCardView.pas' {FmCardView},
  FrmGrxx in 'FrmGrxx.pas' {FmGrxx: TFrame},
  FrmJbxx in 'FrmJbxx.pas' {FmJbxx: TFrame},
  FrmDwxx in 'FrmDwxx.pas' {FmDwxx: TFrame},
  FrmJtxx in 'FrmJtxx.pas' {FmJtxx: TFrame},
  FrmChangePassword in 'FrmChangePassword.pas' {FmCP},
  FrmSSendMail in 'FrmSSendMail.pas' {fmSSendmail},
  FrmSmtpSetup in 'FrmSmtpSetup.pas' {FmSmtpSetup},
  FrmOsoonUser in 'FrmOsoonUser.pas' {FmOsoonUser},
  FrmHttp in 'FrmHttp.pas' {fmHttp: TFrame},
  FrmAbout in 'FrmAbout.pas' {FmAbout};

{$R *.RES}

begin
  Application.Initialize;
  Application.Title := '天涯海角同学录';
  Application.CreateForm(TFmLogin, FmLogin);
  Application.CreateForm(TfmMain, fmMain);
  Application.CreateForm(TFmDataIn, FmDataIn);
  Application.CreateForm(TFmCardView, FmCardView);
  Application.CreateForm(TFmCP, FmCP);
  Application.CreateForm(TfmSSendmail, fmSSendmail);
  Application.CreateForm(TFmSmtpSetup, FmSmtpSetup);
  Application.CreateForm(TFmOsoonUser, FmOsoonUser);
  Application.CreateForm(TFmAbout, FmAbout);
  Application.Run;
end.