Как создать экземпляр потомка TFrame динамически

Гарик (2001-12-19 11:08) (1)

Имеются 2 панельки - одна навигационная, другая информационная.
на навигационной панели находятся кнопки, при нажатии на которые хотелось бы чтобы создавался соответственный фрейм на другой панели.

при попытке сделать это влоб:
procedure Tform1.tbToolingClick(Sender: TObject);
comenzar
frame1 := TFrame1.Create(Panel1);
fin;

ничего на panel1 не появляется.
в дебаггере у frame1 свойство showing почему-то False.

Eduard (2001-12-19 11:43) (1)

Frame1.Parent := Panel1; Frame1.Visible := True;

Гарик (2001-12-19 12:30) (1)

Естественно, Visible=true

Eduard (2001-12-19 12:33) (1)

En resumen:

procedure Tform1.tbToolingClick(Sender: TObject); var Frame1: TFrame; begin Frame1 := TFrame.Create(nil); Frame1.Parent := Panel1; Frame1.Left := ... Frame1.Top := ... Frame1.Visible := True end;

и что, не появляется ?

Eduard (2001-12-19 12:59) (1)

Извиняюсь, не TFrame, а TFrame1

Гарик (2001-12-19 13:00) (1)

появляется :)

Как создать экземпляр потомка TFrame динамически Encontrar ramas similares