//*-----------------------------------------------------------------------------
//*  系統名稱：數據自動備份系統
//*  作    者：陳春華
//*  開發時間：2005
//*  Windows2000 Server + SQL Server2000 + Delphi7
//*  功能簡介：
//*              軟件可自動完成SQL Server數據庫和文檔的數據定時自動備份，
//*          由用戶選擇對哪些數據庫或文檔進行數據備份，提供對備份、還原
//*          數據作業的管理、分析、日志跟蹤等功能，備份頻率不受限制。
//*-----------------------------------------------------------------------------
program Backup;

uses
  Forms,
  MainUnit in 'MainUnit.pas' {MainForm},
  NewDBBackupItem in 'NewDBBackupItem.pas' {NewDBBackupForm},
  SqlFunctionUnit in 'SqlFunctionUnit.pas',
  BackupThreadUnit in 'BackupThreadUnit.pas',
  DBBackupDesignUnit in 'DBBackupDesignUnit.pas' {DBBackupDesignForm},
  DBBackupSetupFinishUnit in 'DBBackupSetupFinishUnit.pas' {DBBackupSetupFinishForm},
  VariableUnit in 'VariableUnit.pas',
  DataModuleUnit in 'DataModuleUnit.pas' {DM: TDataModule},
  FileBackupThreadUnit in 'FileBackupThreadUnit.pas',
  FileBackupDesignUnit in 'FileBackupDesignUnit.pas' {FileBackupDesignForm},
  LogShowUnit in 'LogShowUnit.pas' {LogShowForm},
  AboutUnit in 'AboutUnit.pas' {about},
  RestoreThreadUnit in 'RestoreThreadUnit.pas',
  DBRestoreUnit in 'DBRestoreUnit.pas' {RestoreForm};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := '數據庫自動備份系統';
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TNewDBBackupForm, NewDBBackupForm);
  Application.CreateForm(TDBBackupDesignForm, DBBackupDesignForm);
  Application.CreateForm(TDBBackupSetupFinishForm, DBBackupSetupFinishForm);
  Application.CreateForm(TDM, DM);
  Application.CreateForm(TFileBackupDesignForm, FileBackupDesignForm);
  Application.CreateForm(Tabout, about);
  Application.CreateForm(TRestoreForm, RestoreForm);
  Application.Run;
end.