Cette fonction permet de demander la position courante du pointeur de fichier.
Function FilePos(var F): Longint;