知道一个流中4到7的位置有放着一个数字，怎么样把它取出来？

[Caobiao]

我取是取出来了，但是是一堆乱码；我是这样子做的，请指点
F: TFileStream;
... ...

F.Seek(4,fmCreate);
F.ReadBuffer(buffer[0],4);
showmessage(String(buffer));
... ...

一堆乱码呀5~

[Caobiao]

UP!~

[thunderbird521]

Buffer：array [0..3] of char;
F: TFileStream;

F.Seek(4,fmCreate);
F.ReadBuffer(buffer,4);
showmessage(buffer);

[zzlingaaa]

up

[Caobiao]

TO： thunderbird521(东方火鸟)
里面存放的是数字你取CHAR呀？
我试了取出来是空
补充，我读取的是DBF文件。代码如下：
procedure FileStream_;
var
I: Longint;
F:TFileStream ;
begin
F:=TFileStream.Create('c:\1.dbf' ,soFromBeginning) ;
try
F.Seek(0,soFromBeginning);
F.ReadBuffer(I,SizeOf(I));
Form1.Caption := intToStr(I);
finally
f.Free;
end;
end;
取是取出来了，但是数值太大了，我的DBF中只有一条记录，也就是说这个位置取出来应当是1才对
参考资料：
-----------------------
http://www.ccw.com.cn/htm/app/aprog/01_8_24_3.asp