Trabalhando String AddObject

Este exemplo requer vou usar estamos usando os componentes, adicionar um TPageControl já esteja no formulário.

Além disso, você deve adicionar páginas ao TPageControl clicando com o botão direito do mouse e selecionando Nova página. 

O código de exemplo permite selecionar a propriedade ActivePage através da seleção de um item ComboBox. 

Enquanto o formulário é criado, o controle ComboBox é carregado com os nomes de cada uma das guias, bem como os ponteiros da instância para a guia correspondente. 

Quando você seleciona o item ComboBox, o objeto TTabSheet associado contido na matriz Objetos ComboBox é usado para definir a propriedade ActivePage. 

Distribuem-se os componentes como mostra a figura.

Figura 1

procedure Form1.FormCreate(sender: TObject);

var

  i: Integer;

begin

  for i := 0 to PageControl1.PageCount - 1 do

    begin

       ComboBox1.Items.AddObject(PageControl1.Pages[i].Name,

       PageControl1.Pages[i]);

    end;

  ComboBox1.ItemIndex := 0;

  PageControl1.ActivePage := TTabSheet(ComboBox1.Items.Objects[ComboBox1.ItemIndex]);

end;

Depois de Adicionar este código acima, segue a figura abaixo.

Figura 2

Selecione o ComboBox,  no object Inspector selecione o evento OnChange, é digite o código abaixo.

procedure TForm1.ComboBox1Change(Sender : TObject)

begin 

   if (Sender is TComboBox) then 

    With (Sender as TComboBox) do 

      PageControl1.ActivePage := TTabSheet(Items.Objects[ItemIndex]);

end;

Depois de digitar este código executa a projeto, assim conseguirá manipular os object da aba do PageControl, através do ComboBox. 

Espero que goste de Dicas.