PageControl {El Muy Mencionado}

[GeoAvila]

Hola yo trabajo por lo regular con VB6 pero me estoy mudando a Delphi..

asi que tengo un pregunta..

en vb6 yo puedo poner un pagecontrol(o el similar), y crear las pestañas en las propiedades del control, pero me doy cuenta, y por mas que busque, el page control no posee esa cualidad.

si no posee esa cudad como hago para decirle cuantas pestañas tiene que tener y que contenido..

gracias a todos

[roman]

Haz click derecho sobre la componente y selecciona la opción "Add page".

// Saludos

[__cadetill]

No se si he entendido la pregunta, pero en diseño puedes añadir pestañas con el boton derecho encima del PageControl y New Page

En ejecución puedes saber el número mediante PageControl1.PageCount

Cada página es un objeto (TabSheet) que, a demás, es contenedor, por lo que puedes saber y recorrer sus elementos

  for i := 0 TabSheet1.ComponentCount - 1 do
  begin
    // lo que quieras
  end;

Bueno, si no era esto lo que querías.... especificamelo algo más y, con gusto, te responderé (u otro en su defecto)

[GeoAvila]

Gracias por la pronta respuesta....
las dos respuestas dieron en el clavo

Esque soy nuevo en delphi

[lacovera]

Muy buenas!! y para añadir las pestañas en tiempo de ejecución saben como hacerlo???
Gracias"

[[Lepe]]

Aqui lo tienes.

Saludos

[dec]

Hola,

Parece que en el Hilo al que enlaza Lepe quedan algunas dudas al final... El siguiente código crea un "PageControl" y varios "TTabSheet":

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  i: integer;
  ts: TTabSheet;
  pc: TPageControl;
begin
  // Creamos un PageControl
  pc := TPageControl.Create(Self);
  pc.Parent := Self;
  pc.SetBounds(10, 10, 400, 300);

  // Y luego 5 nuevas pestañas
  for i := 1 to 5 do
  begin
    ts := TTabSheet.Create(Self);
    ts.PageControl := pc;
    ts.Caption := 'Pestaña '+IntToStr(i);
  end;

end;