anchor.diff:  
       path := ARequestInfo.Params.Values['path'];
   
  -    if not FileExists(path) or not SameText(ExtractFileExt(path), '.kpj') then
  -    begin
  -      AResponseInfo.ResponseNo := 400;
  +    if (Path <> '') and (not FileExists(path) or not SameText(ExtractFileExt(path), '.kpj')) then
  +    begin
  +      AResponseInfo.ResponseNo := 404;
         AResponseInfo.ResponseText := 'Project file '+path+' does not exist.';
         Exit;
       end;
  
positive.code:       not SameText(ExtractFileExt(path), '.bmp')
        ) then
      begin
        AResponseInfo.ResponseNo := 400;
        AResponseInfo.ResponseText := 'Image file '+path+' does not exist.';
        Exit;
      end;
  
negative.code: 
      // Saving state
  
      if (Path <> '') and (not FileExists(path) or not SameText(ExtractFileExt(path), '.kpj')) then
      begin
        AResponseInfo.ResponseNo := 404;
        AResponseInfo.ResponseText := 'Project file '+path+' does not exist.';
        Exit;
      end;
  