Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];



Вниз

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

Гарик   (2001-12-19 11:08) [0]

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

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

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

---

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

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

---

Гарик   (2001-12-19 12:30) [2]

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

---

Eduard   (2001-12-19 12:33) [3]

Короче:

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) [4]

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

---

Гарик   (2001-12-19 13:00) [5]

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

---

Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.73 MB
Время: 0.024 c