u011021527 2013-07-26 07:24
浏览 1092

access violation at address 0056ee46

这个是用于将ABCD转换成实数 请问为什么我老是弹出
access violation at address 0056ee46 in module'project1.exe' read of adress 00000010
这个东西,
开始的时候没有弹,后来在全部弄来一起运行时就弹这个 0056ee46 在程序中是
A1:=(B shr 7)+((A and 127)shl 1);
这一句
大家可不可以告诉我是什么问题???
function IEEE754(var A:integer;var B:integer;var C:integer;var D:integer):real;
var
i:word;
A1,B1,C1,D1:real;
begin
B1:=0;
A1:=(B shr 7)+((A and 127)shl 1);
if(A1 <>0) then
begin
A1:=A1-127;
B1:=1;
end
else A1:=1-127;
A1:=power(2,A1);
A1:=A1*Power((-1),(A shr 7) and 1);
for i:=0 to 6 do
B1:=B1+((B shr i)and 1)*power(2,(-1)*(7-i));
for i:=0 to 7 do
begin
C1:=C1+((C shr i)and 1)*power(2,(-1)*(15-i));
D1:=D1+((D shr i)and 1)*power(2,(-1)*(23-i));
end;
A1:=A1*(B1+C1+D1);
A1:=ROUND(A1*100)/100;
//A1:=trunc(A1);
//A1:=A1/100;
result:=strtofloat(formatfloat('#.00',A1));
end;

  • 写回答

0条回答

    报告相同问题?

    悬赏问题

    • ¥15 matlab数字图像处理频率域滤波
    • ¥15 在abaqus做了二维正交切削模型,给刀具添加了超声振动条件后输出切削力为什么比普通切削增大这么多
    • ¥15 ELGamal和paillier计算效率谁快?
    • ¥15 file converter 转换格式失败 报错 Error marking filters as finished,如何解决?
    • ¥15 ubuntu系统下挂载磁盘上执行./提示权限不够
    • ¥15 Arcgis相交分析无法绘制一个或多个图形
    • ¥15 关于#r语言#的问题:差异分析前数据准备,报错Error in data[, sampleName1] : subscript out of bounds请问怎么解决呀以下是全部代码:
    • ¥15 seatunnel-web使用SQL组件时候后台报错,无法找到表格
    • ¥15 fpga自动售货机数码管(相关搜索:数字时钟)
    • ¥15 用前端向数据库插入数据,通过debug发现数据能走到后端,但是放行之后就会提示错误