Fichiers
SPEL+ possède plusieurs commandes pour la gestion de fichiers.
| Mot clé | Description |
|---|---|
| AOpen | Ouvre un fichier pour append. |
| BOpen | Ouvre un fichier pour un accès binaire. |
| Fermer | Ferme un fichier. |
| FileExists | Vérifie si un fichier existe. |
| FolderExists | Vérifie si un dossier existe. |
| FreeFile | Renvoie un gestionnaire de fichier inutilisé. |
| Input | Saisit une ou plusieurs variables depuis un fichier |
| Suppr | Supprime un fichier. |
| Line Input | Entre la ligne d'un fichier. |
| Read | Lit un nombre spécifié d'octets dans une variable de chaîne. |
| ReadBin | Lit les données binaires. |
| ROpen | Ouvre un fichier en mode lecture seule. |
| Seek | Règle le pointeur de fichier actuel. |
| Flush | Écrit un tampon de données sur un disque. |
| WOpen | Ouvre un fichier en mode écriture. |
| Write | Écrit la chaîne dans le fichier. Le terminateur de ligne n'est pas ajouté. |
| WriteBin | Écrit des données binaires. |
Avant d'utiliser un fichier, vous devez l'ouvrir avec l'une des commandes suivantes : AOpen, Bopen, ROpen et WOpen. Et spécifiez un numéro de fichier dans l'instruction Ouvrir. Le numéro de fichier peut être compris entre 30 et 63.
Voici un exemple pour enregistrer un fichier texte et le lire.
String data$(10)
Function SaveData()
Integer fNum, i
fNum = FreeFile
WOpen "c:\mydata\data.txt" As #fNum ' Store the count
Print #fNum, UBound(data$)
For i = 0 To UBound(data$)
Print #fNum, data$(i)
Next i
Close #fNum
Fend
Function LoadData()
Integer fNum, i, maxNum
fNum = FreeFile
ROpen "c:\mydata\data.txt" As #fNum
Input #fNum, maxNum
Redim data$(maxNum)
For i = 0 To UBound(data$)
Input #fNum, data$(i)
Next i
Close #fNum
Fend