Para crear un fichero plano hay varias formas.
Si buscas en la ayuda de delphi la función
rewrite, encontrarás un ejemplo como este, para crear y escribir en un fichero.
Código Delphi
[-]
var
F: TextFile;
begin
AssignFile(F, 'NEWFILE.$$$');
Rewrite(F);
Writeln(F, 'Just created file with this text in it...');
CloseFile(F);
end;
También puedes usar un
TStrings. Utilizando el método
SaveToFile de esta clase también puedes crear un fichero (Busca en los foros y encontrarás varios ejemplos).