Section courante

A propos

Section administrative du site

ERASE

Efface
Turbo Pascal 1+ System

Syntaxe

Procedure Erase(fich:File);

Paramètres

Nom Description
fich Ce paramètre permet d'indiquer l'identificateur de fichier

Description

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

Remarques

Exemple

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

  1. Program EraseSamples;
  2.  
  3. Var
  4.  F:File;
  5.  Err:Word;
  6.  
  7. BEGIN
  8.   {$I-}Assign(F,'TEST.BAK');
  9.   Erase(F);
  10.   {$I+}
  11.   Err:=IoResult;
  12.   If Err<>0Then WriteLn('Erreur numero ',Err,' lors de la suppression');
  13. END.

Référence

Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 161.
Le grand livre du Turbo & Borland Pascal 7.0, Edition Micro Application, Reiner Scholles, 1993, ISBN: 2-86899-873-9, page 1227.

Dernière mise à jour : Dimanche, le 25 janvier 2015