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

Вниз

TPageControl   Найти похожие ветки 

← →
Subdigger ©   (2005-07-04 18:10) [0]

как в рун айме добавить/удалить страницу

---

← →
Ega23 ©   (2005-07-04 18:13) [1]

А в хелп посмотреть религия не позволяет?

procedure TForm1.FormCreate(Sender: TObject);

var
 i: Integer;
begin
 with PageControl1 do
   for i := 0 to 9 do
     with TTabSheet.Create(Self) do
     begin
       PageControl := PageControl1;
       Pages[i].TabVisible := (i mod 2 = 0);
       Caption := "PageIndex: " +
       IntToStr(Pages[i].PageIndex) + "  TabIndex: " +
         IntToStr(Pages[i].TabIndex);
     end;
end;

---

← →
Subdigger ©   (2005-07-04 18:15) [2]

спс

---

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

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

Наверх

Память: 0.46 MB
Время: 0.023 c