ReadInteger()
Syntaxe
Resultat.i = ReadInteger(#Fichier)Description
Lit un nombre entier 'integer' (4 octets sur les exécutables 32 bits, ou 8 octets sur les exécutables 64 bits).
Arguments
#Fichier Le fichier à utiliser.
Valeur de retour
Renvoie le nombre entier ou zéro si une erreur s'est produite.
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() WriteInteger(0,123456789) 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 ReadInteger(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
WriteInteger(), OpenFile(), ReadFile()
OS Supportés
Tous