Ver Mensaje Individual
  #4  
Antiguo 27-04-2011
[FGarcia] FGarcia is offline
Miembro Premium
 
Registrado: sep 2005
Ubicación: Cordoba, Veracruz, México
Posts: 1.123
Reputación: 20
FGarcia Va por buen camino
Con un poco de paciencia :

1. Creas una nueva aplicacion.
2. En el formulario principal colocas un TNoteBook
3. Usando el Object Inspector seleccionas la propiedad Pages. Te abre una ventana de edicion donde declaras cuantas paginas necesites asignadole un nombre a cada una de ellas. Automaticamente se les asigna un Indice (PageIndex)
3.1 Haz click derecho en cualquier parte del control TNotebook y te aparece un menu contextual donde puedes avanzar o retroceder entre paginas. Coloca los componentes que necesites en cada uno de ellas.
4. Coloca tres botones en el formulario principal, por ejemplo, y en su evento Onclick coloca el codigo:

Código Delphi [-]
procedure TForm1.Button4Click(Sender: TObject);
begin
  NoteBook1.PageIndex := 1;
end;

Para garantizar que siempre se inicie en la primera pagina del TNotebook escribe este codigo en el evento OnActivate del Formulario:

Código Delphi [-]
procedure TForm1.FormActivate(Sender: TObject);
begin
  NoteBook1.PageIndex := 0;
end;

Espero te sirva.
__________________
ESTO ES UN FORO ... NO UN MÓVIL
¿Por qué no escribir de una manera comprensible para que los humanos lo podamos entender?
Responder Con Cita