TStyleBook [TStyleBook] Как сохранить StyleBook в текстовом формате в runtime?

[Ra72]

Уважаемые эксперты!

Подскажите, как сохранить StyleBook в текстовом формате *.style динамически (во время исполнения программы) ? Например:

object TLayout
  Align = alClient
  Height = 715.000000000000000000
  Position.Y = 33.000000000000000000
  Width = 1162.000000000000000000
  object TSwitchObject
    StyleName = 'switchstyle'
...

Изменено 27 января, 2016 пользователем Brovin Yaroslav

[GASCHE]

Так кликните два раза на StyleBook там дискетка будет.

[Ra72]

Вопрос уточняю - во время исполнения программы.

[Brovin Yaroslav]

TStyleBook.Resource;