Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.12;
Скачать: CL | DM;

Вниз

закладки в pagecontrol   Найти похожие ветки 

 
Zirus ©   (2003-04-29 11:33) [0]

Здравствуйте! Как программно создаются закладки в pagecontrol?


 
$hade ©   (2003-04-29 11:37) [1]

а зачем в pagecontrol?
бери TabControl...
TabControl.Tabs.Add("Page1");


 
Skier ©   (2003-04-29 12:04) [2]

>Zirus
var
ATabSheet : TTabSheet;
begin
ATabSheet := TTabSheet.Create(AYourPageControl);
ATabSheet.Parent := AYourPageControl;
ATabSheet.PageControl := AYourPageControl;
end;


 
MBo ©   (2003-04-29 13:05) [3]

.Parent - здесь лишнее


 
Skier ©   (2003-04-29 13:11) [4]

Да. Точно. Parent - лишнее. Надо запомнить...:)

procedure TTabSheet.SetPageControl(APageControl: TPageControl);
begin
if FPageControl <> APageControl then
begin
if FPageControl <> nil then FPageControl.RemovePage(Self);
Parent := APageControl;
if APageControl <> nil then APageControl.InsertPage(Self);
end;
end;


 
GTS   (2003-04-29 13:28) [5]

а, может, попробывать что-то типа:

with TTabSheet.Crete(self) do
begin
pagecontrol:=pagecontrol1;
end;



Страницы: 1 вся ветка

Текущий архив: 2003.05.12;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.01 c
1-34475
KIE
2003-04-28 11:10
2003.05.12
Выключение Timer-а как отследить


3-34343
mihei
2003-04-22 11:23
2003.05.12
подскажите как добавить в DBGridEh1 число или строку


14-34577
Duce
2003-04-23 13:54
2003.05.12
Распускаем молодежь...


1-34453
Delphiman
2003-04-27 19:11
2003.05.12
Как определить время ?


1-34457
Петр
2003-04-29 09:57
2003.05.12
Проблема с Объектами в форме MDI -приложения