filetest.dpr

来自「软件可自动完成SQL Server数据库和文档的数据定时自动备份」· DPR 代码 · 共 30 行

program FileTest;

uses
  Forms,
  FileTestUnit in 'FileTestUnit.pas' {FileTestForm},
  TestFunctionUnit in 'TestFunctionUnit.pas',
  SingleSizeThreadUnit in 'SingleSizeThreadUnit.pas',
  TestVarAllUnit in 'TestVarAllUnit.pas',
  SingleUnit in 'SingleUnit.pas' {SingleForm},
  SingleLastModifyTimeUnit in 'SingleLastModifyTimeUnit.pas',
  FolderUnit in 'FolderUnit.pas' {FolderForm},
  FolderSizeThreadUnit in 'FolderSizeThreadUnit.pas',
  FolderLastModifyThreadUnit in 'FolderLastModifyThreadUnit.pas',
  FileTransferThreadUnit in 'FileTransferThreadUnit.pas',
  FolderCopyUnit in 'FolderCopyUnit.pas' {FolderCopyForm},
  SingleTransferUnit in 'SingleTransferUnit.pas' {SingleTransferForm},
  SingleTransferThreadUnit in 'SingleTransferThreadUnit.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TFileTestForm, FileTestForm);
  Application.CreateForm(TSingleForm, SingleForm);
  Application.CreateForm(TFolderForm, FolderForm);
  Application.CreateForm(TFolderCopyForm, FolderCopyForm);
  Application.CreateForm(TSingleTransferForm, SingleTransferForm);
  Application.Run;
end.