如何写二进制文件?(100分)

  • 主题发起人 主题发起人 we2002
  • 开始时间 开始时间
W

we2002

Unregistered / Unconfirmed
GUEST, unregistred user!
请问如何向文件中写入二进制数据?
 
Q: How do I read and write binary files?

A: If the data can be stored in its binary form, it's as simple in Delphi as it was in BP7:

type
TUserNotes = record
TimeStored : TDateTime;
Comment : string[20];
TaxCost : real;
NetCost : real;
Altered : Boolean;
end;

TUserNotesFile = file of TUserNotes;
var
UserNotes : TUserNotes;
F: TUserNotesFile;
begin
System.Assign(F,'MYDATA.DAT');
Rewrite(F);

{ fill in the fields of "UserNotes" }
Write(F,UserNotes);
Close(F);
end;

{This code came from Lloyd's help file!}
 
用文件流来写最安全
下面是个流程
aFile:TFileStream;
aFile:=TFileStream.create(filename,模式)
aFile.wriete(buf,sizeof(buf));
afile.free;
 
文件类型使用file(无类型文件)得到的是二进制文件,使用TEXT类型得到文本文件.
 
最好不要区分什么文本和二进制文件,反正都是二进制文件,
DELPHI的那几个system单元的函数不太好用,在多线程下基本上没什么用
 
张无忌说的非常有道理
 
后退
顶部