Como puedo grabar texto en un Archivo de Texto sin Sobreescribir????

[edme melina esc]

Hola gracias por responder si funciona con Apeend(F)
result:=DMSepa.Consultas.Fields[0].AsString+','+DMSepa.Consultas.Fields[1].AsString;
AssignFile(F,'c:\proyecto\movimiento.txt' );
Append(F);
Writeln(F, result);
Flush(F);
DMSepa.Consultas.Next;
CloseFile(F);
ahora tengo otro problemita ,quiero crear un archivo texto para poder guardar los datos de mi consulta ,por q cuando abro de nuevo lo elimino y nesecito crear denuvo
Saludos !!!