var F: TextFile;
s:string;
begin
AssignFile(F, edit1.Text);
Rewrite(F);
writeln(f,s);
CloseFile(F);
end;
这是一段很简单的建立新文件的代码,问题是,新建了这个文件,在磁盘上是怎么建立并存储的,划分了多大的空间;而且每当写如新的内容时,又是怎样存储的。
明天我就要回答这些问题给老师,哪位懂操作系统的高手能帮我解答一下啊。
s:string;
begin
AssignFile(F, edit1.Text);
Rewrite(F);
writeln(f,s);
CloseFile(F);
end;
这是一段很简单的建立新文件的代码,问题是,新建了这个文件,在磁盘上是怎么建立并存储的,划分了多大的空间;而且每当写如新的内容时,又是怎样存储的。
明天我就要回答这些问题给老师,哪位懂操作系统的高手能帮我解答一下啊。
f:system.textfile;
begin
assignfile(f,form1.tempdir+'文件名.txt');
rewrite(f);
writeIn(f,ss+clientdataset……);
closefile(f);
end;
当写入内容时,其大小是内容的字节数,而其占用的空间是磁盘文件块大小的倍数,不同的文件系统其大小是不一样的,FAT32 是 8K。
应该是这样吧。