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

...и я хотел бы новые пользовательские цвета записывать на место старых, записываемых 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, как и указано в комментарии.

- Mike Scott [000855]

Содержание раздела