Если я правильно понял - Вам нужно из несколько Memo записать в один файл.
Для этого Вам надо составить по сути еще один memo, который можно скрыть, а потом его записывать в файл.
или через переменную
Код:
var s: Tstringlist;
i: integer;
begin
s:=TstringList.Create;
for i:= 0 to memo1.Lines.Count-1 do s.Add(memo1.Lines[i]);
{ в нужном порядке пишите строки }
for i:= 0 to memo2.Lines.Count-1 do s.Add(memo2.Lines[i]);
for i:= 0 to memo3.Lines.Count-1 do s.Add(memo3.Lines[i]);
s.SaveToFile('ИМЯ ФАЙЛА');
s.Free;
end;