<?xml version="1.0" encoding="utf-8" ?>
<ps-syntax-doc>
  <keywords>
    <keyword id="and"></keyword>
    <keyword id="array"></keyword>
    <keyword id="as"></keyword>
    <keyword id="begin"></keyword>
    <keyword id="case"></keyword>
    <keyword id="const"></keyword>
    <keyword id="div"></keyword>
    <keyword id="do"></keyword>
    <keyword id="downto"></keyword>
    <keyword id="else"></keyword>
    <keyword id="end"></keyword>
    <keyword id="except"></keyword>
    <keyword id="export"></keyword>
    <keyword id="finally"></keyword>
  </keywords>
  <consts>
    <const id="akBottom" decl="TAnchorKind(3)"></const>
    <const id="akLeft" decl="TAnchorKind(0)"></const>
    <const id="akRight" decl="TAnchorKind(2)"></const>
    <const id="akTop" decl="TAnchorKind(1)"></const>
    <const id="alBottom" decl="TAlign(2)"></const>
    <const id="alClient" decl="TAlign(5)"></const>
    <const id="alLeft" decl="TAlign(3)"></const>
    <const id="alNone" decl="TAlign(0)"></const>
    <const id="alRight" decl="TAlign(4)"></const>
    <const id="alTop" decl="TAlign(1)"></const>
    <const id="fmCreate" decl="65535"></const>
    <const id="fmOpenRead" decl="0"></const>
    <const id="fmOpenReadWrite" decl="2"></const>
    <const id="fmOpenWrite" decl="1"></const>
    <const id="fmShareCompat" decl="0"></const>
    <const id="fmShareDenyNone" decl="64"></const>
    <const id="fmShareDenyRead" decl="48"></const>
    <const id="fmShareDenyWrite" decl="32"></const>
    <const id="fmShareExclusive" decl="16"></const>
    <const id="WM_SHOWWINDOW" decl="24"></const>
    <const id="WM_SIZE" decl="5"></const>
    <const id="WM_SIZECLIPBOARD" decl="779"></const>
    <const id="WM_SIZING" decl="532"></const>
    <const id="WM_SPOOLERSTATUS" decl="42"></const>
    <const id="WM_STYLECHANGED" decl="125"></const>
    <const id="WM_STYLECHANGING" decl="124"></const>
    <const id="WM_SYSCOLORCHANGE" decl="21"></const>
    <const id="WM_SYSCOMMAND" decl="274"></const>
    <const id="WM_SYSDEADCHAR" decl="263"></const>
    <const id="WM_SYSCHAR" decl="262"></const>
    <const id="WM_SYSKEYDOWN" decl="260"></const>
    <const id="WM_SYSKEYUP" decl="261"></const>
    <const id="WM_SYSTEMERROR" decl="23"></const>
    <const id="WM_TABLET_FIRST" decl="704"></const>
    <const id="WM_TABLET_LAST" decl="735"></const>
    <const id="WM_TCARD" decl="82"></const>
    <const id="WM_THEMECHANGED" decl="794"></const>
    <const id="WM_TIMECHANGE" decl="30"></const>
    <const id="WM_TIMER" decl="275"></const>
    <const id="WM_UNDO" decl="772"></const>
    <const id="wsMaximized" decl="TWindowState(2)"></const>
    <const id="wsMinimized" decl="TWindowState(1)"></const>
    <const id="wsNormal" decl="TWindowState(0)"></const>
  </consts>
  <types>
    <type id="AnsiChar"></type>
    <type id="AnsiString"></type>
    <type id="AnyString" decl="AnsiString"></type>
    <type id="BOOL" ancestor="LongBool"></type>
    <type id="Boolean" decl="(False, True)"></type>
    <type id="Byte"></type>
    <type id="ByteBool"></type>
    <type id="Cardinal" ancestor="LongWord"></type>
    <type id="COLORREF" ancestor="LongWord"></type>
    <type id="Currency"></type>
    <type id="Double"></type>
    <type id="DWORD" ancestor="LongWord"></type>
    <type id="Extended"></type>
    <type id="FILETIME" decl="record">
      <field id="dwHighDateTime" decl="LongWord" />
      <field id="dwLowDateTime" decl="LongWord" />
    </type>
    <type id="HACCEL" ancestor="LongWord"></type>
    <type id="HBITMAP" ancestor="LongInt"></type>
    <type id="HCURSOR" ancestor="LongWord"></type>
    <type id="HDC" ancestor="LongWord"></type>
    <type id="TComboBoxStyle" decl="(csDropDown, csSimple, csDropDownList, csOwnerDrawFixed, csOwnerDrawVariable)"></type>
    <type id="TComponentState" decl="set of TComponentStateE"></type>
    <type id="TComponentStateE" decl="(csLoading, csReading, csWriting, csDestroying, csDesigning, csAncestor, csUpdating, csFixups, csFreeNotification, csInline, csDesignInstance)"></type>
    <type id="TConsistentAttribute" decl="(caBold, caColor, caFace, caItalic, caSize, caStrikeOut, caUnderline, caProtected)"></type>
    <type id="TConsistentAttributes" decl="set of TConsistentAttribute"></type>
    <type id="TConstrainedResizeEvent" decl="procedure(Sender: TObject; var MinWidth: LongInt; var MINHEIGHT: LongInt; var MAXWIDTH: LongInt; var MAXHEIGHT: LongInt)"></type>
    <type id="TConstraintSize" ancestor="LongInt"></type>
    <type id="TContextPopupEvent" decl="procedure(Sender: TObject; MousePos: TPoint; var Handled: Boolean)"></type>
    <type id="TControlState" decl="set of TControlStateE"></type>
    <type id="TControlStateE" decl="(csLButtonDown, csClicked, csPalette, csReadingState, csAlignmentNeeded, csFocusing, csCreating, csPaintCopy, csCustomPaint, csDestroyingHandle, csDocking)"></type>
    <type id="TControlStyle" decl="set of TControlStyleE"></type>
    <type id="TControlStyleE" decl="(csAcceptsControls, csCaptureMouse, csDesignInteractive, csClickEvents, csFramed, csSetCaption, csOpaque, csDoubleClicks, csFixedWidth, csFixedHeight, csNoDesignVisible, csReplicatable, csNoStdEvents, csDisplayDragImage, csReflector, csActionClient, csMenuEvents)"></type>
    <type id="TCursor" ancestor="ShortInt"></type>
    <type id="UnicodeString"></type>
    <type id="UTF8String" ancestor="String"></type>
    <type id="Variant" decl="Variant"></type>
    <type id="WideChar"></type>
    <type id="WideString"></type>
    <type id="Word"></type>
    <type id="WordBool"></type>
  </types>
  <variables>
    <var id="ExitCode" decl="LongInt"></var>
    <var id="IsCalled" decl="Boolean"></var>
    <var id="optDateFormat" decl="String"></var>
    <var id="optDateTimeFormat" decl="String"></var>
    <var id="optFloatFormat" decl="String"></var>
    <var id="optTimeFormat" decl="String"></var>
    <var id="ScriptResult" decl="LongInt"></var>
    <var id="StdOut" decl="String"></var>
  </variables>
  <objvariables>
    <var id="Application" decl="TApplication"></var>
    <var id="MainForm" decl="TForm"></var>
    <var id="Screen" decl="TScreen"></var>
    <var id="ScriptVars" decl="TStringList"></var>
    <var id="Self" decl="TForm"></var>
  </objvariables>
  <procedures>
    <procedure id="Cls"></procedure>
    <procedure id="CopyFiles" decl="(SourceDir: String; Mask: String; DestDir: String; Overwrite: Boolean)"></procedure>
    <procedure id="CreateRegKey" decl="(Key: String; ValueName: String; Value: String)"></procedure>
    <procedure id="Dec" decl="(var x)"></procedure>
    <procedure id="DecodeDate" decl="(DateTime: Double; var Year: Word; var Month: Word; var Day: Word)"></procedure>
    <procedure id="DecodeFile" decl="(InFile: AnsiString; OutFile: AnsiString; Password: AnsiString; cMethod: AnsiString)"></procedure>
    <procedure id="DecodeTime" decl="(DateTime: Double; var Hour: Word; var Min: Word; var Sec: Word; var MSec: Word)"></procedure>
    <procedure id="Delete" decl="(var s: AnyString; ifrom: LongInt; icount: LongInt)"></procedure>
    <procedure id="DeleteRegKey" decl="(Key: String)"></procedure>
    <procedure id="DrawMenuItem" decl="(MenuItem: TMenuItem; ACanvas: TCanvas; ARect: TRect; State: TOwnerDrawState)"></procedure>
    <procedure id="EncodeFile" decl="(InFile: AnsiString; OutFile: AnsiString; Password: AnsiString; cMethod: AnsiString)"></procedure>
    <procedure id="FreeMem" decl="(var P: Pointer)"></procedure>
    <procedure id="GetAllFileTimes" decl="(FileName: String; var CreationTime: Double; var LastAccessTime: Double; var LastWriteTime: Double)"></procedure>
    <procedure id="GetCursorValues" decl="(Proc: TGetStrProc)"></procedure>
    <procedure id="GetFilesByMask" decl="(Dir: String; R: TStrings; Mask: String)"></procedure>
    <procedure id="GetMem" decl="(var P: Pointer; Size: LongInt)"></procedure>
    <procedure id="GetRegistrySubKeys" decl="(Root: LongWord; Key: String; List: TStrings)"></procedure>
    <procedure id="GetRegistryValueNames" decl="(Root: LongWord; Key: String; List: TStrings)"></procedure>
    <procedure id="Inc" decl="(var x)"></procedure>
    <procedure id="Insert" decl="(s: AnyString; var s2: AnyString; iPos: LongInt)"></procedure>
    <procedure id="LocalizeButtonCaption" decl="(MsgDlgBtn: TMsgDlgBtn; Caption: String)"></procedure>
    <procedure id="LocalizeMsgDlgCaption" decl="(MsgDlgType: TMsgDlgType; Caption: String)"></procedure>
    <procedure id="MoveWindowOrg" decl="(DC: LongWord; DX: LongInt; DY: LongInt)"></procedure>
    <procedure id="OleError" decl="(ErrorCode: LongInt)"></procedure>
    <procedure id="OleCheck" decl="(Result: LongInt)"></procedure>
    <procedure id="RaiseException" decl="(Ex: TIFException; Param: String)"></procedure>
    <procedure id="WStrSet" decl="(c: AnyString; I: LongInt; var s: AnyString)"></procedure>
  </procedures>
  <functions>
    <function id="Abs" decl="(e: Extended): Extended"></function>
    <function id="ActionEnabled" decl="(Sender: TObject): Boolean"></function>
    <function id="ActionExecute" decl="(Sender: TObject): Boolean"></function>
    <function id="ActionUpdate" decl="(Sender: TObject): Boolean"></function>
    <function id="AnsiCompareStr" decl="(S1: String; S2: String): LongInt"></function>
    <function id="AnsiCompareText" decl="(S1: String; S2: String): LongInt"></function>
    <function id="AnsiDequotedStr" decl="(S: String; AQuote: Char): String"></function>
    <function id="AnsiLowercase" decl="(s: String): String"></function>
    <function id="AnsiQuotedStr" decl="(S: String; Quote: Char): String"></function>
    <function id="AnsiQuotedStrCheck" decl="(S: String; Quote: Char): String"></function>
    <function id="AnsiSameStr" decl="(S1: String; S2: String): Boolean"></function>
    <function id="AnsiSameText" decl="(S1: String; S2: String): Boolean"></function>
    <function id="AnsiToOem" decl="(S: String): String"></function>
    <function id="AnsiToUtf8" decl="(S: String): String"></function>
    <function id="AnsiUppercase" decl="(s: String): String"></function>
    <function id="Bounds" decl="(ALeft: LongInt; ATop: LongInt; AWidth: LongInt; AHeight: LongInt): TRect"></function>
    <function id="BrowseForFolder" decl="(Title: String; InitialDirectory: String; var SelectedDirectory: String; Position: TPoint): Boolean"></function>
    <function id="Call" decl="(ScriptFileName: String; cParams: String): LongInt"></function>
    <function id="CallEx" decl="(ScriptFileName: String; cParams: String; var cStdOut: String): LongInt"></function>
    <function id="DeleteFile" decl="(FileName: String): Boolean"></function>
    <function id="DeleteFilesByMask" decl="(Path: String; Mask: String): Boolean"></function>
    <function id="DeleteRegistryValue" decl="(Root: LongWord; Key: String; Attribute: String): Boolean"></function>
    <function id="DeleteTree" decl="(ADir: String): Boolean"></function>
    <function id="DirectoryExists" decl="(Directory: String): Boolean"></function>
    <function id="DLLGetLastError" decl=": LongInt"></function>
    <function id="EncodeDate" decl="(Year: Word; Month: Word; Day: Word): Double"></function>
    <function id="EncodeText" decl="(Text: AnsiString; Password: AnsiString; cMethod: AnsiString): AnsiString"></function>
    <function id="EncodeTime" decl="(Hour: Word; Min: Word; Sec: Word; MSec: Word): Double"></function>
    <function id="ExceptionParam" decl=": String"></function>
    <function id="ExceptionPos" decl=": LongWord"></function>
    <function id="ExceptionProc" decl=": LongWord"></function>
    <function id="ExceptionToString" decl="(er: TIFException; Param: String): String"></function>
    <function id="ExceptionType" decl=": TIFException"></function>
    <function id="ExcludeTrailingPathDelimiter" decl="(S: String): String"></function>
    <function id="ExpandEnvVar" decl="(Value: String): String"></function>
    <function id="ExpandEnvVar2" decl="(var Value: String): Boolean"></function>
    <function id="ExpandFileName" decl="(FileName: String): String"></function>
    <function id="LastDelimiter" decl="(Delimiters: String; S: String): LongInt"></function>
    <function id="Length" decl="(s): LongInt"></function>
    <function id="LoadAnsiStrFromFile" decl="(var AString: AnsiString; FileName: String): Boolean"></function>
    <function id="LoadDFMForm" decl="(AOwner: TComponent; FileName: String): TForm"></function>
    <function id="LoadStrFromFile" decl="(var AString: String; FileName: String): Boolean"></function>
    <function id="Low" decl="(x): Int64"></function>
    <function id="Lowercase" decl="(s: AnyString): AnyString"></function>
    <function id="Time" decl=": Double"></function>
    <function id="Trim" decl="(s: AnyString): AnyString"></function>
    <function id="TrimLeft" decl="(S: String): String"></function>
    <function id="TrimRight" decl="(S: String): String"></function>
    <function id="Trunc" decl="(e: Extended): LongInt"></function>
    <function id="TryEncodeDate" decl="(Year: Word; Month: Word; Day: Word; var Date: Double): Boolean"></function>
    <function id="TryEncodeTime" decl="(Hour: Word; Min: Word; Sec: Word; MSec: Word; var Time: Double): Boolean"></function>
    <function id="Unassigned" decl=": Variant"></function>
    <function id="UnixToDateTime" decl="(U: Int64): Double"></function>
    <function id="UpCase" decl="(Ch: Char): Char"></function>
    <function id="Uppercase" decl="(s: AnyString): AnyString"></function>
    <function id="UTF8Decode" decl="(S: String): WideString"></function>
    <function id="UTF8Encode" decl="(WS: WideString): String"></function>
  </functions>
  <classes>
    <class id="EMenuError" decl="class"></class>
    <class id="TAction" ancestor="TCustomAction">
      <property id="AutoCheck" decl=": Boolean" />
      <property id="GroupIndex" decl=": LongInt" />
      <property id="HelpKeyword" decl=": String" />
    </class>
    <class id="TActionList" ancestor="TCustomActionList">
      <property id="OnExecute" decl=": TActionEvent" />
      <property id="OnChange" decl=": TNotifyEvent" />
      <property id="OnStateChange" decl=": TNotifyEvent" />
      <property id="OnUpdate" decl=": TActionEvent" />
    </class>
    <class id="TApplication" ancestor="TComponent">
      <property id="Active" decl=": Boolean" />
      <procedure id="BringToFront" />
      <procedure id="CancelHint" />
      <procedure id="ControlDestroyed" decl="(Control: TControl)" />
      <procedure id="CreateHandle" />
      <property id="DialogHandle" decl=": LongInt" />
      <property id="ExeName" decl=": NativeString" />
      <property id="Handle" decl=": LongInt" />
      <procedure id="HandleException" decl="(Sender: TObject)" />
      <procedure id="HandleMessage" />
      <function id="HelpCommand" decl="(Command: LongInt; Data: LongInt): Boolean" />
      <function id="HelpContext" decl="(Context: LongInt): Boolean" />
      <property id="HelpFile" decl=": NativeString" />
      <function id="HelpJump" decl="(JumpID: NativeString): Boolean" />
      <procedure id="HideHint" />
      <property id="Hint" decl=": NativeString" />
      <property id="HintColor" decl=": LongInt" />
      <property id="HintHidePause" decl=": LongInt" />
      <property id="HintPause" decl=": LongInt" />
      <property id="HintShortPause" decl=": LongInt" />
      <procedure id="Initialize" />
      <property id="MainForm" decl=": TForm" />
      <function id="MessageBox" decl="(Text: String; Caption: String; Flags: LongInt): LongInt" />
      <procedure id="Minimize" />
      <procedure id="NormalizeTopmosts" />
      <property id="OnActivate" decl=": TNotifyEvent" />
      <property id="OnDeactivate" decl=": TNotifyEvent" />
      <property id="OnHelp" decl=": THelpEvent" />
      <property id="OnHint" decl=": TNotifyEvent" />
      <property id="OnIdle" decl=": TIdleEvent" />
      <property id="OnMinimize" decl=": TNotifyEvent" />
      <property id="OnRestore" decl=": TNotifyEvent" />
      <procedure id="ProcessMessages" />
      <procedure id="Restore" />
      <procedure id="RestoreTopmosts" />
      <procedure id="Run" />
      <property id="ShowHint" decl=": Boolean" />
      <property id="ShowMainForm" decl=": Boolean" />
      <procedure id="Terminate" />
      <property id="Terminated" decl=": Boolean" />
      <property id="Title" decl=": NativeString" />
      <property id="UpdateFormatSettings" decl=": Boolean" />
    </class>
    <class id="TBasicAction" ancestor="TComponent">
      <function id="Execute" decl=": Boolean" />
      <procedure id="ExecuteTarget" decl="(Target: TObject)" />
      <function id="HandlesTarget" decl="(Target: TObject): Boolean" />
      <property id="OnExecute" decl=": TNotifyEvent" />
      <property id="OnUpdate" decl=": TNotifyEvent" />
      <procedure id="RegisterChanges" decl="(Value: TBasicActionLink)" />
      <procedure id="UnRegisterChanges" decl="(Value: TBasicActionLink)" />
      <function id="Update" decl=": Boolean" />
      <procedure id="UpdateTarget" decl="(Target: TObject)" />
    </class>
    <class id="TBasicActionLink" ancestor="TObject">
      <property id="Action" decl=": TBasicAction" />
      <constructor id="Create" decl="(AClient: TObject): TBasicActionLink" />
      <function id="Execute" decl=": Boolean" />
      <property id="OnChange" decl=": TNotifyEvent" />
      <function id="Update" decl=": Boolean" />
    </class>
    <class id="TBevel" ancestor="TGraphicControl">
      <property id="ParentShowhint" decl=": Boolean" />
      <property id="Shape" decl=": TBevelShape" />
      <property id="Style" decl=": TBevelStyle" />
    </class>
    <class id="TBitBtn" ancestor="TButton">
      <property id="Glyph" decl=": TBitmap" />
      <property id="Kind" decl=": TBitBtnKind" />
      <property id="Layout" decl=": TButtonLayout" />
      <property id="Margin" decl=": LongInt" />
      <property id="NumGlyphs" decl=": Byte" />
      <property id="Spacing" decl=": LongInt" />
      <property id="Style" decl=": TButtonStyle" />
    </class>
    <class id="TBitmap" ancestor="TGraphic">
      <property id="Canvas" decl=": TCanvas" />
      <procedure id="Dormant" />
      <procedure id="FreeImage" />
      <property id="Handle" decl=": LongInt" />
      <property id="IgnorePalette" decl=": Boolean" />
      <procedure id="LoadFromClipboardFormat" decl="(AFormat: Word; AData: LongWord; APalette: LongInt)" />
      <procedure id="LoadFromResourceID" decl="(Instance: LongWord; ResID: LongInt)" />
      <procedure id="LoadFromResourceName" decl="(Instance: LongWord; ResName: String)" />
      <procedure id="LoadFromStream" decl="(Stream: TStream)" />
      <property id="Monochrome" decl=": Boolean" />
      <property id="Palette" decl=": LongInt" />
      <function id="ReleaseHandle" decl=": LongInt" />
      <function id="ReleasePalette" decl=": LongInt" />
      <procedure id="SaveToClipboardFormat" decl="(var Format: Word; var Data: LongWord; var APalette: LongInt)" />
      <procedure id="SaveToStream" decl="(Stream: TStream)" />
      <property id="TransparentColor" decl=": LongInt" />
    </class>
    <class id="TBits" ancestor="TObject">
      <property id="Bits" decl="[Index: LongInt]: Boolean" />
      <function id="OpenBit" decl=": LongInt" />
      <property id="Size" decl=": LongInt" />
    </class>
    <class id="TBrush" ancestor="TGraphicsObject">
      <property id="Color" decl=": LongInt" />
      <constructor id="Create" decl=": TBrush" />
      <property id="Style" decl=": TBrushStyle" />
    </class>
    <class id="TButton" ancestor="TButtonControl">
      <property id="Cancel" decl=": Boolean" />
      <property id="Caption" decl=": String" />
      <property id="Default" decl=": Boolean" />
      <property id="DragCursor" decl=": LongInt" />
      <property id="DragMode" decl=": TDragMode" />
      <property id="Font" decl=": TFont" />
      <property id="ModalResult" decl=": LongInt" />
      <property id="OnClick" decl=": TNotifyEvent" />
      <property id="OnDragDrop" decl=": TDragDropEvent" />
      <property id="OnDragOver" decl=": TDragOverEvent" />
      <property id="OnEndDrag" decl=": TEndDragEvent" />
      <property id="OnEnter" decl=": TNotifyEvent" />
      <property id="OnExit" decl=": TNotifyEvent" />
      <property id="OnKeyDown" decl=": TKeyEvent" />
      <property id="OnKeyPress" decl=": TKeyPressEvent" />
      <property id="OnKeyUp" decl=": TKeyEvent" />
      <property id="OnMouseDown" decl=": TMouseEvent" />
      <property id="OnMouseMove" decl=": TMouseMoveEvent" />
      <property id="OnMouseUp" decl=": TMouseEvent" />
      <property id="ParentFont" decl=": Boolean" />
      <property id="ParentShowhint" decl=": Boolean" />
    </class>
    <class id="TCanvas" ancestor="TPersistent">
      <procedure id="Arc" decl="(X1: LongInt; Y1: LongInt; X2: LongInt; Y2: LongInt; X3: LongInt; Y3: LongInt; X4: LongInt; Y4: LongInt)" />
      <property id="Brush" decl=": TBrush" />
      <property id="CopyMode" decl=": Byte" />
      <procedure id="Draw" decl="(X: LongInt; Y: LongInt; Graphic: TGraphic)" />
      <procedure id="Ellipse" decl="(X1: LongInt; Y1: LongInt; X2: LongInt; Y2: LongInt)" />
      <procedure id="FillRect" decl="(Rect: TRect)" />
      <procedure id="FloodFill" decl="(X: LongInt; Y: LongInt; Color: LongInt; FillStyle: Byte)" />
      <property id="Font" decl=": TFont" />
      <property id="Handle" decl=": LongInt" />
      <procedure id="Chord" decl="(X1: LongInt; Y1: LongInt; X2: LongInt; Y2: LongInt; X3: LongInt; Y3: LongInt; X4: LongInt; Y4: LongInt)" />
      <procedure id="LineTo" decl="(X: LongInt; Y: LongInt)" />
      <procedure id="MoveTo" decl="(X: LongInt; Y: LongInt)" />
      <property id="Pen" decl=": TPen" />
      <procedure id="Pie" decl="(X1: LongInt; Y1: LongInt; X2: LongInt; Y2: LongInt; X3: LongInt; Y3: LongInt; X4: LongInt; Y4: LongInt)" />
      <property id="Pixels" decl="[Index: LongInt; param2: LongInt]: LongInt" />
      <procedure id="Rectangle" decl="(X1: LongInt; Y1: LongInt; X2: LongInt; Y2: LongInt)" />
      <procedure id="Refresh" />
      <procedure id="RoundRect" decl="(X1: LongInt; Y1: LongInt; X2: LongInt; Y2: LongInt; X3: LongInt; Y3: LongInt)" />
      <function id="TextHeight" decl="(Text: String): LongInt" />
      <procedure id="TextOut" decl="(X: LongInt; Y: LongInt; Text: String)" />
      <function id="TextWidth" decl="(Text: String): LongInt" />
    </class>
    <class id="THeaderSections" ancestor="TCollection">
      <function id="Add" decl=": THeaderSection" />
      <constructor id="Create" decl="(HeaderControl: THeaderControl): THeaderSections" />
      <property id="Items" decl="[Index: LongInt]: THeaderSection" />
    </class>
    <class id="TPageControl" ancestor="TCustomTabControl">
      <property id="ActivePage" decl=": TTabSheet" />
      <property id="ActivePageIndex" decl=": LongInt" />
      <property id="DockSite" decl=": Boolean" />
      <property id="DragCursor" decl=": ShortInt" />
      <property id="DragKind" decl=": TDragKind" />
      <property id="DragMode" decl=": TDragMode" />
      <function id="FindNextPage" decl="(CurPage: TTabSheet; GoForward: Boolean; CheckTabVisible: Boolean): TTabSheet" />
      <property id="Font" decl=": TFont" />
      <property id="HotTrack" decl=": Boolean" />
      <property id="Images" decl=": TCustomImageList" />
      <property id="MultiLine" decl=": Boolean" />
      <property id="OnContextPopup" decl=": TContextPopupEvent" />
      <property id="OnDragDrop" decl=": TDragDropEvent" />
      <property id="OnDragOver" decl=": TDragOverEvent" />
      <property id="OnDrawTab" decl=": TDrawTabEvent" />
      <property id="OnEndDock" decl=": TEndDragEvent" />
      <property id="OnEndDrag" decl=": TEndDragEvent" />
      <property id="OnEnter" decl=": TNotifyEvent" />
      <property id="OnExit" decl=": TNotifyEvent" />
      <property id="OnGetImageIndex" decl=": TTabGetImageEvent" />
      <property id="OnChange" decl=": TNotifyEvent" />
      <property id="OnChanging" decl=": TTabChangingEvent" />
      <property id="OnMouseDown" decl=": TMouseEvent" />
      <property id="OnMouseEnter" decl=": TNotifyEvent" />
      <property id="OnMouseLeave" decl=": TNotifyEvent" />
      <property id="OnMouseMove" decl=": TMouseMoveEvent" />
      <property id="OnMouseUp" decl=": TMouseEvent" />
      <property id="OnResize" decl=": TNotifyEvent" />
      <property id="OwnerDraw" decl=": Boolean" />
      <property id="PageCount" decl=": LongInt" />
      <property id="Pages" decl="[Index: LongInt]: TTabSheet" />
      <property id="ParentBiDiMode" decl=": Boolean" />
      <property id="ParentDoubleBuffered" decl=": Boolean" />
      <property id="ParentFont" decl=": Boolean" />
      <property id="ParentShowHint" decl=": Boolean" />
      <property id="PopupMenu" decl=": TPopupMenu" />
      <property id="RaggedRight" decl=": Boolean" />
      <property id="ScrollOpposite" decl=": Boolean" />
      <procedure id="SelectNextPage" decl="(GoForward: Boolean)" />
      <property id="Style" decl=": TTabStyle" />
      <property id="TabHeight" decl=": SmallInt" />
      <property id="TabIndex" decl=": LongInt" />
      <property id="TabPosition" decl=": TTabPosition" />
      <property id="TabWidth" decl=": SmallInt" />
    </class>
  </classes>
  <attributes />
</ps-syntax-doc>
