Untuk mempermudah pengujian (testing), digunakan fasilitas penanganan eksepsi (exception–handling) yang disediakan oleh Borland Delphi. Eksepsi ditangani dalam pernyataan (statement) try … except … end. Contoh penanganan eksepsi sederhana dapat dilihat pada gambar berikut :
Pada potongan kode program yang tampak pada gambar tersebut diperlihatkan penanganan kesalahan apabila terjadi proses pembagian dengan nol. Apabila pada proses pembagian tersebut Z bernilai 0, maka akan ditampilkan pesan “Pembagian dengan Nol” pada layar. Apabila nilai Z tidak sama dengan nol, maka pesan tersebut tidak akan ditampilkan.
Penanganan kesalahan seperti yang tampak pada contoh di atas dapat memiliki bentuk yang lebih kompleks, seperti contoh yang terdapat pada gambar di bawah ini.
Bila terjadi kesalahan pada statement yang berada diantara try … except maka proses penanganan kesalahan tergantung pada kesalahan yang dihadapi. Jika kesalahan berupa pembagian dengan nol (EZeroDivide) maka prosedur HandleZeroDivide akan dipanggil. Jika terjadi overflow pada proses perhitungan yang menggunakan floating point (EOverflow) maka HandleOverFlow yang akan dieksekusi. Apabila kesalahan yang terjadi bukan salah satu dari keduanya ( bukan EZeroDivide atau EOverflow), maka prosedur HandleAllOthers akan dieksekusi.
Untuk mempermudah penelusuran dalam pencarian kesalahan (debugging), maka setiap terjadi kesalahan harus diinformasikan dimana letak kesalahan tersebut berada. Untuk klas atau objek hal ini dapat dilakukan dengan menampilkan pesan ke layar dengan format :
[<nama klas>]<nama objek> . <nama operasi/metoda>
< Pesan kesalahan >
Misalkan terjadi kesalahan pada operasi / metoda Paint dari objek TSP1 yang merupakan instan dari klas TTSP, maka contoh pesan kesalahan yang ditampilkan :
.
