anchor.diff:    end;
   end;
   
  +initialization
  +{$IFDEF MSWINDOWS}
  +  Pointer(pfnCreateHardLinkW):= GetProcAddress(SafeLoadLibrary(KernelDLL), 'CreateHardLinkW');
  +{$ENDIF}
   end.
   
  
positive.code: 
  implementation
  
  const
    FileCopyFlags = [cffPreserveTime];
  
  
negative.code:   FTargetDir: string;
    FFlags: TCopyFileFlags;
    FCopyFailedCount: integer;
    FCopyAsHardlinks: boolean;
  protected
    procedure DoFileFound; override;
    procedure DoDirectoryFound; override;
  