Introduce EDatabaseError exception class, so we're able to handle only those and let others raise the exception up to MadExcept. Helps finding non-database related AVs as users are able to get the callstack now. Similar to r3292 but more consistent all over the code now.

source/routine_editor.pas

@@ -460,7 +460,7 @@ begin
     btnDiscard.Enabled := Modified;
     Mainform.actRunRoutines.Enabled := True;
   except
-    on E:Exception do begin
+    on E:EDatabaseError do begin
       MessageDlg(E.Message, mtError, [mbOk], 0);
       Result := mrAbort;
     end;