Delphi: как автоматически создать свойство из частного поля?

Question

Я уже знаю, как использовать встроенные шаблоны (prop/propf + CTRL-J) для объявления свойств, которые автоматически создают их личное поле и их методы получения / установки, но как мне сделать обратное?

У меня уже есть 166 закрытых полей. Есть ли способ, чтобы Delphi IDE автоматически создавал свойства для каждого из них?

Вот что у меня есть:

TMyObject = class(TPersistent)
private
  FFirstProp: boolean;
  FSecondProp: boolean;
  // 164 more of them...

Вот что я хотел бы (в идеале), чтобы IDE создала для меня:

published
  property FirstProp: boolean read FFirstProp write FFirstProp;
  property SecondProp: boolean read FSecondProp write FSecondProp;
  // and the other 164...