| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
TPageControl [D6, Win2k]
Alibaba © (2002-03-15 11:03:00)Извиняюсь за елементарный вопрос...
Как в TPageControl добавить страничку.
Спасибо.
Sergn (2002-03-16 21:06:00) [1]Спасибо Виктор Щербаков.
Alibaba (2002-03-15 11:44:00) [2]2 Виктор Щербаков - Спсибо.
2 DPetrovich - речь идет о RunTime.
DPetrovich (2002-03-15 11:10:00) [3]проще кликнуть правой кнпкой по PageControl и выбрать New Page
Виктор Щербаков (2002-03-15 11:08:00) [4]Пример из хэлпа:
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;
| |
