[adfa76]

Algo así.

Código Delphi [-]
procedure manejadorOnchage(sender: TObject)
begin
//lo que quieras hacer
end;

procedure crearLaPagina;
var
  pagina : TPageControl;
begin
   pagina := TPageControl.Create;
   pagina.onChange := manejadorOnchage;
end;