[M.A.D.M.A.N.]

Код:

uses inifiles;
...
begin
  with TInifile.Create(FileNameHere)Do
    begin
      WriteString('Main','Edit',Edit1.Text);
    end;
end;

For read from ini

Код:

uses inifiles;
...
begin
  with TIniFIle.Create(FileNameHere)Do
    begin
      edit1.text:=ReadString('Main','Edit','Default value');
    end;
end;