[Adrenalin666]

procedure TForm1.Button8Click(Sender: TObject);
begin
with TInifile.Create('Save')Do
begin
WriteString('Main','Edit',Edit1.Text);
free
end;
end;

может там написать Save.ini или еще что