Správa chýb v jazyku Pascal

Problém

Štandardne v Pascale poskytuje kompilátor spracovanie chýb. Z tohto dôvodu program končí zobrazením správy začínajúcej chybou Runtime, po ktorej nasleduje chyba numbe r ...

Takže ak programátor chce zvládnuť chyby sám, musí vypnúť možnosť kontroly chýb kompilátorom, pomocou ponuky Option a Build ... alebo použiť kompilátorové smernice priamo v programovom zdrojovom kóde.

Napríklad, ak chceme v danom programe otvoriť súbor resetom a súbor neexistuje, zobrazí sa chybové hlásenie a program sa zastaví.

Riešenie

Aby sme tomu predišli, môžeme otestovať, či súbor a potom konať podľa direktívy kompilátora $ I a IOresult ako funkciu, ktorá vráti výsledok vstupu / výstupu. So smernicou ($ I-) musí programátor sám riadiť tento typ chyby.

Toto je program, ktorý umožňuje zadať fyzické meno súboru a otvoriť ho. Ak súbor neexistuje, vytvorí sa bez ukončenia programu na chybe: chyba behu 2 na ... (žiadny súbor).

 Program otvorenia; Používa WinCrt; Typ súboru; Var f: Súbor; name: string; Begin Write ('Názov súboru:'); Readln (názov); Priradenie (f, nom); {$ I-} Reset (f); Ak IOresult 0, potom Rewrite (f); {$ I +} koniec. 

Vďaka Zouari Lazhar za tento tip.