| Class TPageManager (unit PageMngr) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure CheckBtnEnabled;
destructor Destroy;
function GetNextPageIndex(Page: Integer): Integer;
function GetPriorPageIndex(Page: Integer): Integer;
procedure NextPage;
procedure PriorPage;
procedure Resync;
procedure SetPage(NewPageIndex: Integer; Next: Boolean);
procedure ChangePage(Next: Boolean);
procedure GetChildren(Proc: TGetChildProc
);
procedure Loaded;
procedure Notification(AComponent: TComponent;
AOperation: TOperation);
procedure AddProxy(Proxy: TPageProxy);
procedure BtnClick(Sender: TObject);
procedure DestroyProxies;
function FindFreePage: string;
function GetButton(Index: Integer): TControl;
function GetNextEnabled: Boolean;
function GetPageCount: Integer;
function GetPageIndex: Integer;
function GetPageName(Index: Integer): string;
function GetPriorEnabled: Boolean;
function GetProxyIndex(const PageName: string): Integer;
procedure PageEnter(Page: Integer; Next: Boolean);
procedure PageHide(Page: Integer; Next: Boolean);
procedure PageLeave(Page: Integer; Next: Boolean);
procedure PageShow(Page: Integer; Next: Boolean);
procedure RemoveProxy(Proxy: TPageProxy);
procedure SetButton(Index: Integer; Value: TControl);
procedure SetPageIndex(Value: Integer);
procedure SetPageOwner(Value: TPageOwner);
procedure SetPageProxies(Value: TList);
procedure SyncBtnClick(Index: Integer; Sync: Boolean);| Properties |
property NextBtn : TControl
property PageOwner : TPageOwner
property PageProxies : TList
property PriorBtn : TControl
property SetStartPage : Boolean
property NextEnabled : Boolean
property PageCount : Integer
property PageIndex : Integer
property PageNames : string
property PriorEnabled : Boolean| Events |
event OnCheckButtons : TNotifyEvent
event OnGetNextPage : TPageRequestEvent
event OnGetPriorPage : TPageRequestEvent
event OnCheckProxy : TNotifyEvent| Variables |
FButtons : array [Boolean] of TControl;
FChangeHelpContext : Boolean;
FOnCheckButtons : TNotifyEvent;
FOnCheckProxy : TNotifyEvent;
FOnGetNextPage : TPageRequestEvent;
FOnGetPriorPage : TPageRequestEvent;
FPageOwner : TPageOwner;
FPageProxies : TList;
FSaveBtnClick : array [Boolean] of TNotifyEvent;
FSetStartPage : Boolean;| Constructors |
constructor Create(AOwner: TComponent);TPageManager
| Functions |
procedure CheckBtnEnabled;
destructor Destroy;
function GetNextPageIndex(Page: Integer): Integer;
function GetPriorPageIndex(Page: Integer): Integer;
procedure NextPage;
procedure PriorPage;
procedure Resync;
procedure SetPage(NewPageIndex: Integer; Next: Boolean);
procedure ChangePage(Next: Boolean);
procedure GetChildren(Proc: TGetChildProc
);
procedure Loaded;
procedure Notification(AComponent: TComponent;
AOperation: TOperation);
procedure AddProxy(Proxy: TPageProxy);NewProxy.Name := GetUniqueName(NewProxy);
procedure BtnClick(Sender: TObject);
procedure DestroyProxies;
function FindFreePage: string;
function GetButton(Index: Integer): TControl;
function GetNextEnabled: Boolean;update owner form help context
function GetPageCount: Integer;
function GetPageIndex: Integer;
function GetPageName(Index: Integer): string;
function GetPriorEnabled: Boolean;
function GetProxyIndex(const PageName: string): Integer;
procedure PageEnter(Page: Integer; Next: Boolean);
procedure PageHide(Page: Integer; Next: Boolean);
procedure PageLeave(Page: Integer; Next: Boolean);
procedure PageShow(Page: Integer; Next: Boolean);
procedure RemoveProxy(Proxy: TPageProxy);
procedure SetButton(Index: Integer; Value: TControl);
procedure SetPageIndex(Value: Integer);
procedure SetPageOwner(Value: TPageOwner);
procedure SetPageProxies(Value: TList);
procedure SyncBtnClick(Index: Integer; Sync: Boolean);| Properties |
property NextBtn : TControl
property PageOwner : TPageOwnerfor internal use only
property PageProxies : TList
property PriorBtn : TControl
property SetStartPage : Boolean
property NextEnabled : Boolean
property PageCount : Integer
property PageIndex : Integer
property PageNames : string
property PriorEnabled : Boolean| Events |
event OnCheckButtons : TNotifyEvent
event OnGetNextPage : TPageRequestEvent
event OnGetPriorPage : TPageRequestEvent
event OnCheckProxy : TNotifyEvent| Variables |
FButtons : array [Boolean] of TControl;
FChangeHelpContext : Boolean;
FOnCheckButtons : TNotifyEvent;
FOnCheckProxy : TNotifyEvent;
FOnGetNextPage : TPageRequestEvent;
FOnGetPriorPage : TPageRequestEvent;
FPageOwner : TPageOwner;
FPageProxies : TList;
FSaveBtnClick : array [Boolean] of TNotifyEvent;
FSetStartPage : Boolean;