Скачать: CL | DM;

Как определить Index страницы (Page) по заголовку в TPageControl?   Найти похожие ветки 

← →
Volf_555   (2006-02-12 16:52) [0]

Есть фиксированный заголовок каждой страницы в TPageControl. При обрисовки индексы страниц меняются, но заголовки остаются прежними.

Как тогда определить Index Page по заголовку в TPageControl?

---

← →
Marser ©   (2006-02-13 01:43) [1]

В принципе, это можно сделать например вот так:
procedure TForm1.Button1Click(Sender: TObject);
var i,ind:integer;
begin
 i:=0;
 ind:=-1;
 while (i=PageControl1.PageCount)and(ind=-1) do
   if PageControl1.Pages[i].Caption="TabSheet2" then ind:=i
   else inc(i)
end;


Но из совершенно неясной постановки вопроса можно предположить, что может быть достаточно и просто доступа к активной странице через ActivePage.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.042 c