Langage de programmation - Free Pascal - Référence de procédures et fonctions

ERASE	Efface
Free Pascal	System

Syntaxe

Procedure Erase(Var f);

Procedure Erase(Var t:Text);

Paramètres

Nom	Description
f	Ce paramètre permet d'indiquer l'identificateur de fichier.
t	Ce paramètre permet d'indiquer l'identificateur de fichier texte.

Description

Cette procédure permet de supprimer un fichier sur le disque.

Remarques

La procédure Erase supprime un fichier non ouvert du disque. Le fichier doit être attribué avec Assign, mais pas ouvert avec Reset ou Rewrite.
En fonction de l'état de la directive {$I}, une erreur d'exécution peut être générée en cas d'erreur. Dans l'état {$I-}, utilisez IOResult pour rechercher les erreurs.

Exemple

L'exemple suivant permet de supprimer le fichier «TEST.BAK» :



Program EraseSamples;

 
Var

 F:File;

 Err:Word;

 
BEGIN

  {$I-}Assign(F,'TEST.BAK');

  Erase(F);

  {$I+}

  Err:=IoResult;

  If Err<>0Then WriteLn('Erreur numero ',Err,' lors de la suppression');

END.

Voir également

Langage de programmation - Free Pascal - Référence de procédures et fonctions - «Assign»

Dernière mise à jour : Samedi, le 18 juillet 2015

Section courante

A propos

Section administrative du site

ERASE