Upravljanje pogreškama pod Pascalom

Problem

Prema zadanim postavkama, u Pascalu, rukovanje pogreškama osigurava kompilator. Iz tog razloga, program završava prikazivanjem poruke koja počinje s Runtime error nakon čega slijedi pogreška numbe r ...

Dakle, ako programer želi obraditi samu grešku, mora onemogućiti opciju za provjeru pogrešaka od strane kompajlera, pomoću izbornika Option i Build ... ili koristiti direktive prevoditelja izravno u programu izvor koda.

Na primjer, ako u određenom programu želimo otvoriti datoteku prema resetiranju i da datoteka ne postoji, prikazuje se poruka o pogrešci i program se zaustavlja.

Riješenje

Da bi se to izbjeglo, možemo testirati da li ili ne datoteku, a zatim djelovati u skladu s tim koristeći naredbu prevoditelja $ I i IOresult kao funkciju koja će vratiti rezultat ulaza / izlaza. S direktivom ($ I-) programer mora sam upravljati ovom vrstom pogreške.

To je program koji omogućuje unos fizičkog imena datoteke i otvaranje. Ako datoteka ne postoji, kreira se bez završetka programa na pogrešci: runtime error 2 at ... (bez datoteke).

 Program otvaranja; Koristi WinCrt; Vrsta datoteke; Var f: Datoteka; ime: string; Begin Write ('Naziv datoteke:'); Pročitajte (ime); Dodijeli (f, nom); {$ I-} Reset (f); Ako je IO rezultat 0, tada prepišite (f); Završava se {$ I +}. 

Zahvaljujući Zouari Lazhar za ovaj savjet.