如何在保存文件的时候对文件内容进行控制(200分)

我想在保存文件，或者另存的时候，将文件进行加密。请问这个如何做啊

保存什么文件？你使用什么进行编辑后另存的？

可以用流，压缩、加密都比较方便。
var
tmpSrcStream, tmpDesStream: TStream;
begin
tmpSrcStream:= TFileStream.Create('c:/123.dat', fmOpenRead);
tmpDesStream:= TFileStream.Create('c:/456.dat', fmCreate);
try
tmpDesStream.CopyFrom(tmpSrcStream);
{ 再对tmpDesStream做加密运算 }
finally
tmpSrcStream.Free;
tmpDesStream.Free;
end;
end;

加个自定义的文件头即可