文件读些问题

Question

要读取一股票的日数据文件,不知道如何读取,用ultaedit看其文件,显示格式是这样的:63 A3 31 01 
这四个16进制的数构成了日期.通过windows的计算器转换,发现输入 01 31 A3 63这个顺序才是正确,即它是倒着存放的.请问如何读取文件并存放这四个字节,然后转换成整数?因刚学delphi不久底层操作不熟悉希望能有详细代码,谢谢!

Answer 1

var myfile:tfilestream; 
    i:cardinal;
myfile:=tfilestream.create('文件名',fmopenread or fmshareexclusive);
myfile.seek('start',sofrombeginning);
myfile.readbuffer(i,'bytenum');
edit1.text:=inttohex(i);
其中，start为要读取数的起始位，也就是63在第几个字节，bytnum是读取字节的个数，这里63 a3 31 01为4个字节，ok，试试看吧。

Answer 2

呵呵：），并不是反了，低地址存低位，高地址存高位才是正序。对4个字节的DWORD来说，从低位开始存就是这样。至于读写上面的就可以了。