On Mon, Nov 5, 2012 at 3:15 PM, Graeme Geldenhuys <gra...@geldenhuys.co.uk> wrote: > On 2012-11-05 13:07, Michael Van Canneyt wrote: >> >> This will not detect if no exception is raised, only if the right >> exception is raised in case one is raised. > > > You are correct. An extra test is needed just before the except block. > As your example shows, simply calling Fail(...) if no exception was raised.
That's what I'ved done Thanks :) > > > Regards, > - Graeme - > > _______________________________________________ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-pascal _______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal