TStringList *Spisok;
if (!FileExists("bla-bla-bla"))
 FileCreate("bla-bla-bla");
Spisok->LoadFormFile("bla-bla-bla");
Spisok->Add("Иванов Иван Иванович");
Spisok->Add("Иванов Иван Петрович");
Spisok->Add("Иванов Петр Иванович");
Spisok->SaveToFile("bla-bla-bla");

int fHandle;
char buffer[ 1024 ];
//Открываем файл
if((fHandle=fopen("bla-bla-bla","rw"))> 0 )
{
//Читаем из файла
 fread(fHandle,buffer, 1024 );

<разбор буфера на составляющие>
<и другая работа с БД>
<сохранение данных в буфер>

//Пишем в файл
 fwrite(fHandle,buffer,strlen(buffer));

//Закрываем открытый файл
 fclose(fHandle);
}