diff --git a/source/main.pas b/source/main.pas
index 5eef8257..99fa0a47 100644
--- a/source/main.pas
+++ b/source/main.pas
@@ -46,13 +46,6 @@ type
     FilterText: WideString;
   end;
 
-  // Represents errors already "handled" (shown to user),
-  // which can thus safely be ignored.
-  THandledSQLError = class(Exception)
-  end;
-
-  PMethod = ^TMethod;
-
   TMainForm = class(TForm)
     MainMenu1: TMainMenu;
     File1: TMenuItem;