program BackUp;

uses
  Forms, SysUtils,Windows,
  BackUp_Form in 'BackUp_Form.pas' {Backup_F};

{$R *.res}

begin
  Application.Initialize;
  if (ParamCount=0)or(LowerCase(ParamStr(1))<>'han_backup') then
    begin
      MessageBox(0,'注意：本程序不能單獨運行！','非法運行',MB_OK or MB_ICONINFORMATION);
      exit;
    end;
  Application.CreateForm(TBackup_F, Backup_F);
  Application.Run;
end.