Como agregar mas paginas a un Tabbes Pages

Antuan · #4 08-08-2005

Tengo 7 paginas y en la ultima doy la opcion con 2 botones
SALIR
CONTINUAR
Y en la opcion CONTINUAR le digo que me vaya a la pagina primera.
Pero no me va.
¿Que hago mal? 0 ¿ Me falta algo?
Codigo en Delphi

Código Delphi [-]procedure TPagesDlg.TabSheet7Enter(Sender: TObject);
begin
If Application.MessageBox('Deseas Terminar?','ESPERANDO',MB_OKCANCEL+MB_ICONQUESTION)=IDOK then
Application.Terminate
else
PageMenu.SelectNextPage(TabSheet1.TabVisible = True);
PageMenu.ActivePage:= TabSheet1;
end;

TabSheet7 es la pagina 7
TabSheet1 es la pagina 1 donde quiero que se vaya y presente la pagina 1 al pulsar el boton CONTUNUAR