rasdial.~dpr

来自「用于电话拨号上网的 原代码 很好使用的」· ~DPR 代码 · 共 28 行

program RasDial;

uses
  Forms,
  RasDial1 in 'RasDial1.pas' {RasDialerForm},
  Ras in 'Ras.pas',
  Logmsg in 'Logmsg.pas',
  Formpos in 'Formpos.pas',
  FormAuto in 'Formauto.pas' {AutoForm},
  RasDial2 in 'RasDial2.pas' {AboutForm},
  RasDial3 in 'RasDial3.pas' {ConfigureAutoForm},
  RasDial4 in 'RasDial4.pas' {TimeAutoForm},
  RasDial5 in 'RasDial5.pas' {TimePasswordAutoForm};

{$R *.RES}

begin
  Log := TLogMsg.Create('');
  Application.Initialize;
  Application.CreateForm(TRasDialerForm, RasDialerForm);
  Application.CreateForm(TAboutForm, AboutForm);
  Application.CreateForm(TConfigureAutoForm, ConfigureAutoForm);
  Application.CreateForm(TTimeAutoForm, TimeAutoForm);
  Application.CreateForm(TTimePasswordAutoForm, TimePasswordAutoForm);
  Application.Run;
  Log.Destroy;
end.