[NIch]

Во первых, поискать по форуму, такая тема поднималась и не раз...
Далее, просто так записывать данные в файл нельзя, их нужно как минимум зашифровать...а это отдельная тема...
В простейшем случае...запись в файл

Код:

type
 TUser = record
  N : string[15];//имя
  S : string[15];//фамилия
  A : string[8];//дата рождения 
 end;
var
 User : TUser;
 UserFile : File of TUser;
begin
//Ввод данных
 User.N := edit1.text;
 User.S := edit2.text;
 User.A := DateToStr(DateTimePicker.Date);
//Сохранение в файл
 AssignFile (UserFile, 'User.dat');
 Reset(UserFile);
 Write(UserFile, User);
 CloseFile(UserFile);
end;

Чтение из файла в обратном порядке...