Arquivo Texto

Pessoal, meu BD é muito grande e preciso gerar um arquivo, para resolver o problema da lentidão resolvi filtrar por pessoas Fisicas e Juridicas.
Mas meu problema é que não estou conceguindo enviar os dados para o mesmo arquivo! Quando gero o arquivo para juridica por exemplo e depois vou gerar para física, sempre fica no arquivo apenas os dados que inseri por último!

não conheço muito sobre arquivos, não sei o que exatamente pode estar errado, mas pesso para alguém que saiba conferir se está correto.

minha idéia era a seguinte:

procedure TArquivoEquifax.GeraArquivo(InclusaoExclusao:TTipoTransacao);
begin
AssignFile(Arquivo,´c:\Arquivo.txt´); //associa o arquivo a var
if FileExists(´c:\Arquivo.txt´) // if existe
then Eof(Arquivo) // vai para o fim do arquivo
else Rewrite(Arquivo); // else cria ele
Append(Arquivo);
//nao entendi pra q serve, no help diz uma coisa q nao vi funcionando!
if rgPessoa.ItemIndex = 0
then GeraArquivoFisica(InclusaoExclusao) //escreve dados fisica
else GeraArquivoJuridica(InclusaoExclusao); //escreve dados juridica
end;

se alguém puder me ajudar fico muito grato, falta só mais isso!

vlw