Сохранение данных о пользователе

[DEFENEK]

В электронное пособие. Регистрация в нем осуществлена. Подскажите пожалуйста как сохронять данные об отдельных пользователях?
Вот код регистрации:

begin
login:=Edit1.Text;
  pass:=Edit2.Text;

  AssignFile(t,'E:\Persons.exe');
   if fileexists('E:\Persons.exe') then
    begin
     append(t);
     WriteLn(t,login+' '+pass);
     closefile(t);
    end
   else
    begin
     Rewrite(t);
     WriteLn(t,login+' '+pass);
     CloseFile(t);
    end;