Тема: сохранение
Показать сообщение отдельно
  #2  
Старый 02.10.2010, 20:40
lmikle lmikle вне форума
Модератор
  
Регистрация: 17.04.2008
Сообщения: 8,100
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию
Код:
begin
  with TInifile.Create('Save')Do
    begin
      WriteString('Main','Edit',Edit1.Text);
      free
    end;
end;
Ответить с цитированием