Форум: "Основная";
Поиск по всему сайту: 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
4-22476           kingdom               2001-11-02 19:42  2002.01.08  
Помогите, UpdateResource не работает с BPL файлами!


4-22508           Gluka                 2001-11-06 00:18  2002.01.08  
Можно ли както поменять вид курсора над чужим окном!?


3-21911           Jaya!                 2001-11-11 12:58  2002.01.08  
Глюки в ВДЕ


1-22262           Катя                  2001-12-17 15:25  2002.01.08  
помогите


1-22071           KAA                   2001-12-19 10:48  2002.01.08  
Два сервиса мешают друг другу.