Class TTabbedNotebookExternalPages (unit Formpage)

Inherits from

TFormPages

Constructors


Constructor Create(AOwner:Tcomponent);



Functions

procedure CreateCurrentPage;

if Assigned(Owner) and (Owner is TForm) and not (csDesigning in ComponentState) then TForm(Owner).

procedure Notification(AComponent: TComponent; Operation: TOperation);

minor bug (glitch) - sets on pagecontrol too, if both notebook and pagecontrol used !!

function GetTabbedNotebook: TTabbedNotebook;


procedure OnParentShow(Sender: TObject);


procedure ReleaseTabbedNotebook;


Procedure SetTabbedNotebook(value : TTabbedNotebook);


procedure TabbedNotebookChange(Sender: TObject; NewTab: Integer; var AllowChange: Boolean);

if not (csDestroying in FTabbedNotebook.

Properties

property PageFormInfo00 : TPageFormInfo


property PageFormInfo01 : TPageFormInfo


property PageFormInfo02 : TPageFormInfo


property PageFormInfo03 : TPageFormInfo


property PageFormInfo04 : TPageFormInfo


property PageFormInfo05 : TPageFormInfo


property PageFormInfo06 : TPageFormInfo


property PageFormInfo07 : TPageFormInfo


property PageFormInfo08 : TPageFormInfo


property PageFormInfo09 : TPageFormInfo


property PageFormInfo10 : TPageFormInfo


property PageFormInfo11 : TPageFormInfo


property PageFormInfo12 : TPageFormInfo


property PageFormInfo13 : TPageFormInfo


property PageFormInfo14 : TPageFormInfo


property PageFormInfo15 : TPageFormInfo


property TabbedNotebook : TTabbedNotebook


Events

Variables

FTabbedNotebook : TTabbedNotebook;


FTabbedNotebookChange : TPageChangeEvent;


ParentOnShow : TNotifyEvent;



Constructors


Constructor Create(AOwner:Tcomponent);


Functions


procedure CreateCurrentPage;

if Assigned(Owner) and (Owner is TForm) and not (csDesigning in ComponentState) then TForm(Owner).ActiveControl := CreateForm(NewTab); {


procedure Notification(AComponent: TComponent; Operation: TOperation);

minor bug (glitch) - sets on pagecontrol too, if both notebook and pagecontrol used !!


function GetTabbedNotebook: TTabbedNotebook;


procedure OnParentShow(Sender: TObject);


procedure ReleaseTabbedNotebook;


Procedure SetTabbedNotebook(value : TTabbedNotebook);


procedure TabbedNotebookChange(Sender: TObject; NewTab: Integer; var AllowChange: Boolean);

if not (csDestroying in FTabbedNotebook.ComponentState) then


Properties


property PageFormInfo00 : TPageFormInfo


property PageFormInfo01 : TPageFormInfo


property PageFormInfo02 : TPageFormInfo


property PageFormInfo03 : TPageFormInfo


property PageFormInfo04 : TPageFormInfo


property PageFormInfo05 : TPageFormInfo


property PageFormInfo06 : TPageFormInfo


property PageFormInfo07 : TPageFormInfo


property PageFormInfo08 : TPageFormInfo


property PageFormInfo09 : TPageFormInfo


property PageFormInfo10 : TPageFormInfo


property PageFormInfo11 : TPageFormInfo


property PageFormInfo12 : TPageFormInfo


property PageFormInfo13 : TPageFormInfo


property PageFormInfo14 : TPageFormInfo


property PageFormInfo15 : TPageFormInfo


property TabbedNotebook : TTabbedNotebook


Events


Variables


FTabbedNotebook : TTabbedNotebook;


FTabbedNotebookChange : TPageChangeEvent;


ParentOnShow : TNotifyEvent;