Control de Paginas de un PageControl por medio de un ComboBox

[rufo]

Buenas tardes a todos antes que nada me es grato volver con ustedes en el cual es la mejor comunidad que he conocido, bueno espero que me ayuden con el siguiente problemita que tengo, resulta que tengo un combobox y en su propiedad de items le puse una lista en el cual quiero hacer que cuando elija una opcion de dicha lista me aparesca una ventana de un objeto de pagecontrol pero no logro visualizar cada opcion que pongo a lo mejor lo estoy haciendo mal, les pongo a continuacion el codigo que estoy usando y de antemano gracias.

Código Delphi [-]
procedure Tprincipal3.ComboBox1Change(Sender: TObject);
begin
      tdeposito.Visible:=true;
  case ComboBox1.ItemIndex of
     1:   factura.Visible:=true;
     2:   prestamo.Visible:=true;
     end;
  end;

Nota: tdeposito es el objeto Tpagecontrol y factura, prestamo son tabsheet.