Переименовать файл в TP

[privatnebank]

Я не могу понять, почему у меня не получается переименовать файл. Допустим, что имеем такой код

var
F: Text;
begin
Assigm(F, 'C:\var1.txt');
Rename(F, 'var2.txt');
.................................

И мне выдает ошибку Runtime error 017 at 0000:00D8
Error 17: Cannot rename across drivers.
Т.е. оба файла находятся не на одном диске, как оно пишет если нажать F1.

[InfStudent]

Какая учетная запись, свойства файла?

[privatnebank]

Какая учетная запись, свойства файла?

Не знаю... Я просто зашел на диск С, нажал ПКМ-->Создать-->Текстовый документ. Обозвал его var1 и теперь просто пытаюсь его переименовать.

[InfStudent]

только не assigm,a assign

[InfStudent]

var
  myFile : TextFile;
  text   : string;

begin
  // Попытка открыть Test.txt для записи
  AssignFile(myFile, 'Test.txt');
  ReWrite(myFile);

  // Запись нескольких известных слов в этом файл
  WriteLn(myFile, 'Hello');
  WriteLn(myFile, 'World');

  // Закрытие файла
  CloseFile(myFile);

  // Попытка переименовать файл - гарантируется, что никакой такой файл не существует сначала!
  DeleteFile('NewName.txt');
  Rename(myFile, 'NewName.txt');

  / CloseFile(myFile);
end;

[privatnebank]

Спасибо... Пока понятно

[InfStudent]

Просто в принципе у вас код верный, но я просто подумал вдруг у вас какие то ограничения на операции с файлами самой системой наложены