for i := 0 to PageControl1.PageCount - 1 do if PageControl1.Pages[i].Caption = 'x' then ShowMessage('Нашли!');