Изменить путь копирования файлов

[volchek3]

Здравствуйте

Идея такая, происходит процесс копирования файлов с диска С на E (копирование происходит через Ctrl+C, Ctrl+V, либо с помощью тотала коммандера, проводник прочее).

Как изменить конечный путь копирования.
Т.е. копируем с С на E а файлы автоматически записываются в E:\Temp\

Использовал функцию CopyFileNextHook('С:\','Е:\Temp\',T RUE); - при копировании происходит завершение программы.

Исходник моей функции перехвата события копирования на диск

procedure searchCange;
const
  Filter =
  FILE_NOTIFY_CHANGE_FILE_NAME or
            FILE_NOTIFY_CHANGE_DIR_NAME or
            FILE_NOTIFY_CHANGE_ATTRIBUTES or
            FILE_NOTIFY_CHANGE_SIZE or
            FILE_NOTIFY_CHANGE_LAST_WRITE or
            FILE_NOTIFY_CHANGE_LAST_ACCESS or
            FILE_NOTIFY_CHANGE_CREATION or
            FILE_NOTIFY_CHANGE_SECURITY;
var
  Dir: THandle;
  Notify: TFileNotifyInformation;
  BytesReturned: DWORD;
begin
usbDrive:='С:\\';
  Dir := CreateFile(usbDrive, GENERIC_READ,
    FILE_SHARE_READ or FILE_SHARE_WRITE or FILE_SHARE_DELETE,
    nil, OPEN_EXISTING, FILE_FLAG_BACKUP_SEMANTICS, 0);
  if Dir <> INVALID_HANDLE_VALUE then
  try
    if not ReadDirectoryChangesW(Dir, @Notify, SizeOf(TFileNotifyInformation),
      False, Filter, @BytesReturned, nil, nil) then
      raise Exception.Create(SysErrorMessage(GetLastError))
    else
    begin
       CopyFileNextHook('С:\\','Е:\\Temp\',TRUE);                                              //функция изменения конечно пути при копировании файлов
      case Notify.Action of
        FILE_ACTION_ADDED: Form4.Memo1.Lines.Add('Создание: ' + Notify.FileName);
        FILE_ACTION_REMOVED: Form4.Memo1.Lines.Add('Удаление: ' + Notify.FileName);
        FILE_ACTION_MODIFIED: Form4.Memo1.Lines.Add('Изменение' + Notify.FileName);
     //   FILE_ACTION_RENAMED_OLD_NAME: Form4.Memo1.Lines.Add('Old Name file' + Notify.FileName);
     //   FILE_ACTION_RENAMED_NEW_NAME: Form4.Memo1.Lines.Add('New Name file' + Notify.FileName);
      end;
        end;
  finally
    CloseHandle(Dir);
  end;
end;