Не могу показать компонент

← →
MikeGipson © (2005-10-14 08:39) [0]

Не могу показать компонент, может кто-нибудь сможет мне помочь?
Создаю объект
Type
MyObject = class(TWinControl)
Private
……………………………..
……………………………..
Dev: TfrDevico; //Управляющая панель
……………………………..
public
procedure Created(i: integer);
end;
implementation
procedure TRunRec.Created(i: integer);
begin
…………..
dev := TfrDevico.Create(Self);
dev.Parent := Self;
…………..
end;
(В свою очередь Dev созданный компонент
TfrDevico = class(TFrame).)
Далее:
Пытаюсь в модуле основной формы показать Dev
Var
RunRec: array [0..7] of TMyObjct; //Массив окошечек
procedure TfmForm1.FormCreate(Sender: TObject);
for n := 0 to 7 do
begin
RunRec[n] := TRunRec.Create(Self);
RunRec[n].Created(n);
end;
Поля заполняются, а показываться на форме не хочет.
Дело в том что, прописав массив в основном модуле RunRec: array [0..7] of TfrDevico
Показывается на форме, легко.
Вот что не так делаю?
Андрей.

← →
Юрий Зотов © (2005-10-14 13:17) [1]

Непонятно, что такое TRunRec, но похоже, что в FormCreate надо просто добавиь строку: RunRec[n].Parent := Self.

Не могу показать компонент Найти похожие ветки