Código Delphi [-] procedure TForm4.BitBtn3Click(Sender: TObject); var i:Integer; begin //Busca en todas las paginas la que se llame Ejemplo i:=TabbedNotebook1.Pages.IndexOf('Ejemplo'); if i>-1 then //Si encuentra la pagina que busca, le cambia el nombre TabbedNotebook1.Pages[i]:='Nuevo Nombre'; end;
procedure TForm4.BitBtn3Click(Sender: TObject); var i:Integer; begin //Busca en todas las paginas la que se llame Ejemplo i:=TabbedNotebook1.Pages.IndexOf('Ejemplo'); if i>-1 then //Si encuentra la pagina que busca, le cambia el nombre TabbedNotebook1.Pages[i]:='Nuevo Nombre'; end;