Exception handling: EXCEPT + FINALLY

Exception handling: EXCEPT + FINALLY

var  a,b,c:real;
begin
  a:=10:
  b:=0;
  screen.cursor:=crHourglass;
  try
    try
      c:=c/b;
    finally 
      screen.cursor:=crDefault;
    end;
  except
    showmessage('Error');
  end;
end;