Как создать наследуемую пользовательскую форму из пакета Object Repository на Delphi?

Question

Я создал мастер для создания пользовательской формы. Работает нормально. Я могу создать его из меню "Файл"> "Другое"> "MyWizards". Но я хотел бы добавить общие параметры форм и диалогов: "Использование", "Наследовать" и "Копировать". Как это сделать? Есть ли какой-либо метод интерфейса, который нужно реализовать, чтобы установить, что он наследуется? Ниже приведен фрагмент кода моего помощника.

type
  TMyFormWizard = class(TNotifierObject, IOTAWizard, IOTAProjectWizard, IOTARepositoryWizard, IUnknown, IOTARepositoryWizard80)

...

  TUnitCreator = class (TNotifierObject, IOTACreator, IOTAModuleCreator)

...

  TBaseFile = class(TInterfacedObject)

...

  TUnitFile = class(TBaseFile, IOTAFile)

...

  TFormFile = class(TBaseFile, IOTAFile)

Ниже приведен пример того, как я хотел бы, чтобы мой волшебник остался. Похож на нативные объекты Delphi (например, AboutBox)

Answer 1

Если бы мастер был наследуемым, то унаследованным объектом был бы другой мастер. Я не думаю, что это то, что вы пытаетесь достичь. Конечно, любая форма, которую вы создаете мастером, сама по себе наследуема, но для этого вам нужно будет добавить ее в хранилище. Вы не можете наследовать от него, пока не создадите его. TA, о котором вы говорите, это форма, а не волшебник.

редактировать

Чтобы добавить форму, которую вы создали, в репозиторий, откройте форму в IDE, щелкните ее (например, в строке заголовка), выберите "Добавить в репозиторий...". Заполните детали. Форма будет наследственной.

Обратите внимание, это не имеет никакого отношения к тому, был ли он создан мастером или нет.