TruncateFile()

Syntaxe

TruncateFile(#Fichier)
Description
Coupe le fichier à la position courante et supprime toutes les données qui suivent.

Arguments

#Fichier Le fichier à utiliser.

Valeur de retour

Aucune.

Remarques

Cette fonction peut être employée pour rendre un fichier plus court sans le recréer entièrement. Pour faire un fichier plus long, ajoutez simplement plus de données avec les commandes d'écriture de cette bibliothèque.

Exemple

  If OpenFile(0, "Test.txt")    ; Ouvre un fichier existant ou en crée un nouveau s'il n'existait pas
    FileSeek(0, Lof(0))         ; Place le pointeur à la fin du fichier en utilisant le résultat de Lof() 
    For i = 1 To 10
      WriteStringN(0, "... une autre ligne à la fin du fichier.")
    Next i
    CloseFile(0)
  EndIf

  Taille.q=FileSize("Test.txt") ; Taille
  Debug Taille
  If OpenFile(0, "Test.txt")
    FileSeek(0,Taille/2) ; Le pointeur se place à la moitié du fichier
    TruncateFile(0)      ; On coupe le fichier au niveau du pointeur
    CloseFile(0)
  EndIf
  Debug FileSize("Test.txt") ; Nouvelle Taille

Voir aussi

FileSeek(), Loc()

OS Supportés

Tous

<- ReadWord() - File Index - WriteAsciiCharacter() ->