uses inifiles; ... begin if SaveDialog1.Execute then with TInifile.Create(SaveDialog1.FileName) Do begin WriteString('Main','Edit',Edit1.Text); end; end;