保存文件使用write和read的方法，不能完全读取出来

我编了个程序需要有将多个Edit和RadioButton的选择等内容保存下来的功能，就类似于word的保存功能。我的实现方式是通过将每个Edit框中的内容单独保存到一个字符串，再将字符串一个个用LampFile.write（）写入的形式；需要实现“打开”功能时，就用LampFile.Read()读取再显示到对应的Edit框中。但是后来发现，如果要保存的内容很多，代码中写在最后读取的那些内容就读不出来。我不明白是因为用write和read读取是有长度的要求的原因吗？如果是，请问还有什么方法进行保存比较好呢？
关键代码如下：//将Edit框中内容保存到字符串LampName
if (trim(EditProjectName.text)<>'') then
    LampName:=EditProjectName.Text//写入信息到lampFile
if SaveDialog1.Execute() then
  LampFile.Write(LampName,20);//读取信息
LampFile.Read(LampName,20);
EditProjectName.Text:=LampName;