如何将多个文件的内容写入到一个Byte型变量中

[wangl]

我最终的目的是将多个文件合并成一个文件。合并后的文件的类型为：(如变量Myfile)
Type
FileRec = packed Record
Count :byte;
header :string[50];
content :byte;
end;
var
Myfile:file of FileRec
（注，原来我定义content为file类型，但行不通，网上的朋友告诉我应将content改为Byte类型,但是怎样才能将多个文件的内容写进Myfile.content呢？我相信你们会告诉我的，谢谢！）

[victorchen_2000]

我不好意思要你的分了，要用byte 类型的 Pointer，这样才能存整个文件，否则byte只能存一个字节。
在C中表示为 byte *content; 或 char *content;
delphi是不是 pointer of byte ?
你不必用struct;
可以这样写文件：
循环多次（多个文件）
写 count ;
写 header;
再将整个小文件写进去；
读时可以这样：
读Count;
读 header;
再读 Count个字节，这是一个文件的内容；

[wangl]

谢谢,我试试看.

[victorchen_2000]

试过可以再给分，象你这样给分也太大方了点。
虽然我说的方法是可行的。