Delphi使用SuperObject解析Json提示“Integer overflow”解决办法

最新推荐文章于 2025-04-01 12:52:57 发布
最新推荐文章于 2025-04-01 12:52:57 发布 · 645 阅读 · 0

本文介绍了一段修正后的SuperObject PAS源代码中Hash函数实现，该函数通过遍历输入字符串并结合特定常数计算出对应的哈希值，用于提高数据处理效率。

将superobject.pas源代码中的如下代码：

01

02

03

04

05

06

07

08

09

10

11

12

class function TSuperAvlEntry.Hash(const k: SOString): Cardinal;

var

  h: cardinal;

  i: Integer;

begin

  h := 0;

{$Q-}

  for i := 1 to Length(k) do

    h := h*129 + ord(k[i]) + $9e370001;

{$Q+}

  Result := h;

end;

修正为：

01

02

03

04

05

06

07

08

09

10

11

12

{$UNDEF SaveQ} {$IFOPT Q+} {$Q-} {$DEFINE SaveQ} {$ENDIF}

class function TSuperAvlEntry.Hash(const k: SOString): Cardinal;

var

  h: cardinal;

  i: Integer;

begin

  h := 0;

  for i := 1 to Length(k) do

    h := h*129 + ord(k[i]) + $9e370001;

  Result := h;

end;

{$IFDEF SaveQ} {$Q+} {$UNDEF SaveQ} {$ENDIF}

重新编译后即可实现正常解析。

