Ошибка при наследование фрейма: Error creating form: Ancestor for 'TMyFrame' not found

Имеется модуль BaseForms, в котором описан класс, наследуемый от TFrame:

TMyFrame = class(TFrame)
...
end;

Далее создаю фрейм отдельно: File -> New -> VCL Frame и наследуюсь от TMyFrame:

TCustomFrame = class(TMyFrame)
...
end;

Далее в dfm файле 'CustomFrame' меняю object на inherited:

inherited CustomFrame: TCustomFrame
end

При закрытии и открытие фрейма выходит ошибка: Error creating form: Ancestor for 'TMyFrame' not found. Чтобы решить эту ошибку создаю dfm файл 'MyFrame.dfm' для TMyFrame:

object MyFrame: TMyFrame
end

Подключаю dfm файл к модулю:

{$R MyFrame.dfm}

Но выходит все та же ошибка. Что я делаю не так?


Ответы (0 шт):