WriteWord()

Syntaxe

Resultat = WriteWord(#Fichier, Valeur)
Description
Ecrit une valeur de type 'word' (2 octets signés).

Arguments

#Fichier Le fichier à utiliser.
Valeur La valeur à écrire.

Valeur de retour

Renvoie une valeur non nulle si l'opération a réussi et zéro si elle a échoué.

Remarques

En raison de la mise en mémoire tampon, cette fonction peut retourner une valeur avec succès même s'il n'y a pas assez d'espace disponible sur le périphérique de sortie pour l'opération d'écriture.

Le fichier doit être ouvert en utilisant une fonction d'écriture compatible (c'est à dire pas avec ReadFile()).

Exemple

  If CreateFile(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() 
    WriteWord(0, 142)
    WriteStringN(0, "... une autre ligne à la fin du fichier.")
    CloseFile(0)
  EndIf
  If ReadFile(0, "Test.txt")   ; Si le fichier peut être lu , on continue...
    While Eof(0) = 0           ; Boucle tant que la fin du fichier n'est pas atteinte. (Eof = 'End Of File') 
      Debug ReadWord(0)        ; Affiche ligne par ligne le contenu du fichier
    Wend
    CloseFile(0)               ; Ferme le fichier précédemment ouvert
  Else
    MessageRequester("Information","Impossible d'ouvrir le fichier!")
  EndIf

Voir aussi

ReadWord(), CreateFile(), OpenFile()

OS Supportés

Tous

<- WriteUnicodeCharacter() - File Index