Delphi 11 TExtended80Rec二进制转Java BigDecimal解析求助

首先纠正两个明显的输入笔误：

• Delphi侧的TExtended是固定10字节，你给出的数组包含超大数值，应该是拆分错误（比如51215240114205实际是多个字节的拼接失误）
• Java侧的数组是11字节，不符合TExtended的10字节长度，推测是输入时多写了一个字节

以下是正确的解析方案，基于标准的80位扩展精度浮点数（Intel格式，Delphi的TExtended采用此格式）结构：

TExtended80Rec的结构（小端字节序） #

TExtended是80位扩展浮点数，布局如下：

• 字节0-7：64位尾数（小端序，低字节在前），非零数的尾数隐含最高位的1
• 字节8：指数的低8位
• 字节9：指数的高7位 + 符号位（最高位，1表示负数，0表示正数）
• 指数偏移量：16383，实际指数 = 解析出的15位指数值 - 16383

修正后的Java解析代码 #

import java.math.BigDecimal;
import java.math.BigInteger;

public class DelphiExtendedParser {
    public static void main(String[] args) {
        // 修正后的10字节TExtended数组（基于你提供的Java数组去掉多余字节）
        byte[] delphiBytes = {52, 51, 51, 51, -41, -16, 114, -51, 29, 64};

        BigDecimal parsedValue = parseDelphiExtended(delphiBytes);
        System.out.println("解析后的值: " + parsedValue);
    }

    private static BigDecimal parseDelphiExtended(byte[] delphiBytes) {
        if (delphiBytes.length != 10) {
            throw new IllegalArgumentException("TExtended必须是10字节");
        }

        // 1. 解析符号位：字节9的最高位
        boolean isNegative = (delphiBytes[9] & 0x80) != 0;

        // 2. 解析15位指数：字节8（低8位） + 字节9的低7位（高7位）
        int exponentRaw = ((delphiBytes[9] & 0x7F) << 8) | (delphiBytes[8] & 0xFF);
        int adjustedExponent = exponentRaw - 16383;

        // 3. 解析64位尾数（小端序转大端，从字节7到0拼接）
        BigInteger mantissa = BigInteger.ZERO;
        for (int i = 7; i >= 0; i--) {
            mantissa = mantissa.shiftLeft(8).or(BigInteger.valueOf(delphiBytes[i] & 0xFF));
        }

        // 4. 计算尾数部分：1 + (mantissa / 2^64)，隐含最高位的1
        BigDecimal twoPow64 = BigDecimal.valueOf(2).pow(64);
        BigDecimal fraction = BigDecimal.ONE.add(new BigDecimal(mantissa).divide(twoPow64));

        // 5. 计算最终值：符号 * 尾数部分 * 2^调整后指数
        BigDecimal sign = isNegative ? BigDecimal.ONE.negate() : BigDecimal.ONE;
        BigDecimal twoPowExponent = BigDecimal.valueOf(2).pow(adjustedExponent);
        BigDecimal parsedValue = sign.multiply(fraction).multiply(twoPowExponent);

        return parsedValue;
    }
}

代码关键点说明 #

1. 字节序处理：TExtended采用小端序，拼接尾数时从字节7到0反向处理，确保得到正确的64位整数
2. 指数解析：仅取字节9的低7位作为指数高部分，避免符号位混入指数计算
3. 精度保障：全程使用BigInteger和BigDecimal运算，完全保留TExtended的80位精度，避免double的精度丢失问题
4. 边界校验：先检查输入字节数组长度是否为10，拦截非法输入

内容的提问来源于stack exchange，提问作者xinle shan