ReadUnicodeCharacter()
Syntaxe
Resultat.u = ReadUnicodeCharacter(#Fichier)Description
Lit un caractère unicode (2 octets non signés).
Arguments
#Fichier Le fichier à utiliser.
Valeur de retour
Renvoie le caractère lu ou zéro en cas d'erreur.
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() WriteUnicodeCharacter(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 ReadUnicodeCharacter(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
WriteUnicodeCharacter(), ReadAsciiCharacter(), ReadCharacter(), OpenFile(), ReadFile()
OS Supportés
Tous