Przechwycenie kilku typów wyjątków plus wszystkie inne

Cześć. Zaciekawiło mnie, jak przechwycić kilka określonych typów wyjątków, a jeśli zaistniały wyjątek nie będzie danego typu, to żeby też jakoś na niego zareagować. Kawałek kodu lepiej zilustruje to, co mam na myśli:

try
 //operacje, które mogą wywalić wyjątek
except
 on EOutOfMemory do showMessage('Masz za mało pamięci synu');
 on EAccessViolation do showMessage('Najczęstszy błąd świata');
 //on EKażdyInny wyjątek do showMessage('Unhandled Exception :)');
end;

try

except
 on EOutOfMemory do showMessage('Masz za mało pamięci synu');
 on EAccessViolation do showMessage('Najczęstszy błąd świata');
 else showMessage('Unhandled Exception :)');
end;