Создание компонента в designTime

[Oburec]

Как в designTime создать невизуальный компонент (RegisterNoIcon), чтобы он прописался в код формы и отображался в табличке structures (инструмент просмотра созданных объектов на форме в designtime).

Вообще задача следующая: есть компонент мнемосхема TSheme (наследник TWinControl). требуется на ней создавать невизуальные компоненты (кнопки, бочки, лампочки и проч. АСУТП шные вещи). Компоненты должны быть не визуальными, тк отрисовываются с помощью OpenGl.

[alexBlack]

По-моему что-то вроде:

var S : IOTAModuleServices;
    M : IOTAModule;
    ES : IOTASourceEditor;
    EF : IOTAFormEditor;
    C:IOTAComponent;
begin
   S := BorlandIDEServices as IOTAModuleServices;

   M := S.CurrentModule;
   ES := GetSourceEditor(M);
   EF := GetFormEditor(M);
   C := EF.GetRootComponent;                 // Это форма
   EF.CreateComponent(C, 'ComponentName', 10, 10, 10, 10);  // Это новый компонент

[Oburec]

Сообщение от alexBlack

По-моему что-то вроде:

var S : IOTAModuleServices;
    M : IOTAModule;
    ES : IOTASourceEditor;
    EF : IOTAFormEditor;
    C:IOTAComponent;
begin
   S := BorlandIDEServices as IOTAModuleServices;

   M := S.CurrentModule;
   ES := GetSourceEditor(M);
   EF := GetFormEditor(M);
   C := EF.GetRootComponent;                 // Это форма
   EF.CreateComponent(C, 'ComponentName', 10, 10, 10, 10);  // Это новый компонент

Нашел вчера решение. CreateComponent создает нормально только компоненты зареганые как RegisterComponent(page,[componentclass]); иначе возвращает ошибку сomponentClass not applicable to this module. Чтобы этого не происходило, нужно помимо регистрации компонента как registerNoIcon вносить в секцию инициализации модуля (где создается компонент) такую штуку

initialization
 registerClass(componentClass);