addressbook.dpr

来自「Delphi编写的通讯录」· DPR 代码 · 共 27 行

program AddressBook;

uses
  Forms,
  LoginUnit in 'LoginUnit.pas' {LoginForm},
  AboutUnit in 'AboutUnit.pas' {MainForm},
  MainUnit in 'MainUnit.pas' {AboutForm},
  AddAccountUnit in 'AddAccountUnit.pas' {AddAccountForm},
  ChangePurviewFormUnit in 'ChangePurviewFormUnit.pas' {ChangePurViewFrorm},
  DelAccountUnit in 'DelAccountUnit.pas' {DelAccountForm},
  ChangePwdUnit in 'ChangePwdUnit.pas' {ChangePwdForm};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '';
  Application.CreateForm(TLoginForm, LoginForm);
  Application.CreateForm(TAddAccountForm, AddAccountForm);
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TAboutForm, AboutForm);
  Application.CreateForm(TChangePurViewFrorm, ChangePurViewFrorm);
  Application.CreateForm(TDelAccountForm, DelAccountForm);
  Application.CreateForm(TChangePwdForm, ChangePwdForm);
  Application.Run;
end.