Ошибка при работе с фреймами

[Чуть]

Всем привет. Впервые решил воспользоваться в работе фреймы. И для простоты решил создать класс TMyFrame. В котором описаны 1 процедура и 1 функция.

unit MyFrame;

interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;

type
TMyFrame = class(TFrame)
public
procedure Show; virtual; abstract;
function GetText : string; virtual; abstract;
end;

implementation

end.

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

Безымянный.bmp

Я что то не понимаю, как теряются свойства фрейма и причем тут именно высота?

[evg_m]

1. создавать "базовый" Frame надо как обычный
Delphi->File->New->Frame
Delphi->File->Other... ->New Items.New ->Frame
после настройки (объявления методов и т.д.)
Save As ...

2. все последующие которые должны быть наследниками
Delphi->File->Other... ->New Items.<имя твоего проекта>-><имя базового Frame>

[Чуть]

Благодарю. Значит нельзя вручную просто изменять родителя у фрейма. Блин, теперь придется всю программу переписывать заново. А у меня там уже 7 фреймов. Пичаль Спасибо за помощь.