Bonjour

j'ai un problème avec la commande seek et read :

Je veux lire le dernier enregistrement d'un fichier binaire avec le code suivant

Seek(FichierBin, liPosition); // liPosition = FileSize(FichierBin)
Read(FichierBin, laClient);
Quand la commande se fait j'ai un erreur EInOutErreur avec le message 'Lecture au-delà de la fin du fichier'

Comment je fais pour lire le dernier enregistrement sans avoir cet erreur???