[Issue GerryFerdinandus#10] Can't open large torrent file.

Bencode routine does not accept string size larger than 6 digits = 1MB.
Is now increased to 10MB.

Author: GerryFerdinandus

source/bencode.pas

@@ -116,7 +116,7 @@ constructor TBEncoded.Create(Stream: TStream);
       begin
         if Buffer = '' then
           raise Exception.Create('');
-        if Length(Buffer) > 6 then
+        if Length(Buffer) > 7 then
           raise Exception.Create('');
         SetLength(Result, StrToInt(Buffer));
         if Stream.Read(Result[1], Length(Result)) <> Length(Result) then