Cette procédure permet de renommer le nom d'un fichier à partir de son identificateur de fichier.

Procedure Rename(Var fich:File; nouveaunom:String);