一个dat文件问题

[randee_luo]

在Delphi中dat文件是怎么用的呢。。。 我想把图片存到这个文件里面。。

[dinoalex]

dat只是一个后缀. 找一下文件头,文件操作,流... 之类的资料吧

[wintergoes]

TFileStream读取,合并再保存到dat文件里
文件头要加上图片的相关信息

[hjkto]

这个我也想知道

[Wozhiyonglangqi]

Tpay = packed record
i: string[100];
user: string[100];
d: TDateTime;
StationNO: string[100];
end;

class procedure TUtilForm.WritPacke(str: Tpay);
var
p: file of Tpay;
t1: Tpay;
begin
system.AssignFile(p, ExtractFilePath(paramStr(0)) + 'user.dat');
system.Reset(p);
Seek(p, 0);
t1.i := IntToStr(Random(6));
t1.user := str.user;
t1.d := Date;
t1.StationNO := str.StationNO;
system.Write(p, t1);
CloseFile(p);

end;
//给个简单的