Delphi中运行程序提示Integer overflow
记录日常技术经验
04-18 90
关闭某块代码的溢出检查即可。
C: integer overflow，隐式类型转换/整数加法溢出 解决方法示例；check_add_overflow；__builtin_add_overflow
mzhan017的博客
03-19 2108
https://git.dpdk.org/dpdk/commit/?id=3ae4beb079ce242240c34376a066bbccd0c0b23e diff --git a/lib/librte_vhost/vhost_user.c b/lib/librte_vhost/vhost_user.c index 9c891d4..ff5b131 100644 --- a/lib/librte_vhost/vhost_user.c +++ b/lib/librte_vhost/vhost_user.c
Delphi使用SuperObject解析Json时提示“Integer overflow”
weixin_34166472的博客
04-29 329
为什么80%的码农都做不了架构师？>>> ...
Delphi中报错: Overflow in conversion or arithmetic operation
最新发布
记录日常技术经验
04-01 93
/ 报错// 通过报错的原因是 整数溢出（Integer Overflow），因为 Delphi 默认的整数类型 Integer 是 32 位有符号整数（范围：-2,147,483,648 到 2,147,483,647），而 1117698624 + 1421591616 = 2539290240，超过了 Integer 的最大值 2,147,483,647，导致计算时溢出。
Delphi - SuperObject : raised exception class eintoverflow with message'Integer overflow'.
any2mobile的专栏
01-25 1594
点击打开链接 这个是BUG，官方论坛已经给出这个BUG的修复了： 单元 superobject.pas,位置为 5629 行： //class function TSuperAvlEntry.Hash(const k: SOString): Cardinal; //var //  h: cardinal; //  i: Integer; //begin //  h := 0
SuperObject Delphi 的 JSON 属性乱序 - 操作类改造 - 关于属性顺序的问题
aibi9565的博客
11-15 1523
Delphi 的 ISuperObject 属性顺序为随机。但是很多时候，是需要按加入顺序进行读取。我也看了网上很多人有类似需求。也有人问过原作者，作者答复为：JSON协议规定为无序。看了我真是无语。 也看过网上一些人自己的修改，但是修改后有两个问题（网上的方法都不好，只能自己动手了）： 1. 性能急剧下降。原作者是用二叉树对性能做了极大的优化。但是网上修改的方法性能不...
delphi中TBytesToTJavaArray的使用
tanqth的专栏
10-17 2212
在使用delphi开发过程中，多数情况下使用TJavaArray数据类型的时候，应该是可以直接用TBytesToTJavaArray进行数据类型的转换并使用，但涉及到与流处理相关的时候，需要在使用完成后去释放清理。
Delphi LKJSON-1.04库源码及示例详解
JSON（JavaScript Object Notation）是一种轻量级的数据交换格式，易于人阅读和编写，同时也易于机器解析和生成。lkJSON库可以帮助Delphi开发者方便地对JSON数据进行编码（序列化）和解码（反序列化）。 #### 2. ...
死亡历险，翻开新的一篇之Delphi 连接 JAVA WebService，并实现查找，添加，修改，删除等功能
的专栏
03-22 1746
死亡历险，翻开新的一篇之JAVA WebService db.java package com.hyan.db; import java.util.ResourceBundle; import java.sql.Connection; import java.sql.DriverManager; import java.sql.SQLException; im
Integer Overflow 整数溢出实验教程.mp4
04-11
MONASH University Integer Overflow实验
Delphi 11.1错误处理深入
![Delphi 11.1错误处理深入]...文章首先概述了错误处理的重要性，然后深入分析了异常处理的基础、自定义异常类的创建和使用、异常的高级处理技巧。接
如何解决 a+b >c 和 a*b 和 a-b 的 integer overflow 问题
guilanl的专栏
05-10 947
注： a 和 b  都是 int 型 的。 To create a conforming program you need to test for overflow before generating said overflow. The method can be used with unsigned integers too // for addition #include
LeetCode-整数反转【解决Integer的OverFlow】
热门推荐
小名同学
04-07 14万+
@LeetCode-整数反转【解决Integer的OverFlow】 今天事情比较多，时间比较琐碎，所以想着刷道easy难度的题????，结果发现我小看这个easy难度的题了……竟然留了一个坑！ 题目：给出一个 32 位的有符号整数，你需要将这个整数中每位上的数字进行反转。 原来的想法： reverse = reverse * 10 + x % 10一句话的事儿~ 然后我就开始code了???? public...
signed integer overflow报错解决
weixin_45357271的博客
03-01 1万+
1 + 2147483647 超过了int边界 原来代码: long mid=(low+high)/2; Line 6: Char 30: runtime error: signed integer overflow: 1 + 2147483647 cannot be represented in type ‘int’ (solution.cpp) SUMMARY: UndefinedBehaviorSanitizer: undefined-behavior 修改以后的代码： long mid = (hi
Delphi Overflow while converting variant of type(Integer) into type(Date)
龙七
11-18 1344
cxDateUtils.pas，将NullDate = -700000改为NullDate = －1 控件重新编译下
7. Reverse Integer(逆序int数）overflow问题
AAAtang
06-01 186
Given a 32-bit signed integer, reverse digits of an integer. Example 1: Input: 123 Output: 321 Example 2: Input: -123 Output: -321 如果溢出，返回0. 思路： 转换部分就是通过res存x的从后面的每一个数进来。但是在对于计算res之前要判断是否会溢出。 利用常量INT_MAX来判断。 res10>INT_MAX || res10+x%10 > INT_MAX 就不行
verilog如何处理signed integer的加法和处理overflow？（源于HDLBits，Pro.69）
weixin_47657544的博客
07-25 939
verilog、IC验证、HDLBits
Java中的无声杀手 – Integer Overflow, 当心 !
Gerry Gao's中文技术Space
01-29 7081
原文：http://www.mkyong.com/java/javas-silent-killer-buffer-overflow-careful/ 不管你信不信，Java也有Integer overflow的问题。我不确定这个词儿是否是正确地描述这个问题的词儿，你也许可以给我一点建议 OK，看一下下面的程序。这个程序打印出每天有多少微妙数。 public class Test
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包

打赏作者

martian6125

你的鼓励将是我创作的最大动力

¥1 ¥2 ¥4 ¥6 ¥10 ¥20
扫码支付：¥1
获取中
扫码支付

您的余额不足，请更换扫码支付或充值

打赏作者

实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值