Карта сайта Kansoftware
НОВОСТИУСЛУГИРЕШЕНИЯКОНТАКТЫ
Разработка программного обеспечения
KANSoftWare

Сохранение пользовательских настроек

Delphi , Файловая система , Ресурсы

Сохранение пользовательских настроек

Автор: Mike Scott

Сын системного администратора перед сном просит папу:
- Па-па... Расскажи сказку про умного, толкового, доброго, смелого юзера...

...и я хотел бы новые пользовательские цвета записывать на место старых, записываемых Delphi в файл ресурса, чтобы при следующем открытии формы, она автоматически сама отображала бы новую цветовую схему.

Вы можете легко это сделать, передавая форму при закрытии в поток для записи ее в отдельный файл. Затем, когда это создано, проверяйте наличие файла и организуйте его чтение. Вот как можно это сделать:


const
  FileName = 'Form1.stm';

constructor TForm1.Create(AOwner: TComponent);
begin
  if FileExists(FileName) then
  begin
    CreateNew(AOwner);
    ReadComponentResFile(FileName, Self);
  end
  else
    inherited Create(AOwner);

  { поместите здесь код в стиле 'OnCreate' }
end;

procedure TForm1.FormDestroy(Sender: TObject);
begin
  WriteComponentResFile(FileName, Self);
end;

Имейте в виду, что это не вызывает OnCreate. В действительности, вам OnCreate и не нужен, поскольку сюда вы можете поместить код, необходимый в обработчике OnCreate; данный код следует поместить после конструктора Create, как и указано в комментарии.

Статья Сохранение пользовательских настроек раздела Файловая система Ресурсы может быть полезна для разработчиков на Delphi и FreePascal.


Комментарии и вопросы


Ваше мнение или вопрос к статье в виде простого текста (Tag <a href=... Disabled). Все комментарии модерируются, модератор оставляет за собой право удалить непонравившейся ему комментарий.

заголовок

e-mail

Ваше имя

Сообщение

Введите код




Материалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.



:: Главная :: Ресурсы ::


реклама



©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007
Top.Mail.Ru Rambler's Top100
29.03.2024 03:51:37/0.036602020263672/2