关于文件存储(200分)

我想把我做的东西存到文件中，文件要二进制的。
主要是一些结构的链表，而且结构里可能还有链表。
下面是一些结构！！！
type
pTalk=^tRecord;
tRecord=Record
tImage:TImage;
StrFont:TFont;
strList:TList;
ExistTime:Integer
BeginTime:Integer;
strFileName:String;
end;
type
pStill=^sRecord;
sRecord=Record
sImage:TImage;
stiFileName:String;
Turn:String;

end;
type
pTalk=^tRecord;
tRecord=Record
tImage:TImage;
StrFont:TFont;
strList:TList;
ExistTime:Integer;
BeginTime:Integer;
strFileName:String;
end;
还有一些我就不一一写了，这些结构都保存在各自的链表中。
那位能解决，请赐教！！！！！！

要寸到文件中？TFont,TImage等都是对象，怎么存？看来象Delphi的DFM文件一样做好了。
不过String是不能存的，除非是ShortString

是存到文件中，Image,Font可以把用到的属性单个提出来存，问题是如何把握每个字节，
定义格式？？？？？？？？？？

i will send your source file!

接受答案了.