TObject = class
constructor create;
procedure Free;
end;
TPersistent = class(TObject)
procedure Assign(Source: TPersistent);
end;
TComponent = class(TPersistent)
function FindComponent(AName: string): TComponent;
constructor create(AOwner: TComponent);
property Owner: TComponent; read write;
procedure DESTROYCOMPONENTS;
procedure DESTROYING;
procedure FREENOTIFICATION(ACOMPONENT:TCOMPONENT);
procedure insertCOMPONENT(ACOMPONENT:TCOMPONENT);
procedure REMOVECOMPONENT(ACOMPONENT:TCOMPONENT);
property COMPONENTS[Index: INTEGER]: TCOMPONENT; read;
property COMPONENTCOUNT: INTEGER; read;
property COMPONENTINDEX: INTEGER; read write;
property COMPONENTSTATE: Byte; read;
property DESIGNINFO: LONGINT; read write;
property NAME: STRING; read write;
property TAG: LONGINT; read write;
end;
TStrings = class(TPersistent)
function Add(S: string): Integer;
procedure Append(S: string);
procedure AddStrings(Strings: TStrings);
procedure Clear;
procedure delete(Index: Integer);
function IndexOf(const S: string): Integer;
procedure insert(Index: Integer; S: string);
property Count: Integer; read;
property Text: String; read write;
property CommaText: String; read write;
property PixelsPerInch: Integer; read write;
property Style: TFontStyles; read write;
end;
TCanvas = class(TPersistent)
procedure Arc(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);
procedure Chord(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);
procedure Draw(X, Y: Integer; Graphic: TGraphic);
procedure Ellipse(X1, Y1, X2, Y2: Integer);
procedure FloodFill(X, Y: Integer; Color: TColor; FillStyle: Byte);
procedure LineTo(X, Y: Integer);
procedure MoveTo(X, Y: Integer);
procedure Pie(X1, Y1, X2, Y2, X3, Y3, X4, Y4: Integer);
procedure Rectangle(X1, Y1, X2, Y2: Integer);
procedure Refresh;
procedure RoundRect(X1, Y1, X2, Y2, X3, Y3: Integer);
function TextHeight(Text: string): Integer;
procedure TextOut(X, Y: Integer; Text: string);
function TextWidth(Text: string): Integer;
property Handle: Integer; read write;
property Pixels: Integer Integer Integer; read write;
property Brush: TBrush; read;
property CopyMode: Byte; read write;
property Font: TFont; read;
property Pen: TPen; read;
end;
TPenMode = (pmBlack, pmWhite, pmNop, pmNot, pmCopy, pmNotCopy, pmMergePenNot, pmMaskPenNot, pmMergeNotPen, pmMaskNotPen, pmMerge, pmNotMerge, pmMask, pmNotMask, pmXor, pmNotXor);
TPenStyle = (psSolid, psDash, psDot, psDashDot, psDashDotDot, psClear, psInsideFrame);
TPen = class(TGraphicsObject)
constructor create;
property COLOR: TCOLOR; read write;
property MODE: TPENMODE; read write;
property STYLE: TPENSTYLE; read write;
property WIDTH: INTEGER; read write;
end;
TBrushStyle = (bsSolid, bsClear, bsHorizontal, bsVertical, bsFDiagonal, bsBDiagonal, bsCross, bsDiagCross);
TBrush = class(TGraphicsObject)
constructor create;
property COLOR: TCOLOR; read write;
property STYLE: TBRUSHSTYLE; read write;
end;
TGraphic = class(TPersistent)
procedure LoadFromFile(const Filename: string);
procedure SaveToFile(const Filename: string);
property Empty: Boolean; read write;
property Height: Integer; read write;
property Modified: Boolean; read write;
property Width: Integer; read write;
property OnChange: TNotifyEvent; read write;
end;
TBitmap = class(TGraphic)
procedure LoadFromStream(Stream: TStream);
procedure SaveToStream( Stream: TStream);
property Canvas: TCanvas; read write;
property Handle: HBITMAP; read write;
end;
TAlign = (alNone, alTop, alBottom, alLeft, alRight, alClient);
TControl = class(TComponent)
constructor create(AOwner: TComponent);
procedure BringToFront;
procedure Hide;
procedure Invalidate;
procedure refresh;
procedure Repaint;
procedure SendToBack;
procedure Show;
procedure update;
procedure SetBounds(x,y,w,h: Integer);
property Left: Integer; read write;
property Top: Integer; read write;
property Width: Integer; read write;
property Height: Integer; read write;
property Hint: String; read write;
property Align: TAlign; read write;
property ClientHeight: Longint; read write;
property ClientWidth: Longint; read write;
property ShowHint: Boolean; read write;
property Visible: Boolean; read write;
property Enabled: Boolean; read write;
property Hint: String; read write;
property Cursor: Integer; read write;
end;
TWinControl = class(TControl)
property Parent: TWinControl; read write;
property Handle: Longint; read write;
property Showing: Boolean; read;
property TabOrder: Integer; read write;
property TabStop: Boolean; read write;
function CANFOCUS:BOOLEAN;
function FOCUSED:BOOLEAN;
property CONTROLS[Index: INTEGER]: TCONTROL; read;
property CONTROLCOUNT: INTEGER; read;
end;
TGraphicControl = class(TControl)
end;
TCustomControl = class(TWinControl)
end;
TScrollBarKind = (sbHorizontal, sbVertical);
TScrollBarInc = SmallInt;
TCONTROLSCROLLBAR = class('TPersistent')
property KIND: TSCROLLBARKIND; read;
property SCROLLPOS: INTEGER; read
property MARGIN: WORD; read write;
property INCREMENT: TSCROLLBARINC; read write;
property RANGE: INTEGER; read write;
property POSITION: INTEGER; read write;
property TRACKING: BOOLEAN; read write;
property VISIBLE: BOOLEAN; read write;
end;
TScrollingWinControl = class(TWinControl)
procedure SCROLLINVIEW(ACONTROL:TCONTROL);
property HORZSCROLLBAR: TCONTROLSCROLLBAR; read write;
property VERTSCROLLBAR: TCONTROLSCROLLBAR; read write;
end;
TFormBorderStyle = (bsNone, bsSingle, bsSizeable, bsDialog, bsToolWindow, bsSizeToolWin);
TBorderIcon = (biSystemMenu, biMinimize, biMaximize, biHelp);
TBorderIcons = set of TBorderIcon;
TPosition = (poDesigned, poDefault, poDefaultPosOnly, poDefaultSizeOnly, poScreenCenter, poDesktopCenter, poMainFormCenter, poOwnerFormCenter);
TCloseAction = (caNone, caHide, caFree, caMinimize);
TCloseEvent = procedure(Sender: TObject; var Action: TCloseAction);
TCloseQueryEvent = procedure(Sender: TObject; var CanClose: Boolean);
TEShiftState = (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble);
TShiftState = set of TEShiftState;
TKeyEvent = procedure (Sender: TObject; var Key: Word; Shift: TShiftState);
TKeyPressEvent = procedure(Sender: TObject; var Key: Char);
TForm = class(TScrollingWinControl)
constructor createNEW(AOWNER:TCOMPONENT; Dummy: Longint);
procedure CLOSE;
procedure HIDE;
procedure SHOW;
function SHOWMODAL:INTEGER;
procedure RELEASE;
property ACTIVE: BOOLEAN; read;
property ACTIVECONTROL: TWINCONTROL; read write;
property BORDERICONS: TBorderIcons; read write;
property BORDERSTYLE: TFORMBORDERSTYLE; read write;
property CAPTION: STRING; read write;
property AUTOSCROLL: BOOLEAN; read write;
property COLOR: TCOLOR; read write;
property FONT: TFONT; read write;
property FORMSTYLE: TFORMSTYLE; read write;
property KEYPREVIEW: BOOLEAN; read write;
property POSITION: TPOSITION; read write;
property ONACTIVATE: TNOTIFYEVENT; read write;
property ONCLICK: TNOTIFYEVENT; read write;
property ONDBLCLICK: TNOTIFYEVENT; read write;
property ONdropDOWN: TNotifyEvent; read write;
property ONCLOSE: TCLOSEEVENT; read write;
property ONCLOSEQUERY: TCLOSEQUERYEVENT; read write;
property ONcreate: TNOTIFYEVENT; read write;
property ONDESTROY: TNOTIFYEVENT; read write;
property ONDEACTIVATE: TNOTIFYEVENT; read write;
property ONHIDE: TNOTIFYEVENT; read write;
property ONKEYDOWN: TKEYEVENT; read write;
property ONKEYPRESS: TKEYPRESSEVENT; read write;
property ONKEYUP: TKEYEVENT; read write;
property ONRESIZE: TNOTIFYEVENT; read write;
property ONSHOW: TNOTIFYEVENT; read write;
end;
TCustomLabel = class(TGraphicControl)
end;
TAlignment = (taLeftJustify, taRightJustify, taCenter);
TLabel = class(TCustomLabel)
property ALIGNMENT: TAlignment; read write;
property AUTOSIZE: Boolean; read write;
property CAPTION: String; read write;
property COLOR: TColor; read write;
property FOCUSCONTROL: TWinControl; read write;
property FONT: TFont; read write;
property WORDWRAP: Boolean; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
end;
TCustomEdit = class(TWinControl)
procedure CLEAR;
procedure CLEARselectION;
procedure selectALL;
property MODIFIED: BOOLEAN; read write;
property SELLENGTH: INTEGER; read write;
property SELSTART: INTEGER; read write;
property SELTEXT: STRING; read write;
property TEXT: string; read write;
end;
TBorderStyle = TFormBorderStyle;
TEditCharCase = (ecNormal, ecUpperCase, ecLowerCase);
TEdit = class(TCustomEdit)
property AUTOselect: Boolean; read write;
property AUTOSIZE: Boolean; read write;
property BORDERSTYLE: TBorderStyle; read write;
property CHARCASE: TEditCharCase; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property HIDEselectION: Boolean; read write;
property MAXLENGTH: Integer; read write;
property PASSWORDCHAR: Char; read write;
property READONLY: Boolean; read write;
property TEXT: string; read write;
property ONCHANGE: TNotifyEvent; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
property ONKEYDOWN: TKeyEvent; read write;
property ONKEYPRESS: TKeyPressEvent; read write;
property ONKEYUP: TKeyEvent; read write;
end;
TCustomMemo = class(TCustomEdit)
property LINES: TSTRINGS; read write;
end;
TScrollStyle = (ssNone, ssHorizontal, ssVertical, ssBoth);
TMemo = class(TMemo)
property LINES: TSTRINGS; read write;
property ALIGNMENT: TAlignment; read write;
property BORDERSTYLE: TBorderStyle; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property HIDEselectION: Boolean; read write;
property MAXLENGTH: Integer; read write;
property READONLY: Boolean; read write;
property SCROLLBARS: TScrollStyle; read write;
property WANTRETURNS: Boolean; read write;
property WANTTABS: Boolean; read write;
property WORDWRAP: Boolean; read write;
property ONCHANGE: TNotifyEvent; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
property ONKEYDOWN: TKeyEvent; read write;
property ONKEYPRESS: TKeyPressEvent; read write;
property ONKEYUP: TKeyEvent; read write;
end;
TCustomComboBox = class(TWinControl)
property dropPEDDOWN: BOOLEAN; read write;
property ITEMS: TSTRINGS; read write;
property ITEMINDEX: INTEGER; read write;
end;
TComboBoxStyle = (csdropDown, csSimple, csdropDownList, csOwnerDrawFixed, csOwnerDrawVariable);
TComboBox = class(TCustomComboBox)
property STYLE: TComboBoxStyle; read write;
property COLOR: TColor; read write;
property dropDOWNCOUNT: Integer; read write;
property FONT: TFont; read write;
property MAXLENGTH: Integer; read write;
property SORTED: Boolean; read write;
property TEXT: string; read write;
property ONCHANGE: TNotifyEvent; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
property ONKEYDOWN: TKeyEvent; read write;
property ONKEYPRESS: TKeyPressEvent; read write;
property ONKEYUP: TKeyEvent; read write;
end;
TButtonControl = class(TWinControl)
end;
TButton = class(TButtonControl)
property CANCEL: BOOLEAN; read write;
property CAPTION: String; read write;
property DEFAULT: BOOLEAN; read write;
property FONT: TFont; read write;
property MODALRESULT: LONGINT; read write;
property ONCLICK: TNotifyEvent; read write;
end;
TCustomCheckBox = class(TButtonControl)
end;
TCheckBoxState = (cbUnchecked, cbChecked, cbGrayed);
TCheckBox = class(TCustomCheckBox)
property ALIGNMENT: TAlignment; read write;
property ALLOWGRAYED: Boolean; read write;
property CAPTION: String; read write;
property CHECKED: Boolean; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property STATE: TCheckBoxState; read write;
property ONCLICK: TNotifyEvent; read write;
end;
TRadioButton = class(TButtonControl)
property ALIGNMENT: TALIGNMENT; read write;
property CAPTION: String; read write;
property CHECKED: BOOLEAN; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
end;
TCustomListBox = class(TWinControl)
property ITEMS: TSTRINGS; read write;
property ITEMINDEX: INTEGER; read write;
property SELCOUNT: INTEGER; read;
property selectED[Index: INTEGER]: BOOLEAN; read write;
end;
TListBoxStyle = (lbStandard, lbOwnerDrawFixed, lbOwnerDrawVariable);
TListBox = class(TCustomListBox)
property BORDERSTYLE: TBorderStyle; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property MULTIselect: Boolean; read write;
property SORTED: Boolean; read write;
property STYLE: TListBoxStyle; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
property ONKEYDOWN: TKeyEvent; read write;
property ONKEYPRESS: TKeyPressEvent; read write;
property ONKEYUP: TKeyEvent; read write;
end;
TBevelShape = (bsBox, bsFrame, bsTopLine, bsBottomLine, bsLeftLine, bsRightLine,bsSpacer);
TBevelStyle = (bsLowered, bsRaised);
TBevel = class(TGraphicControl)
property SHAPE: TBEVELSHAPE; read write;
property STYLE: TBEVELSTYLE; read write;
end;
TCustomPanel = class(TCustomControl)
end;
TPanelBevel = (bvNone, bvLowered, bvRaised,bvSpace);
TBevelWidth = Longint;
TBorderWidth = Longint;
TPanel = class(TCustomPanel)
property ALIGNMENT: TAlignment; read write;
property BEVELINNER: TPanelBevel; read write;
property BEVELOUTER: TPanelBevel; read write;
property BEVELWIDTH: TBevelWidth; read write;
property BORDERWIDTH: TBorderWidth; read write;
property BORDERSTYLE: TBorderStyle; read write;
property CAPTION: String; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
end;
TNewStaticText = class(TWinControl)
property AUTOSIZE: BOOLEAN; read write;
property CAPTION: String; read write;
property COLOR: TColor; read write;
property FOCUSCONTROL: TWinControl; read write;
property FONT: TFont; read write;
property SHOWACCELCHAR: Boolean; read write;
property WORDWRAP: Boolean; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
end;
TNewCheckListBox = class(TCustomListBox)
function AddCheckBox(const ACaption, ASubItem: string; ALevel: Byte; AChecked, AEnabled, AHasInternalChildren, ACheckWhenParentChecked: Boolean; AObject: TObject): Integer;
function ADDGROUP(ACAPTION,ASUBITEM:STRING;ALEVEL:BYTE;AOBJECT:TOBJECT):INTEGER;
function AddRadioButton(const ACaption, ASubItem: string; ALevel: Byte; AChecked, AEnabled: Boolean; AObject: TObject): Integer;
property CHECKED[Index: INTEGER]: BOOLEAN; read write;
property STATE[Index: INTEGER]: TCHECKBOXSTATE; read write;
property ITEMENABLED[Index: INTEGER]: BOOLEAN; read write;
property ITEMLEVEL[Index: INTEGER]: BYTE; read;
property ITEMOBJECT[Index: INTEGER]: TOBJECT; read write;
property ITEMSUBITEM[Index: INTEGER]: STRING; read write;
property ALLOWGRAYED: BOOLEAN; read write;
property FLAT: BOOLEAN; read write;
property MINITEMHEIGHT: INTEGER; read write;
property OFFSET: INTEGER; read write;
property MULTIselect: BOOLEAN; read write;
property ONCLICKCHECK: TNOTIFYEVENT; read write;
property BORDERSTYLE: TBORDERSTYLE; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property SORTED: Boolean; read write;
property STYLE: TListBoxStyle; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
property ONKEYDOWN: TKeyEvent; read write;
property ONKEYPRESS: TKeyPressEvent; read write;
property ONKEYUP: TKeyEvent; read write;
property SHOWLINES: BOOLEAN; read write;
property WANTTABS: BOOLEAN; read write;
end;
TNewProgressBar = class(TWinControl)
property MIN: LONGINT; read write;
property MAX: LONGINT; read write;
property POSITION: LONGINT; read write;
end;
TRichEditViewer = class(TMemo)
property RTFTEXT: STRING; write;
property USERICHEDIT: BOOLEAN; read write;
end;
TPasswordEdit = class(TCustomEdit)
property AUTOselect: Boolean; read write;
property AUTOSIZE: Boolean; read write;
property BORDERSTYLE: TBorderStyle; read write;
property COLOR: TColor; read write;
property FONT: TFont; read write;
property HIDEselectION: Boolean; read write;
property MAXLENGTH: Integer; read write;
property Password: Boolean; read write;
property READONLY: Boolean; read write;
property TEXT: string; read write;
property ONCHANGE: TNotifyEvent; read write;
property ONCLICK: TNotifyEvent; read write;
property ONDBLCLICK: TNotifyEvent; read write;
property ONKEYDOWN: TKeyEvent; read write;
property ONKEYPRESS: TKeyPressEvent; read write;
property ONKEYUP: TKeyEvent; read write;
end;
TCustomFolderTreeView = class(TWinControl)
procedure ChangeDirectory(const Value: String; const createNewItems: Boolean);
procedure createNewDirectory(const ADefaultName: String);
property: Directory: String; read write;
end;
TFolderrenameEvent = procedure(Sender: TCustomFolderTreeView; var NewName: String; var Accept: Boolean);
TFolderTreeView = class(TCustomFolderTreeView)
property OnChange: TNotifyEvent; read write;
property Onrename: TFolderrenameEvent; read write;
end;
TStartMenuFolderTreeView = class(TCustomFolderTreeView)
procedure SetPaths(const AUserPrograms, ACommonPrograms, AUserStartup, ACommonStartup: String);
property OnChange: TNotifyEvent; read write;
property Onrename: TFolderrenameEvent; read write;
end;
TBitmapImage = class(TGraphicControl)
property AutoSize: Boolean; read write;
property BackColor: TColor; read write;
property Center: Boolean; read write;
property Bitmap: TBitmap; read write;
property ReplaceColor: TColor; read write;
property ReplaceWithColor: TColor; read write;
property Stretch: Boolean; read write;
end;
TNewNotebook = class(TWinControl)
function FindNextPage(CurPage: TNewNotebookPage; GoForward: Boolean): TNewNotebookPage;
property PageCount: Integer; read write;
property Pages[Index: Integer]: TNewNotebookPage; read;
property ActivePage: TNewNotebookPage; read write;
end;
TNewNotebookPage = class(TCustomControl)
property Color: TColor; read write;
property Notebook: TNewNotebook; read write;
property PageIndex: Integer; read write;
end;
TWizardPageNotifyEvent = procedure(Sender: TWizardPage);
TWizardPageButtonEvent = function(Sender: TWizardPage): Boolean;
WizardPage)
function Add(const ACaption: String): Integer;
function AddEx(const ACaption: StringTWizardPageCancelEvent = procedure(Sender: TWizardPage; var ACancel, AConfirm: Boolean);
TWizardPageShouldSkipEvent = function(Sender: TWizardPage): Boolean;
TWizardPage = class(TComponent)
property ID: Integer; read;
property Caption: String; read write;
property Description: String; read write;
property Surface: TNewNotebookPage; read write;
property SurfaceHeight: Integer; read write;
property SurfaceWidth: Integer; read write;
property OnActivate: TWizardPageNotifyEvent; read write;
property OnBackButtonClick: TWizardPageButtonEvent; read write;
property OnCancelButtonClick: TWizardPageCancelEvent; read write;
property OnNextButtonClick: TWizardPageButtonEvent; read write;
property OnShouldSkipPage: TWizardPageShouldSkipEvent; read write;
end;
TInputQueryWizardPage = class(TWizardPage)
function Add(const APrompt: String; const APassword: Boolean): Integer;
property Edits[Index: Integer]: TPasswordEdit; read;
property PromptLabels[Index: Integer]: TNewStaticText; read;
property SubCaptionLabel: TNewStaticText; read;
property Values[Index: Integer]: String; read write;
end;
TInputOptionWizardPage = class(T; const ALevel: Byte; const AExclusive: Boolean): Integer;
property CheckListBox: TNewCheckListBox; read;
property selectedValueIndex: Integer; read write;
property SubCaptionLabel: TNewStaticText; read;
property Values[Index: Integer]: Boolean; read write;
end;
TInputDirWizardPage = class(TWizardPage)
function Add(const APrompt: String): Integer;
property Buttons[Index: Integer]: TButton; read;
property Edits[Index: Integer]: TEdit; read;
property PromptLabels[Index: Integer]: TNewStaticText; read;
property SubCaptionLabel: TNewStaticText; read;
property Values[Index: Integer]: String; read write;
end;
TInputFileWizardPage = class(TWizardPage)
function Add(const APrompt, AFilter, ADefaultExtension: String): Integer;
property Buttons[Index: Integer]: TButton; read;
property Edits[Index: Integer]: TEdit; read;
property PromptLabels[Index: Integer]: TNewStaticText; read;
property SubCaptionLabel: TNewStaticText; read;
property Values[Index: Integer]: String; read write;
end;
TOutputMsgWizardPage = class(TWizardPage)
property MsgLabel: TNewStaticText; read;
end;
TOutputMsgMemoWizardPage = class(TWizardPage)
property RichEditViewer: TRichEditViewer; read;
property SubCaptionLabel: TNewStaticText; read;
end;
TOutputProgressWizardPage = class(TWizardPage)
procedure Hide;
property Msg1Label: TNewStaticText; read;
property Msg2Label: TNewStaticText; read;
property ProgressBar: TNewProgressBar; read;
procedure SetProgress(const Position, Max: Longint);
procedure SetText(const Msg1, Msg2: String);
procedure Show;
end;
TUIStateForm = class(TForm)
end;
TSetupForm = class(TUIStateForm)
procedure Center;
procedure CenterInsideControl(const Ctl: TWinControl; const InsideClientArea: Boolean);
end;
TMainForm = class(TSetupForm)
procedure ShowAboutBox;
end;
TWizardForm = class(TSetupForm)
property CANCELBUTTON: TBUTTON; read;
property NEXTBUTTON: TBUTTON; read;
property BACKBUTTON: TBUTTON; read;
property NOTEBOOK1: TNOTEBOOK; read;
property NOTEBOOK2: TNOTEBOOK; read;
property WelcomePage: TNewNotebookPage; read;
property InnerPage: TNewNotebookPage; read;
property FinishedPage: TNewNotebookPage; read;
property LicensePage: TNewNotebookPage; read;
property PasswordPage: TNewNotebookPage; read;
property InfoBeforePage: TNewNotebookPage; read;
property UserInfoPage: TNewNotebookPage; read;
property selectDirPage: TNewNotebookPage; read;
property selectComponentsPage: TNewNotebookPage; read;
property selectProgramGroupPage: TNewNotebookPage; read;