delphi对明码文件读取的问题，急哦

[fuzhong]

比如说esri的shp文件，整个文件都有了，就是不知道delphi怎么去读取里面的包含信息。shp文件可以看成无类型文件或则二进制文件。
或者举个例子：aaa.dat
aa.dat 文件属于二进制文件
里面包含了 信息内容如下
0-4 位存储了 single类型 1
5-12位存储了 shortint类型 2
13-16 位存储了 single 类型 3
假设这个简单的二进制文件 用delphi 怎么把第三部分的single值读取出来呢？
答题之前先谢谢各位！！！！！！！

[edongxu]

搞不懂你的意思
一会儿说是明码文件，一会儿又说二进制！！！
到底什么文件？
二进制的：

var
  iFileHandle: Integer;
  Buffer: singer;
begin

    try
      iFileHandle := FileOpen('aaa.dat', fmOpenRead);
      FileSeek(iFileHandle,13,0);
      FileRead(iFileHandle, Buffer, 4);
    finally
      FileClose(iFileHandle);
    end;
end;

[fuzhong]

edongxu 这个也是我发的 我去看看阿，一会回来

[edongxu]

Buffer: singer;
这个变量声明错了
Buffer: single;

[fuzhong]

var
iFileHandle: Integer;
Buffer: singer;
begin

try
iFileHandle := FileOpen('aaa.dat', fmOpenRead);
FileSeek(iFileHandle,13,0);
FileRead(iFileHandle, Buffer, 4);
finally
FileClose(iFileHandle);
end;
end;
----------------------------------------------------
谢谢啦edongxu，已经加你为好友，希望今后能得到你的帮助
结帖。还有那边那个