无类型文件一般用于存放二进制文件。
定义:f:File;
几个相关的函数:
AssignFile,BlockRead,BlockWrite,Seek,ReWrite,ReSet,CloseFile
很多书里都有。
给你个例子:读数据
var
f:File;
s:String;
b:array[1..100] of byte;
RecsRead:integer;
begin
s:='C:\1.dat';
AssignFile(f,s);
Reset(f);
BlockRead(f,b,1,RecsRead);
closeFile(f);
end;//读100个字节到b[]里。
定义:f:File;
几个相关的函数:
AssignFile,BlockRead,BlockWrite,Seek,ReWrite,ReSet,CloseFile
很多书里都有。
给你个例子:读数据
var
f:File;
s:String;
b:array[1..100] of byte;
RecsRead:integer;
begin
s:='C:\1.dat';
AssignFile(f,s);
Reset(f);
BlockRead(f,b,1,RecsRead);
closeFile(f);
end;//读100个字节到b[]里。
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货