Manuel du langage de script Desktop Management › Fonctions › Fonctions de contenu du fichier › SeekFile : Modifier la position actuelle dans un fichier ouvert

SeekFile : Modifier la position actuelle dans un fichier ouvert

Valide sur les plates-formes NetWare, Symbian OS, UNIX, Windows et Windows CE

La fonction SeekFile permet de changer la position en cours dans un fichier ouvert.

Format de la fonction :

Seekfile(handle as integer, position as integer) as Boolean

descripteur

Identifie un descripteur renvoyé par un appel précédent.

position

Indique la nouvelle position dans le fichier. Si la valeur est égale à 0, la position est au début du fichier. La lecture ou l'écriture suivante aura lieu à la nouvelle position dans le fichier.

En cas de réussite, la fonction renvoie TRUE (Vrai), sinon elle renvoie FALSE (Faux).

Exemple :

'	Mettez à jour un fichier au 4ème double mot. Définissez-le sur 0.
Dim fHandle as integer

fHandle = OpenFile("out5.a", O_UPDATE)
if (fHandle = -1) then
	Print("Echec d'OpenFile(""out5.a"", O_UPDATE).")
	exit
endif
if Not(SeekFile(fHandle, 16)) then
	Print("Echec de SeekFile(fHandle, 16).")
	exit
endif
if Not(WriteFile(fHandle, 0)) then
	Print("Echec de WriteFile(fHandle, 0).")
	exit
endif
CloseFile(fHandle)