La gestione degli errori è un aspetto molto importante che un programmatore deve conoscere per scrivere del codice affidabile.
Può capitare per esempio di dover aprire un file, ma, per qualche motivo, il file è stato cancellato, spostato o rinominato. In questi casi è bene prevedere un controllo per intercettare l’eventuale errore ed informare così l’utente del problema.
A tale scopo FreeBASIC mette a disposizione la funzione err che ritorna lo specifico codice di errore del problema riscontrato.
In FreeBASIC esiste una lista dei codici di errore che il programmatore può gestire.
Vediamo un semplice esempio:
dim err_code as integer
open "file.txt" for input as #1
err_code = err
select case err_code
case 0
close #1 'nessun errore riscontrato
case 1
print "Illegal function call"
case 2
print "File not found signal"
case 3
print "File I/O error"
case 4
print "Out of memory"
case 5
print "Illegal resume"
case 6
print "Out of bounds array access"
case 7
print "Null Pointer Access"
case 8
print "No privileges"
case 9
print "Interrupted signal"
case 10
print "Illegal instruction signal"
case 11
print "Floating point error signal"
case 12
print "Segmentation violation signal"
case 13
print "Termination request signal"
case 14
print "Abnormal termination signal"
case 15
print "Quit request signal"
case 16
print "Return without gosub"
case 17
print "End of file"
end select
sleep
Abbastanza semplice direi. 😉
In FreeBASIC esistono anche altre istruzioni e procedure che permettono una gestione degli errori avanzata.
A rileggerci al prossimo articolo.


