عدد الرسائل : 155 العمر : 35 الوصف الشخصى : sqw تعيين الادارة : تاريخ التسجيل : 29/10/2008
موضوع: les erreurs en TURBO PASCAL(bac informatique) السبت 1 نوفمبر - 1:07
Les erreurs :
Si le fichier n'existe pas dans le répertoire courant, Turbo Pascal va s'arrêter avec un message d'erreur du genre : Error 2 : File Not Found", et le programme se bloquera en affichant le message suivant : "Runtime error 002 at adress ... : ...", ce qui n'est pas génial. Pour intercepter les erreurs, il faut ajouter la commande "{$I-}" avant "Assign (F, NomFich);" et rajouter "{$I+}" après "Reset (F,1);". La commande "{$I-}" interrompt la détection d'erreur d'entrée/sortie par Turbo Pascal, et "{$I+}" la réactive. Il vaut faudra ensuite lire le code d'erreur après "{$I+}" qui est donné par "IOResult". Si cette variable est nulle, aucune erreur ne s'est produite, sinon elle contient un code d'erreur. Les plus courantes : 2-Fichier introuvable, 4-Répertoire introuvable, 5-Fichier protégé en écriture (attribut lecture seule ou disquette protégée contre l'écriture).
mohamedhk2
عدد الرسائل : 103 العمر : 35 الوصف الشخصى : maamouri 7or تعيين الادارة : تاريخ التسجيل : 18/11/2008
موضوع: رد: les erreurs en TURBO PASCAL(bac informatique) الأربعاء 26 نوفمبر - 23:54