A referer blocker for DotText

I've been tired of getting comments and trackback posts for DotText that are essentially spam.

Hence, using Borland Developer Studio 2006, I enhanced Dottext to return 404 to these requests.

In web.config, I updated the HttpHandler to read as follows:
      <HttpHandler pattern="^(?:\/(\w|\s|\.)+\/services\/trackbacks/\d+\.aspx)$" type="Dottext.NoTrackback, Dottext.SpamBlocker" handlerType="Direct"/>

The corresponding class follows.

unit Dottext.SpamBlockerImpl;

interface
  uses System.Web;

  // Set default namespace to Dottext in Project options!
  NoTrackback = class sealed(System.Object, IHttpHandler)
  public
    function get_IsReusable: Boolean;
    procedure ProcessRequest(context: HttpContext);
  end;

implementation
{ NoTrackback }

function NoTrackback.get_IsReusable: Boolean;
begin
  Result := True;
end;

procedure NoTrackback.ProcessRequest(context: HttpContext);
begin
  context.Response.StatusCode := 404;
  context.Response.&End;
end;

end.