Module SigCjW_DockingPane.pkg

     1//==============================================================================
     2// Project      : SigCj - VDF Classes for Codejock
     3// File         : SigCjW_DockingPane.pkg
     4// Description  : VDF Class for Codejock control
     5//
     6// Created by   : Ian Smith
     7// Revision     : $Rev: $
     8//                $Date: $
     9//                $Author: $
    10//
    11// Requirements : Visual DataFlex 14.1
    12//                Codejock SuitePro - Version 13.4.2
    13//
    14// Copyright    : (c) 2009 VDF SIG UK
    15//                Visual DataFlex Special Interest Group UK.
    16//                http://www.vdfsig.co.uk/
    17//                dev@vdfsig.co.uk
    18//
    19//                This file is part of SigCj.
    20//
    21//                SigCj is free software: you can redistribute it and/or modify
    22//                it under the terms of the GNU Lesser General Public License
    23//                as published by the Free Software Foundation, either version
    24//                2.1 of the License, or (at your option) any later version.
    25//
    26//                SigCj is distributed in the hope that it will be useful, but
    27//                WITHOUT ANY WARRANTY; without even the implied warranty of
    28//                MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    29//                GNU Lesser General Public License for more details.
    30//
    31//                If you have the complete SigCj workspace then a copy of the
    32//                GNU Lesser General Public License is in the Docs folder. If
    33//                not, see <http://www.gnu.org/licenses/>.
    34//
    35//==============================================================================
    36
    37Use FlexCom20.pkg
    38Use SigCjLicense_v13.4.2.pkg
    39Use SigCjC_ColorManager.pkg
    40Use SigCjC_ImageManager.pkg
    41Use SigCjC_PropExchange.pkg
    42Use SigCjC_TabManager.pkg
    43Use SigCjC_ToolTipContext.pkg
    44
    45// Visual Theme  Constants
    46Define OLEVisualTheme for Integer
    47    // ThemeDefault
    48    Define OLEThemeDefault for 0
    49    // ThemeOffice
    50    Define OLEThemeOffice for 1
    51    // ThemeOffice2003
    52    Define OLEThemeOffice2003 for 2
    53    // ThemeNativeWinXP
    54    Define OLEThemeNativeWinXP for 3
    55    // ThemeGrippered
    56    Define OLEThemeGrippered for 4
    57    // ThemeVisio
    58    Define OLEThemeVisio for 5
    59    // ThemeWhidbey
    60    Define OLEThemeWhidbey for 6
    61    // ThemeShortcutBar2003
    62    Define OLEThemeShortcutBar2003 for 7
    63    // ThemeExplorer
    64    Define OLEThemeExplorer for 8
    65    // ThemeVisualStudio2005
    66    Define OLEThemeVisualStudio2005 for 9
    67    // ThemeOffice2007
    68    Define OLEThemeOffice2007 for 10
    69    // ThemeWord2007
    70    Define OLEThemeWord2007 for 11
    71    // ThemeWOutlook2007
    72    Define OLEThemeOutlook2007 for 12
    73
    74// Visual Theme  Constants
    75Define OLEDockingDirection for Integer
    76    // To dock Pane left of another one
    77    Define OLEDockLeftOf for 0
    78    // To dock Pane right of another one
    79    Define OLEDockRightOf for 1
    80    // To dock Pane top of another one
    81    Define OLEDockTopOf for 2
    82    // To dock Pane bottom of another one
    83    Define OLEDockBottomOf for 3
    84
    85// Pane Options
    86Define OLEPaneOptions for Integer
    87    // The Pane can not be closed
    88    Define OLEPaneNoCloseable for 1
    89    // The Pane can not be hidden
    90    Define OLEPaneNoHideable for 2
    91    // The Pane can not be floated
    92    Define OLEPaneNoFloatable for 4
    93    // The Pane hasn't caption
    94    Define OLEPaneNoCaption for 8
    95    // The Pane has menu button in caption
    96    Define OLEPaneHasMenuButton for 16
    97    // The Pane can't be docked
    98    Define OLEPaneNoDockable for 32
    99
   100// Sticker Styles
   101Define OLEDockingContextStickerStyle for Integer
   102    Define OLEStickerStyleWhidbey for 0
   103    Define OLEStickerStyleVisualStudio2005 for 1
   104
   105// Splitter Style
   106Define OLEDockingPaneSplitterStyle for Integer
   107    Define OLEPaneSplitterFlat for 0
   108    Define OLEPaneSplitter3D for 1
   109    Define OLEPaneSplitterSoft3D for 2
   110    Define OLEPaneSplitterGradient for 4
   111    Define OLEPaneSplitterGripperOfficeXP for 256
   112    Define OLEPaneSplitterGripperOffice2003 for 512
   113
   114// Caption Button Style
   115Define OLEDockingPaneCaptionButtonStyle for Integer
   116    Define OLEPaneCaptionButtonDefault for 0
   117    Define OLEPaneCaptionButtonOffice for 1
   118    Define OLEPaneCaptionButtonOffice2003 for 2
   119    Define OLEPaneCaptionButtonThemedExplorerBar for 3
   120    Define OLEPaneCaptionButtonThemedButton for 4
   121    Define OLEPaneCaptionButtonThemedToolBar for 5
   122    Define OLEPaneCaptionButtonThemedToolWindow for 6
   123
   124// Tab Button Flags
   125Define OLEDockingPaneTabButtonFlags for Integer
   126    Define OLEPaneTabButtonNone for 0
   127    Define OLEPaneTabButtonSelected for 1
   128    Define OLEPaneTabButtonAlways for 2
   129
   130// Caption Direction
   131Define OLEDockingPaneCaptionDirection for Integer
   132    Define OLEPaneCaptionHorizontal for 0
   133    Define OLEPaneCaptionVertical for 1
   134    Define OLEPaneCaptionAutoByPosition for 2
   135    Define OLEPaneCaptionAutoBySize for 3
   136
   137// Enable options
   138Define OLEDockingPaneEnableOptions for Integer
   139    Define OLEPaneDisabled for 0
   140    Define OLEPaneEnableClient for 1
   141    Define OLEPaneEnableActions for 2
   142    Define OLEPaneEnabled for 3
   143
   144// Keyboard Navigate options
   145Define OLEDockingPaneKeyboardNavigate for Integer
   146    Define OLEPaneKeyboardUnused for 0
   147    Define OLEPaneKeyboardUseAltMinus for 1
   148    Define OLEPaneKeyboardUseAltF6 for 2
   149    Define OLEPaneKeyboardUseAltF7 for 4
   150    Define OLEPaneKeyboardUseCtrlTab for 8
   151    Define OLEPaneKeyboardUseAll for 15
   152
   153// Docking pane type
   154Define OLEDockingPaneType for Integer
   155    Define OLEPaneTypeDockingPane for 0
   156    Define OLEPaneTypeTabbedContainer for 1
   157    Define OLEPaneTypeSplitterContainer for 2
   158    Define OLEPaneTypeMiniWnd for 3
   159    Define OLEPaneTypeClient for 4
   160    Define OLEPaneTypeAutoHidePanel for 5
   161    Define OLEPaneTypeSidePanel for 6
   162
   163// Pane Actions
   164Define OLEDockingPaneAction for Integer
   165    // Docking pane is currently floating.  This occurs when the user clicks on the title bar of a docking pane and drags the pane to another location.  When this occurs, the pane is said to be 'floating.'
   166    Define OLEPaneActionFloating for 0
   167    // Docking pane has been docked, and is currently floating.
   168    Define OLEPaneActionFloated for 1
   169    // Docking pane is currently closing.  This occurs when the close button of the pane is clicked.
   170    Define OLEPaneActionClosing for 2
   171    // Docking pane has been closed.  This occurs when the docking pane has finished closing.
   172    Define OLEPaneActionClosed for 3
   173    // Docking pane is in the process of docking.
   174    Define OLEPaneActionDocking for 4
   175    // Docking pane has been docked.  This occurs when the docking pane has finished docking. 
   176    Define OLEPaneActionDocked for 5
   177    // Docking pane is in the process of attaching to another pane.
   178    Define OLEPaneActionAttaching for 6
   179    // Docking pane has been attached.  This occurs when the docking pane has finished attaching to another pane.
   180    Define OLEPaneActionAttached for 7
   181    // Docking pane is currently pinning (hiding).  This occurs when the 'pin' button is clicked.
   182    Define OLEPaneActionPinning for 8
   183    // Docking pane has been pinned.  This occurs when the docking pane has finished pinning.
   184    Define OLEPaneActionPinned for 9
   185    // Docking pane is currently collapsing 'hiding'. 
   186    Define OLEPaneActionCollapsing for 10
   187    // Docking Pane has been collapsed.   This occurs when the docking pane has finished collapsing.
   188    Define OLEPaneActionCollapsed for 11
   189    // Docking pane is currently expanding. 
   190    Define OLEPaneActionExpanding for 12
   191    // Docking pane is expanded, this is when the pane is fully shown from the autohide position.
   192    Define OLEPaneActionExpanded for 13
   193    // Docking pane become active.
   194    Define OLEPaneActionActivated for 14
   195    // Docking pane deactivated.
   196    Define OLEPaneActionDeactivated for 15
   197    // Docking pane detaching.
   198    Define OLEPaneActionDetaching for 16
   199    // Docking pane dragging.
   200    Define OLEPaneActionDragging for 17
   201    // Docking pane unpinning.
   202    Define OLEPaneActionUnpinning for 18
   203    // Docking pane unpinned.
   204    Define OLEPaneActionUnpinned for 19
   205    // Docking pane resizing.
   206    Define OLEPaneActionSplitterResizing for 20
   207    // Docking pane resized.
   208    Define OLEPaneActionSplitterResized for 21
   209
   210// Scale Mode
   211Define OLEXTPScaleMode for Integer
   212    // Used to change the Docking Pane's measurement units/coordinate system to auto.
   213    Define OLExtpScaleAuto for 0
   214    // Used to change the Docking Pane's measurement units/coordinate system to pixels.
   215    Define OLExtpScalePixel for 1
   216    // Used to change the Docking Pane's measurement units/coordinate system to twips.
   217    Define OLExtpScaleTwip for 2
   218
   219Class cSigCjComIDockingPaneLayout is a Mixin
   220
   221    Procedure ComDoPropExchange Variant llpPX
   222        Handle hDispatchDriver
   223        Get phDispatchDriver to hDispatchDriver
   224        Send PrepareParams to hDispatchDriver 1
   225        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llpPX
   226        Send InvokeComMethod to hDispatchDriver 1 OLE_VT_VOID
   227    End_Procedure
   228
   229    { MethodType=Property DesignTime=False }
   230    Function ComPanesCount Returns Integer
   231        Handle hDispatchDriver
   232        Integer retVal
   233        Get phDispatchDriver to hDispatchDriver
   234        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_I4 to retVal
   235        Function_Return retVal
   236    End_Function
   237
   238    { MethodType=Property DesignTime=False }
   239    Function ComPane Integer llIndex Returns Variant
   240        Handle hDispatchDriver
   241        Variant retVal
   242        Get phDispatchDriver to hDispatchDriver
   243        Send PrepareParams to hDispatchDriver 1
   244        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
   245        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
   246        Function_Return retVal
   247    End_Function
   248
   249    { MethodType=Property DesignTime=False }
   250    Function Com_NewEnum Returns Variant
   251        Handle hDispatchDriver
   252        Variant retVal
   253        Get phDispatchDriver to hDispatchDriver
   254        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
   255        Function_Return retVal
   256    End_Function
   257
   258    { MethodType=Property DesignTime=False }
   259    Function ComContainersCount Returns Integer
   260        Handle hDispatchDriver
   261        Integer retVal
   262        Get phDispatchDriver to hDispatchDriver
   263        Get InvokeComMethod of hDispatchDriver 3 OLE_VT_I4 to retVal
   264        Function_Return retVal
   265    End_Function
   266
   267    { MethodType=Property DesignTime=False }
   268    Function ComContainer Integer llIndex Returns Variant
   269        Handle hDispatchDriver
   270        Variant retVal
   271        Get phDispatchDriver to hDispatchDriver
   272        Send PrepareParams to hDispatchDriver 1
   273        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
   274        Get InvokeComMethod of hDispatchDriver 4 OLE_VT_DISPATCH to retVal
   275        Function_Return retVal
   276    End_Function
   277
   278    { MethodType=Property DesignTime=False }
   279    Function ComTopContainer Returns Variant
   280        Handle hDispatchDriver
   281        Variant retVal
   282        Get phDispatchDriver to hDispatchDriver
   283        Get InvokeComMethod of hDispatchDriver 5 OLE_VT_DISPATCH to retVal
   284        Function_Return retVal
   285    End_Function
   286
   287    { MethodType=Property DesignTime=False }
   288    Function ComClientContainer Returns Variant
   289        Handle hDispatchDriver
   290        Variant retVal
   291        Get phDispatchDriver to hDispatchDriver
   292        Get InvokeComMethod of hDispatchDriver 6 OLE_VT_DISPATCH to retVal
   293        Function_Return retVal
   294    End_Function
   295End_Class
   296
   297// CoClass
   298Class cSigCjComDockingPaneLayout is a cComAutomationObject
   299    Import_Class_Protocol cSigCjComIDockingPaneLayout
   300
   301    Procedure Construct_Object
   302        Forward Send Construct_Object
   303        Set peAutoCreate to acNoAutoCreate
   304    End_Procedure
   305End_Class
   306
   307Class cSigCjComIDockingPaneTrackSize is a Mixin
   308
   309    { MethodType=Property DesignTime=False }
   310    Function ComWidth Returns Integer
   311        Integer retVal
   312        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
   313        Function_Return retVal
   314    End_Function
   315
   316    { MethodType=Property DesignTime=False }
   317    Procedure Set ComWidth Integer value
   318        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
   319    End_Procedure
   320
   321    { MethodType=Property DesignTime=False }
   322    Function ComHeight Returns Integer
   323        Integer retVal
   324        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
   325        Function_Return retVal
   326    End_Function
   327
   328    { MethodType=Property DesignTime=False }
   329    Procedure Set ComHeight Integer value
   330        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
   331    End_Procedure
   332
   333    Procedure ComSetSize Integer llWidth Integer llHeight
   334        Handle hDispatchDriver
   335        Get phDispatchDriver to hDispatchDriver
   336        Send PrepareParams to hDispatchDriver 2
   337        Send DefineParam to hDispatchDriver OLE_VT_I4 llWidth
   338        Send DefineParam to hDispatchDriver OLE_VT_I4 llHeight
   339        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
   340    End_Procedure
   341End_Class
   342
   343// CoClass
   344Class cSigCjComDockingPaneTrackSize is a cComAutomationObject
   345    Import_Class_Protocol cSigCjComIDockingPaneTrackSize
   346
   347    Procedure Construct_Object
   348        Forward Send Construct_Object
   349        Set peAutoCreate to acNoAutoCreate
   350    End_Procedure
   351End_Class
   352
   353Class cSigCjComIPaneContainer is a Mixin
   354
   355    { MethodType=Property DesignTime=False }
   356    Function Com_NewEnum Returns Variant
   357        Handle hDispatchDriver
   358        Variant retVal
   359        Get phDispatchDriver to hDispatchDriver
   360        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
   361        Function_Return retVal
   362    End_Function
   363
   364    { MethodType=Property DesignTime=False }
   365    Function ComCount Returns Integer
   366        Handle hDispatchDriver
   367        Integer retVal
   368        Get phDispatchDriver to hDispatchDriver
   369        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
   370        Function_Return retVal
   371    End_Function
   372
   373    { MethodType=Property DesignTime=False }
   374    Function ComPane Integer llIndex Returns Variant
   375        Handle hDispatchDriver
   376        Variant retVal
   377        Get phDispatchDriver to hDispatchDriver
   378        Send PrepareParams to hDispatchDriver 1
   379        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
   380        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
   381        Function_Return retVal
   382    End_Function
   383
   384    { MethodType=Property DesignTime=False }
   385    Function ComParentContainer Returns Variant
   386        Handle hDispatchDriver
   387        Variant retVal
   388        Get phDispatchDriver to hDispatchDriver
   389        Get InvokeComMethod of hDispatchDriver 20 OLE_VT_DISPATCH to retVal
   390        Function_Return retVal
   391    End_Function
   392
   393    { MethodType=Property DesignTime=False }
   394    Function ComType Returns OLEDockingPaneType
   395        Handle hDispatchDriver
   396        OLEDockingPaneType retVal
   397        Get phDispatchDriver to hDispatchDriver
   398        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
   399        Function_Return retVal
   400    End_Function
   401
   402    { MethodType=Property DesignTime=False }
   403    Function ComHWnd Returns OLE_HANDLE
   404        Handle hDispatchDriver
   405        OLE_HANDLE retVal
   406        Get phDispatchDriver to hDispatchDriver
   407        Get InvokeComMethod of hDispatchDriver -515 OLE_VT_I4 to retVal
   408        Function_Return retVal
   409    End_Function
   410
   411    { MethodType=Property DesignTime=False }
   412    Function ComIsEmpty Returns Boolean
   413        Handle hDispatchDriver
   414        Boolean retVal
   415        Get phDispatchDriver to hDispatchDriver
   416        Get InvokeComMethod of hDispatchDriver 22 OLE_VT_BOOL to retVal
   417        Function_Return retVal
   418    End_Function
   419
   420    { MethodType=Property DesignTime=False }
   421    Function ComPosition Returns OLEDockingDirection
   422        Handle hDispatchDriver
   423        OLEDockingDirection retVal
   424        Get phDispatchDriver to hDispatchDriver
   425        Get InvokeComMethod of hDispatchDriver 23 OLE_VT_I4 to retVal
   426        Function_Return retVal
   427    End_Function
   428End_Class
   429
   430// CoClass
   431Class cSigCjComPaneContainer is a cComAutomationObject
   432    Import_Class_Protocol cSigCjComIPaneContainer
   433
   434    Procedure Construct_Object
   435        Forward Send Construct_Object
   436        Set peAutoCreate to acNoAutoCreate
   437    End_Procedure
   438End_Class
   439
   440Class cSigCjComIPane is a Mixin
   441
   442    { MethodType=Property DesignTime=False }
   443    Function ComTitle Returns String
   444        String retVal
   445        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
   446        Function_Return retVal
   447    End_Function
   448
   449    { MethodType=Property DesignTime=False }
   450    Procedure Set ComTitle String value
   451        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
   452    End_Procedure
   453
   454    { MethodType=Property DesignTime=False }
   455    Function ComId Returns Integer
   456        Integer retVal
   457        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
   458        Function_Return retVal
   459    End_Function
   460
   461    { MethodType=Property DesignTime=False }
   462    Procedure Set ComId Integer value
   463        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
   464    End_Procedure
   465
   466    { MethodType=Property DesignTime=False }
   467    Function ComIconId Returns Integer
   468        Integer retVal
   469        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
   470        Function_Return retVal
   471    End_Function
   472
   473    { MethodType=Property DesignTime=False }
   474    Procedure Set ComIconId Integer value
   475        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
   476    End_Procedure
   477
   478    { MethodType=Property DesignTime=False }
   479    Function ComHandle Returns Integer
   480        Integer retVal
   481        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to retVal
   482        Function_Return retVal
   483    End_Function
   484
   485    { MethodType=Property DesignTime=False }
   486    Procedure Set ComHandle Integer value
   487        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to value
   488    End_Procedure
   489
   490    { MethodType=Property DesignTime=False }
   491    Function ComHidden Returns Boolean
   492        Boolean retVal
   493        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
   494        Function_Return retVal
   495    End_Function
   496
   497    { MethodType=Property DesignTime=False }
   498    Procedure Set ComHidden Boolean value
   499        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
   500    End_Procedure
   501
   502    { MethodType=Property DesignTime=False }
   503    Function ComClosed Returns Boolean
   504        Boolean retVal
   505        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
   506        Function_Return retVal
   507    End_Function
   508
   509    { MethodType=Property DesignTime=False }
   510    Procedure Set ComClosed Boolean value
   511        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
   512    End_Procedure
   513
   514    { MethodType=Property DesignTime=False }
   515    Function ComSelected Returns Boolean
   516        Boolean retVal
   517        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
   518        Function_Return retVal
   519    End_Function
   520
   521    { MethodType=Property DesignTime=False }
   522    Procedure Set ComSelected Boolean value
   523        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
   524    End_Procedure
   525
   526    { MethodType=Property DesignTime=False }
   527    Function ComOptions Returns OLEPaneOptions
   528        OLEPaneOptions retVal
   529        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
   530        Function_Return retVal
   531    End_Function
   532
   533    { MethodType=Property DesignTime=False }
   534    Procedure Set ComOptions OLEPaneOptions value
   535        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
   536    End_Procedure
   537
   538    { MethodType=Property DesignTime=False }
   539    Function ComFloating Returns Boolean
   540        Boolean retVal
   541        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
   542        Function_Return retVal
   543    End_Function
   544
   545    { MethodType=Property DesignTime=False }
   546    Procedure Set ComFloating Boolean value
   547        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
   548    End_Procedure
   549
   550    { MethodType=Property DesignTime=False }
   551    Function ComTag Returns Integer
   552        Integer retVal
   553        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
   554        Function_Return retVal
   555    End_Function
   556
   557    { MethodType=Property DesignTime=False }
   558    Procedure Set ComTag Integer value
   559        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
   560    End_Procedure
   561
   562    { MethodType=Property DesignTime=False }
   563    Function ComTabColor Returns OLE_COLOR
   564        OLE_COLOR retVal
   565        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
   566        Function_Return retVal
   567    End_Function
   568
   569    { MethodType=Property DesignTime=False }
   570    Procedure Set ComTabColor OLE_COLOR value
   571        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
   572    End_Procedure
   573
   574    { MethodType=Property DesignTime=False }
   575    Function ComEnabled Returns OLEDockingPaneEnableOptions
   576        OLEDockingPaneEnableOptions retVal
   577        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
   578        Function_Return retVal
   579    End_Function
   580
   581    { MethodType=Property DesignTime=False }
   582    Procedure Set ComEnabled OLEDockingPaneEnableOptions value
   583        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
   584    End_Procedure
   585
   586    { MethodType=Property DesignTime=False }
   587    Function ComTabCaption Returns String
   588        String retVal
   589        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BSTR to retVal
   590        Function_Return retVal
   591    End_Function
   592
   593    { MethodType=Property DesignTime=False }
   594    Procedure Set ComTabCaption String value
   595        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BSTR to value
   596    End_Procedure
   597
   598    { MethodType=Property DesignTime=False }
   599    Function ComTitleToolTip Returns String
   600        String retVal
   601        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_BSTR to retVal
   602        Function_Return retVal
   603    End_Function
   604
   605    { MethodType=Property DesignTime=False }
   606    Procedure Set ComTitleToolTip String value
   607        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_BSTR to value
   608    End_Procedure
   609
   610    { MethodType=Property DesignTime=False }
   611    Function ComMaximized Returns Boolean
   612        Boolean retVal
   613        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to retVal
   614        Function_Return retVal
   615    End_Function
   616
   617    { MethodType=Property DesignTime=False }
   618    Procedure Set ComMaximized Boolean value
   619        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to value
   620    End_Procedure
   621
   622    Procedure ComHide
   623        Handle hDispatchDriver
   624        Get phDispatchDriver to hDispatchDriver
   625        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
   626    End_Procedure
   627
   628    Procedure ComClose
   629        Handle hDispatchDriver
   630        Get phDispatchDriver to hDispatchDriver
   631        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
   632    End_Procedure
   633
   634    Procedure ComSelect
   635        Handle hDispatchDriver
   636        Get phDispatchDriver to hDispatchDriver
   637        Send InvokeComMethod to hDispatchDriver 12 OLE_VT_VOID
   638    End_Procedure
   639
   640    Procedure ComAttachTo Variant llNeighbour
   641        Handle hDispatchDriver
   642        Get phDispatchDriver to hDispatchDriver
   643        Send PrepareParams to hDispatchDriver 1
   644        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llNeighbour
   645        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
   646    End_Procedure
   647
   648    { MethodType=Property DesignTime=False }
   649    Function ComMinTrackSize Returns Variant
   650        Handle hDispatchDriver
   651        Variant retVal
   652        Get phDispatchDriver to hDispatchDriver
   653        Get InvokeComMethod of hDispatchDriver 15 OLE_VT_DISPATCH to retVal
   654        Function_Return retVal
   655    End_Function
   656
   657    { MethodType=Property DesignTime=False }
   658    Function ComMaxTrackSize Returns Variant
   659        Handle hDispatchDriver
   660        Variant retVal
   661        Get phDispatchDriver to hDispatchDriver
   662        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_DISPATCH to retVal
   663        Function_Return retVal
   664    End_Function
   665
   666    Procedure ComSetHandle OLE_HANDLE llhWnd
   667        Handle hDispatchDriver
   668        Get phDispatchDriver to hDispatchDriver
   669        Send PrepareParams to hDispatchDriver 1
   670        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
   671        Send InvokeComMethod to hDispatchDriver 17 OLE_VT_VOID
   672    End_Procedure
   673
   674    { MethodType=Property DesignTime=False }
   675    Function ComParentContainer Returns Variant
   676        Handle hDispatchDriver
   677        Variant retVal
   678        Get phDispatchDriver to hDispatchDriver
   679        Get InvokeComMethod of hDispatchDriver 20 OLE_VT_DISPATCH to retVal
   680        Function_Return retVal
   681    End_Function
   682
   683    { MethodType=Property DesignTime=False }
   684    Function ComType Returns OLEDockingPaneType
   685        Handle hDispatchDriver
   686        OLEDockingPaneType retVal
   687        Get phDispatchDriver to hDispatchDriver
   688        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
   689        Function_Return retVal
   690    End_Function
   691
   692    { MethodType=Property DesignTime=False }
   693    Function ComPosition Returns OLEDockingDirection
   694        Handle hDispatchDriver
   695        OLEDockingDirection retVal
   696        Get phDispatchDriver to hDispatchDriver
   697        Get InvokeComMethod of hDispatchDriver 23 OLE_VT_I4 to retVal
   698        Function_Return retVal
   699    End_Function
   700
   701    Procedure ComGetClientRect Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
   702        Handle hDispatchDriver
   703        Get phDispatchDriver to hDispatchDriver
   704        Send PrepareParams to hDispatchDriver 4
   705        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llLeft
   706        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llTop
   707        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llRight
   708        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llBottom
   709        Send InvokeComMethod to hDispatchDriver 25 OLE_VT_VOID
   710    End_Procedure
   711End_Class
   712
   713// CoClass
   714Class cSigCjComPane is a cComAutomationObject
   715    Import_Class_Protocol cSigCjComIPane
   716
   717    Procedure Construct_Object
   718        Forward Send Construct_Object
   719        Set peAutoCreate to acNoAutoCreate
   720    End_Procedure
   721End_Class
   722
   723Class cSigCjComIDockingPanePaintManager is a Mixin
   724
   725    { MethodType=Property DesignTime=False }
   726    Function ComShowCaption Returns Boolean
   727        Boolean retVal
   728        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
   729        Function_Return retVal
   730    End_Function
   731
   732    { MethodType=Property DesignTime=False }
   733    Procedure Set ComShowCaption Boolean value
   734        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
   735    End_Procedure
   736
   737    { MethodType=Property DesignTime=False }
   738    Function ComCaptionFont Returns Variant
   739        Variant retVal
   740        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
   741        Function_Return retVal
   742    End_Function
   743
   744    { MethodType=Property DesignTime=False }
   745    Procedure Set ComCaptionFont Variant value
   746        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
   747    End_Procedure
   748
   749    { MethodType=Property DesignTime=False }
   750    Function ComHighlightActiveCaption Returns Boolean
   751        Boolean retVal
   752        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
   753        Function_Return retVal
   754    End_Function
   755
   756    { MethodType=Property DesignTime=False }
   757    Procedure Set ComHighlightActiveCaption Boolean value
   758        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
   759    End_Procedure
   760
   761    { MethodType=Property DesignTime=False }
   762    Function ComDrawSingleTab Returns Boolean
   763        Boolean retVal
   764        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
   765        Function_Return retVal
   766    End_Function
   767
   768    { MethodType=Property DesignTime=False }
   769    Procedure Set ComDrawSingleTab Boolean value
   770        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
   771    End_Procedure
   772
   773    { MethodType=Property DesignTime=False }
   774    Function ComSplitterSize Returns Integer
   775        Integer retVal
   776        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
   777        Function_Return retVal
   778    End_Function
   779
   780    { MethodType=Property DesignTime=False }
   781    Procedure Set ComSplitterSize Integer value
   782        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
   783    End_Procedure
   784
   785    { MethodType=Property DesignTime=False }
   786    Function ComSplitterStyle Returns OLEDockingPaneSplitterStyle
   787        OLEDockingPaneSplitterStyle retVal
   788        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
   789        Function_Return retVal
   790    End_Function
   791
   792    { MethodType=Property DesignTime=False }
   793    Procedure Set ComSplitterStyle OLEDockingPaneSplitterStyle value
   794        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
   795    End_Procedure
   796
   797    { MethodType=Property DesignTime=False }
   798    Function ComSplitterColor Returns OLE_COLOR
   799        OLE_COLOR retVal
   800        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
   801        Function_Return retVal
   802    End_Function
   803
   804    { MethodType=Property DesignTime=False }
   805    Procedure Set ComSplitterColor OLE_COLOR value
   806        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
   807    End_Procedure
   808
   809    { MethodType=Property DesignTime=False }
   810    Function ComCaptionButtonStyle Returns OLEDockingPaneCaptionButtonStyle
   811        OLEDockingPaneCaptionButtonStyle retVal
   812        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
   813        Function_Return retVal
   814    End_Function
   815
   816    { MethodType=Property DesignTime=False }
   817    Procedure Set ComCaptionButtonStyle OLEDockingPaneCaptionButtonStyle value
   818        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
   819    End_Procedure
   820
   821    { MethodType=Property DesignTime=False }
   822    Function ComCaptionMargin Returns Integer
   823        Integer retVal
   824        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
   825        Function_Return retVal
   826    End_Function
   827
   828    { MethodType=Property DesignTime=False }
   829    Procedure Set ComCaptionMargin Integer value
   830        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
   831    End_Procedure
   832
   833    { MethodType=Property DesignTime=False }
   834    Function ComDrawCaptionIcon Returns Boolean
   835        Boolean retVal
   836        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to retVal
   837        Function_Return retVal
   838    End_Function
   839
   840    { MethodType=Property DesignTime=False }
   841    Procedure Set ComDrawCaptionIcon Boolean value
   842        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to value
   843    End_Procedure
   844End_Class
   845
   846// CoClass
   847Class cSigCjComDockingPanePaintManager is a cComAutomationObject
   848    Import_Class_Protocol cSigCjComIDockingPanePaintManager
   849
   850    Procedure Construct_Object
   851        Forward Send Construct_Object
   852        Set peAutoCreate to acNoAutoCreate
   853    End_Procedure
   854End_Class
   855
   856Class cSigCjComIDockingPaneOptions is a Mixin
   857
   858    { MethodType=Property DesignTime=False }
   859    Function ComLunaColors Returns Boolean
   860        Boolean retVal
   861        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
   862        Function_Return retVal
   863    End_Function
   864
   865    { MethodType=Property DesignTime=False }
   866    Procedure Set ComLunaColors Boolean value
   867        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
   868    End_Procedure
   869
   870    { MethodType=Property DesignTime=False }
   871    Function ComAnimationDelay Returns Real
   872        Real retVal
   873        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_R8 to retVal
   874        Function_Return retVal
   875    End_Function
   876
   877    { MethodType=Property DesignTime=False }
   878    Procedure Set ComAnimationDelay Real value
   879        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_R8 to value
   880    End_Procedure
   881
   882    { MethodType=Property DesignTime=False }
   883    Function ComHideClient Returns Boolean
   884        Boolean retVal
   885        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
   886        Function_Return retVal
   887    End_Function
   888
   889    { MethodType=Property DesignTime=False }
   890    Procedure Set ComHideClient Boolean value
   891        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
   892    End_Procedure
   893
   894    { MethodType=Property DesignTime=False }
   895    Function ComUseSplitterTracker Returns Boolean
   896        Boolean retVal
   897        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
   898        Function_Return retVal
   899    End_Function
   900
   901    { MethodType=Property DesignTime=False }
   902    Procedure Set ComUseSplitterTracker Boolean value
   903        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
   904    End_Procedure
   905
   906    { MethodType=Property DesignTime=False }
   907    Function ComLockSplitters Returns Boolean
   908        Boolean retVal
   909        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
   910        Function_Return retVal
   911    End_Function
   912
   913    { MethodType=Property DesignTime=False }
   914    Procedure Set ComLockSplitters Boolean value
   915        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
   916    End_Procedure
   917
   918    { MethodType=Property DesignTime=False }
   919    Function ComThemedFloatingFrames Returns Boolean
   920        Boolean retVal
   921        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
   922        Function_Return retVal
   923    End_Function
   924
   925    { MethodType=Property DesignTime=False }
   926    Procedure Set ComThemedFloatingFrames Boolean value
   927        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
   928    End_Procedure
   929
   930    { MethodType=Property DesignTime=False }
   931    Function ComFloatingFrameCaption Returns String
   932        String retVal
   933        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to retVal
   934        Function_Return retVal
   935    End_Function
   936
   937    { MethodType=Property DesignTime=False }
   938    Procedure Set ComFloatingFrameCaption String value
   939        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to value
   940    End_Procedure
   941
   942    { MethodType=Property DesignTime=False }
   943    Function ComAlphaDockingContext Returns Boolean
   944        Boolean retVal
   945        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to retVal
   946        Function_Return retVal
   947    End_Function
   948
   949    { MethodType=Property DesignTime=False }
   950    Procedure Set ComAlphaDockingContext Boolean value
   951        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to value
   952    End_Procedure
   953
   954    { MethodType=Property DesignTime=False }
   955    Function ComShowDockingContextStickers Returns Boolean
   956        Boolean retVal
   957        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
   958        Function_Return retVal
   959    End_Function
   960
   961    { MethodType=Property DesignTime=False }
   962    Procedure Set ComShowDockingContextStickers Boolean value
   963        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
   964    End_Procedure
   965
   966    { MethodType=Property DesignTime=False }
   967    Function ComDefaultPaneOptions Returns OLEPaneOptions
   968        OLEPaneOptions retVal
   969        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
   970        Function_Return retVal
   971    End_Function
   972
   973    { MethodType=Property DesignTime=False }
   974    Procedure Set ComDefaultPaneOptions OLEPaneOptions value
   975        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
   976    End_Procedure
   977
   978    { MethodType=Property DesignTime=False }
   979    Function ComCloseGroupOnButtonClick Returns Boolean
   980        Boolean retVal
   981        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
   982        Function_Return retVal
   983    End_Function
   984
   985    { MethodType=Property DesignTime=False }
   986    Procedure Set ComCloseGroupOnButtonClick Boolean value
   987        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
   988    End_Procedure
   989
   990    { MethodType=Property DesignTime=False }
   991    Function ComHideGroupOnButtonClick Returns Boolean
   992        Boolean retVal
   993        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to retVal
   994        Function_Return retVal
   995    End_Function
   996
   997    { MethodType=Property DesignTime=False }
   998    Procedure Set ComHideGroupOnButtonClick Boolean value
   999        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to value
  1000    End_Procedure
  1001
  1002    // Synchronizes the activation of the mini-frame windows to the activation of its parent window
  1003    { MethodType=Property DesignTime=False }
  1004    Function ComSyncActiveFloatingFrames Returns Boolean
  1005        Boolean retVal
  1006        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to retVal
  1007        Function_Return retVal
  1008    End_Function
  1009
  1010    // Synchronizes the activation of the mini-frame windows to the activation of its parent window
  1011    { MethodType=Property DesignTime=False }
  1012    Procedure Set ComSyncActiveFloatingFrames Boolean value
  1013        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to value
  1014    End_Procedure
  1015
  1016    { MethodType=Property DesignTime=False }
  1017    Function ComShowCaptionMaximizeButton Returns Boolean
  1018        Boolean retVal
  1019        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BOOL to retVal
  1020        Function_Return retVal
  1021    End_Function
  1022
  1023    { MethodType=Property DesignTime=False }
  1024    Procedure Set ComShowCaptionMaximizeButton Boolean value
  1025        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BOOL to value
  1026    End_Procedure
  1027
  1028    { MethodType=Property DesignTime=False }
  1029    Function ComStickerStyle Returns OLEDockingContextStickerStyle
  1030        OLEDockingContextStickerStyle retVal
  1031        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to retVal
  1032        Function_Return retVal
  1033    End_Function
  1034
  1035    { MethodType=Property DesignTime=False }
  1036    Procedure Set ComStickerStyle OLEDockingContextStickerStyle value
  1037        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to value
  1038    End_Procedure
  1039
  1040    { MethodType=Property DesignTime=False }
  1041    Function ComCaptionDirection Returns OLEDockingPaneCaptionDirection
  1042        OLEDockingPaneCaptionDirection retVal
  1043        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to retVal
  1044        Function_Return retVal
  1045    End_Function
  1046
  1047    { MethodType=Property DesignTime=False }
  1048    Procedure Set ComCaptionDirection OLEDockingPaneCaptionDirection value
  1049        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to value
  1050    End_Procedure
  1051
  1052    { MethodType=Property DesignTime=False }
  1053    Function ComAutoHideAnimationInterval Returns Integer
  1054        Integer retVal
  1055        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
  1056        Function_Return retVal
  1057    End_Function
  1058
  1059    { MethodType=Property DesignTime=False }
  1060    Procedure Set ComAutoHideAnimationInterval Integer value
  1061        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
  1062    End_Procedure
  1063
  1064    { MethodType=Property DesignTime=False }
  1065    Function ComAutoHideAnimationDuration Returns Integer
  1066        Integer retVal
  1067        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
  1068        Function_Return retVal
  1069    End_Function
  1070
  1071    { MethodType=Property DesignTime=False }
  1072    Procedure Set ComAutoHideAnimationDuration Integer value
  1073        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
  1074    End_Procedure
  1075
  1076    { MethodType=Property DesignTime=False }
  1077    Function ComAutoHideMouseHoverDelay Returns Integer
  1078        Integer retVal
  1079        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to retVal
  1080        Function_Return retVal
  1081    End_Function
  1082
  1083    { MethodType=Property DesignTime=False }
  1084    Procedure Set ComAutoHideMouseHoverDelay Integer value
  1085        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to value
  1086    End_Procedure
  1087
  1088    { MethodType=Property DesignTime=False }
  1089    Function ComAutoHideInactiveCollapseDelay Returns Integer
  1090        Integer retVal
  1091        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to retVal
  1092        Function_Return retVal
  1093    End_Function
  1094
  1095    { MethodType=Property DesignTime=False }
  1096    Procedure Set ComAutoHideInactiveCollapseDelay Integer value
  1097        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to value
  1098    End_Procedure
  1099
  1100    { MethodType=Property DesignTime=False }
  1101    Function ComShowFloatingFramePinButton Returns Boolean
  1102        Boolean retVal
  1103        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_BOOL to retVal
  1104        Function_Return retVal
  1105    End_Function
  1106
  1107    { MethodType=Property DesignTime=False }
  1108    Procedure Set ComShowFloatingFramePinButton Boolean value
  1109        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_BOOL to value
  1110    End_Procedure
  1111
  1112    { MethodType=Property DesignTime=False }
  1113    Function ComShowContentsWhileDragging Returns Boolean
  1114        Boolean retVal
  1115        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_BOOL to retVal
  1116        Function_Return retVal
  1117    End_Function
  1118
  1119    { MethodType=Property DesignTime=False }
  1120    Procedure Set ComShowContentsWhileDragging Boolean value
  1121        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_BOOL to value
  1122    End_Procedure
  1123
  1124    { MethodType=Property DesignTime=False }
  1125    Function ComShowSizeCursorWhileDragging Returns Boolean
  1126        Boolean retVal
  1127        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to retVal
  1128        Function_Return retVal
  1129    End_Function
  1130
  1131    { MethodType=Property DesignTime=False }
  1132    Procedure Set ComShowSizeCursorWhileDragging Boolean value
  1133        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to value
  1134    End_Procedure
  1135
  1136    { MethodType=Property DesignTime=False }
  1137    Function ComClientMargin Returns Integer
  1138        Integer retVal
  1139        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to retVal
  1140        Function_Return retVal
  1141    End_Function
  1142
  1143    { MethodType=Property DesignTime=False }
  1144    Procedure Set ComClientMargin Integer value
  1145        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to value
  1146    End_Procedure
  1147
  1148    { MethodType=Property DesignTime=False }
  1149    Function ComStickyFloatingFrames Returns Boolean
  1150        Boolean retVal
  1151        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BOOL to retVal
  1152        Function_Return retVal
  1153    End_Function
  1154
  1155    { MethodType=Property DesignTime=False }
  1156    Procedure Set ComStickyFloatingFrames Boolean value
  1157        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BOOL to value
  1158    End_Procedure
  1159
  1160    { MethodType=Property DesignTime=False }
  1161    Function ComFloatingFramesOpacity Returns Integer
  1162        Integer retVal
  1163        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
  1164        Function_Return retVal
  1165    End_Function
  1166
  1167    { MethodType=Property DesignTime=False }
  1168    Procedure Set ComFloatingFramesOpacity Integer value
  1169        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
  1170    End_Procedure
  1171
  1172    { MethodType=Property DesignTime=False }
  1173    Function ComSideDocking Returns Boolean
  1174        Boolean retVal
  1175        Get ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_BOOL to retVal
  1176        Function_Return retVal
  1177    End_Function
  1178
  1179    { MethodType=Property DesignTime=False }
  1180    Procedure Set ComSideDocking Boolean value
  1181        Set ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_BOOL to value
  1182    End_Procedure
  1183
  1184    { MethodType=Property DesignTime=False }
  1185    Function ComShowPanelScrollButtons Returns Boolean
  1186        Boolean retVal
  1187        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  1188        Function_Return retVal
  1189    End_Function
  1190
  1191    { MethodType=Property DesignTime=False }
  1192    Procedure Set ComShowPanelScrollButtons Boolean value
  1193        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  1194    End_Procedure
  1195
  1196    { MethodType=Property DesignTime=False }
  1197    Function ComShowCloseTabButton Returns OLEDockingPaneTabButtonFlags
  1198        OLEDockingPaneTabButtonFlags retVal
  1199        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to retVal
  1200        Function_Return retVal
  1201    End_Function
  1202
  1203    { MethodType=Property DesignTime=False }
  1204    Procedure Set ComShowCloseTabButton OLEDockingPaneTabButtonFlags value
  1205        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to value
  1206    End_Procedure
  1207
  1208    Function ComSetSideDockingMargin Integer llLeft Integer llTop Integer llRight Integer llBottom Returns Boolean
  1209        Handle hDispatchDriver
  1210        Boolean retVal
  1211        Get phDispatchDriver to hDispatchDriver
  1212        Send PrepareParams to hDispatchDriver 4
  1213        Send DefineParam to hDispatchDriver OLE_VT_I4 llLeft
  1214        Send DefineParam to hDispatchDriver OLE_VT_I4 llTop
  1215        Send DefineParam to hDispatchDriver OLE_VT_I4 llRight
  1216        Send DefineParam to hDispatchDriver OLE_VT_I4 llBottom
  1217        Get InvokeComMethod of hDispatchDriver 29 OLE_VT_BOOL to retVal
  1218        Function_Return retVal
  1219    End_Function
  1220End_Class
  1221
  1222// CoClass
  1223Class cSigCjComDockingPaneOptions is a cComAutomationObject
  1224    Import_Class_Protocol cSigCjComIDockingPaneOptions
  1225
  1226    Procedure Construct_Object
  1227        Forward Send Construct_Object
  1228        Set peAutoCreate to acNoAutoCreate
  1229    End_Procedure
  1230End_Class
  1231
  1232Class cSigCjComIPaneActionContainer is a Mixin
  1233
  1234    { MethodType=Property DesignTime=False }
  1235    Function ComContainer Returns Variant
  1236        Handle hDispatchDriver
  1237        Variant retVal
  1238        Get phDispatchDriver to hDispatchDriver
  1239        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
  1240        Function_Return retVal
  1241    End_Function
  1242
  1243    { MethodType=Property DesignTime=False }
  1244    Function ComDirection Returns OLEDockingDirection
  1245        Handle hDispatchDriver
  1246        OLEDockingDirection retVal
  1247        Get phDispatchDriver to hDispatchDriver
  1248        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_I4 to retVal
  1249        Function_Return retVal
  1250    End_Function
  1251End_Class
  1252
  1253// CoClass
  1254Class cSigCjComPaneActionContainer is a cComAutomationObject
  1255    Import_Class_Protocol cSigCjComIPaneActionContainer
  1256
  1257    Procedure Construct_Object
  1258        Forward Send Construct_Object
  1259        Set peAutoCreate to acNoAutoCreate
  1260    End_Procedure
  1261End_Class
  1262
  1263// Dispatch interface for DockingPane Control
  1264Class cSigCjCom_DDockingPane is a Mixin
  1265
  1266    { MethodType=Property DesignTime=False }
  1267    Function ComVisualTheme Returns OLEVisualTheme
  1268        OLEVisualTheme retVal
  1269        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  1270        Function_Return retVal
  1271    End_Function
  1272
  1273    { MethodType=Property DesignTime=False }
  1274    Procedure Set ComVisualTheme OLEVisualTheme value
  1275        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  1276    End_Procedure
  1277
  1278    { MethodType=Property DesignTime=False }
  1279    Function ComImageList Returns Variant
  1280        Variant retVal
  1281        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_DISPATCH to retVal
  1282        Function_Return retVal
  1283    End_Function
  1284
  1285    { MethodType=Property DesignTime=False }
  1286    Procedure Set ComImageList Variant value
  1287        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_DISPATCH to value
  1288    End_Procedure
  1289
  1290    { MethodType=Property DesignTime=False }
  1291    Function ComScaleMode Returns OLEXTPScaleMode
  1292        OLEXTPScaleMode retVal
  1293        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to retVal
  1294        Function_Return retVal
  1295    End_Function
  1296
  1297    { MethodType=Property DesignTime=False }
  1298    Procedure Set ComScaleMode OLEXTPScaleMode value
  1299        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to value
  1300    End_Procedure
  1301
  1302    { MethodType=Property DesignTime=False }
  1303    Function ComIcons Returns Variant
  1304        Variant retVal
  1305        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_DISPATCH to retVal
  1306        Function_Return retVal
  1307    End_Function
  1308
  1309    { MethodType=Property DesignTime=False }
  1310    Procedure Set ComIcons Variant value
  1311        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_DISPATCH to value
  1312    End_Procedure
  1313
  1314    Function ComCreatePane Integer llId Integer llcx Integer llcy OLEDockingDirection llDirection Variant llNeighbour Returns Variant
  1315        Handle hDispatchDriver
  1316        Variant retVal
  1317        Get phDispatchDriver to hDispatchDriver
  1318        Send PrepareParams to hDispatchDriver 5
  1319        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1320        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  1321        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  1322        Send DefineParam to hDispatchDriver OLE_VT_I4 llDirection
  1323        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llNeighbour
  1324        Get InvokeComMethod of hDispatchDriver 3 OLE_VT_DISPATCH to retVal
  1325        Function_Return retVal
  1326    End_Function
  1327
  1328    Procedure ComAttachPane Variant llPane Variant llNeighbour
  1329        Handle hDispatchDriver
  1330        Get phDispatchDriver to hDispatchDriver
  1331        Send PrepareParams to hDispatchDriver 2
  1332        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1333        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llNeighbour
  1334        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
  1335    End_Procedure
  1336
  1337    Procedure ComHidePane Variant llPane
  1338        Handle hDispatchDriver
  1339        Get phDispatchDriver to hDispatchDriver
  1340        Send PrepareParams to hDispatchDriver 1
  1341        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1342        Send InvokeComMethod to hDispatchDriver 5 OLE_VT_VOID
  1343    End_Procedure
  1344
  1345    Procedure ComShowPane Integer llId
  1346        Handle hDispatchDriver
  1347        Get phDispatchDriver to hDispatchDriver
  1348        Send PrepareParams to hDispatchDriver 1
  1349        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1350        Send InvokeComMethod to hDispatchDriver 6 OLE_VT_VOID
  1351    End_Procedure
  1352
  1353    Function ComFindPane Integer llId Returns Variant
  1354        Handle hDispatchDriver
  1355        Variant retVal
  1356        Get phDispatchDriver to hDispatchDriver
  1357        Send PrepareParams to hDispatchDriver 1
  1358        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1359        Get InvokeComMethod of hDispatchDriver 7 OLE_VT_DISPATCH to retVal
  1360        Function_Return retVal
  1361    End_Function
  1362
  1363    Procedure ComGetClientRect Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
  1364        Handle hDispatchDriver
  1365        Get phDispatchDriver to hDispatchDriver
  1366        Send PrepareParams to hDispatchDriver 4
  1367        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llLeft
  1368        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llTop
  1369        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llRight
  1370        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llBottom
  1371        Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
  1372    End_Procedure
  1373
  1374    Procedure ComRecalcLayout
  1375        Handle hDispatchDriver
  1376        Get phDispatchDriver to hDispatchDriver
  1377        Send InvokeComMethod to hDispatchDriver 9 OLE_VT_VOID
  1378    End_Procedure
  1379
  1380    Procedure ComSaveState String llRegistryKey String llAppName String llSection
  1381        Handle hDispatchDriver
  1382        Get phDispatchDriver to hDispatchDriver
  1383        Send PrepareParams to hDispatchDriver 3
  1384        Send DefineParam to hDispatchDriver OLE_VT_BSTR llRegistryKey
  1385        Send DefineParam to hDispatchDriver OLE_VT_BSTR llAppName
  1386        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  1387        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
  1388    End_Procedure
  1389
  1390    Procedure ComLoadState String llRegistryKey String llAppName String llSection
  1391        Handle hDispatchDriver
  1392        Get phDispatchDriver to hDispatchDriver
  1393        Send PrepareParams to hDispatchDriver 3
  1394        Send DefineParam to hDispatchDriver OLE_VT_BSTR llRegistryKey
  1395        Send DefineParam to hDispatchDriver OLE_VT_BSTR llAppName
  1396        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  1397        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
  1398    End_Procedure
  1399
  1400    Procedure ComSetCommandBars Variant llCommandBars
  1401        Handle hDispatchDriver
  1402        Get phDispatchDriver to hDispatchDriver
  1403        Send PrepareParams to hDispatchDriver 1
  1404        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llCommandBars
  1405        Send InvokeComMethod to hDispatchDriver 12 OLE_VT_VOID
  1406    End_Procedure
  1407
  1408    Procedure ComAddIconHandle Integer llIcon Integer llId
  1409        Handle hDispatchDriver
  1410        Get phDispatchDriver to hDispatchDriver
  1411        Send PrepareParams to hDispatchDriver 2
  1412        Send DefineParam to hDispatchDriver OLE_VT_I4 llIcon
  1413        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1414        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  1415    End_Procedure
  1416
  1417    { MethodType=Property DesignTime=False }
  1418    Function ComOptions Returns Variant
  1419        Handle hDispatchDriver
  1420        Variant retVal
  1421        Get phDispatchDriver to hDispatchDriver
  1422        Get InvokeComMethod of hDispatchDriver 14 OLE_VT_DISPATCH to retVal
  1423        Function_Return retVal
  1424    End_Function
  1425
  1426    Procedure ComLoadStateFromString String llNode
  1427        Handle hDispatchDriver
  1428        Get phDispatchDriver to hDispatchDriver
  1429        Send PrepareParams to hDispatchDriver 1
  1430        Send DefineParam to hDispatchDriver OLE_VT_BSTR llNode
  1431        Send InvokeComMethod to hDispatchDriver 15 OLE_VT_VOID
  1432    End_Procedure
  1433
  1434    Function ComSaveStateToString Returns String
  1435        Handle hDispatchDriver
  1436        String retVal
  1437        Get phDispatchDriver to hDispatchDriver
  1438        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_BSTR to retVal
  1439        Function_Return retVal
  1440    End_Function
  1441
  1442    Procedure ComRedrawPanes
  1443        Handle hDispatchDriver
  1444        Get phDispatchDriver to hDispatchDriver
  1445        Send InvokeComMethod to hDispatchDriver 17 OLE_VT_VOID
  1446    End_Procedure
  1447
  1448    Procedure ComDestroyPane Variant llPane
  1449        Handle hDispatchDriver
  1450        Get phDispatchDriver to hDispatchDriver
  1451        Send PrepareParams to hDispatchDriver 1
  1452        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1453        Send InvokeComMethod to hDispatchDriver 18 OLE_VT_VOID
  1454    End_Procedure
  1455
  1456    Procedure ComDestroyAll
  1457        Handle hDispatchDriver
  1458        Get phDispatchDriver to hDispatchDriver
  1459        Send InvokeComMethod to hDispatchDriver 19 OLE_VT_VOID
  1460    End_Procedure
  1461
  1462    Procedure ComCloseAll
  1463        Handle hDispatchDriver
  1464        Get phDispatchDriver to hDispatchDriver
  1465        Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
  1466    End_Procedure
  1467
  1468    { MethodType=Property DesignTime=False }
  1469    Function ComPanesCount Returns Integer
  1470        Handle hDispatchDriver
  1471        Integer retVal
  1472        Get phDispatchDriver to hDispatchDriver
  1473        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
  1474        Function_Return retVal
  1475    End_Function
  1476
  1477    { MethodType=Property DesignTime=False }
  1478    Function ComTabPaintManager Returns Variant
  1479        Handle hDispatchDriver
  1480        Variant retVal
  1481        Get phDispatchDriver to hDispatchDriver
  1482        Get InvokeComMethod of hDispatchDriver 22 OLE_VT_DISPATCH to retVal
  1483        Function_Return retVal
  1484    End_Function
  1485
  1486    { MethodType=Property DesignTime=False }
  1487    Function ComPanelPaintManager Returns Variant
  1488        Handle hDispatchDriver
  1489        Variant retVal
  1490        Get phDispatchDriver to hDispatchDriver
  1491        Get InvokeComMethod of hDispatchDriver 23 OLE_VT_DISPATCH to retVal
  1492        Function_Return retVal
  1493    End_Function
  1494
  1495    { MethodType=Property DesignTime=False }
  1496    Function ComPanes Integer llnIndex Returns Variant
  1497        Handle hDispatchDriver
  1498        Variant retVal
  1499        Get phDispatchDriver to hDispatchDriver
  1500        Send PrepareParams to hDispatchDriver 1
  1501        Send DefineParam to hDispatchDriver OLE_VT_I4 llnIndex
  1502        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
  1503        Function_Return retVal
  1504    End_Function
  1505
  1506    { MethodType=Property DesignTime=False }
  1507    Function Com_NewEnum Returns Variant
  1508        Handle hDispatchDriver
  1509        Variant retVal
  1510        Get phDispatchDriver to hDispatchDriver
  1511        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
  1512        Function_Return retVal
  1513    End_Function
  1514
  1515    Procedure ComFloatPane Variant llPane Integer llLeft Integer llTop Integer llRight Integer llBottom
  1516        Handle hDispatchDriver
  1517        Get phDispatchDriver to hDispatchDriver
  1518        Send PrepareParams to hDispatchDriver 5
  1519        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1520        Send DefineParam to hDispatchDriver OLE_VT_I4 llLeft
  1521        Send DefineParam to hDispatchDriver OLE_VT_I4 llTop
  1522        Send DefineParam to hDispatchDriver OLE_VT_I4 llRight
  1523        Send DefineParam to hDispatchDriver OLE_VT_I4 llBottom
  1524        Send InvokeComMethod to hDispatchDriver 26 OLE_VT_VOID
  1525    End_Procedure
  1526
  1527    Procedure ComNormalizeSplitters
  1528        Handle hDispatchDriver
  1529        Get phDispatchDriver to hDispatchDriver
  1530        Send InvokeComMethod to hDispatchDriver 27 OLE_VT_VOID
  1531    End_Procedure
  1532
  1533    { MethodType=Property DesignTime=False }
  1534    Function ComPaintManager Returns Variant
  1535        Handle hDispatchDriver
  1536        Variant retVal
  1537        Get phDispatchDriver to hDispatchDriver
  1538        Get InvokeComMethod of hDispatchDriver 28 OLE_VT_DISPATCH to retVal
  1539        Function_Return retVal
  1540    End_Function
  1541
  1542    { MethodType=Property DesignTime=False }
  1543    Function ComActivePane Returns Variant
  1544        Handle hDispatchDriver
  1545        Variant retVal
  1546        Get phDispatchDriver to hDispatchDriver
  1547        Get InvokeComMethod of hDispatchDriver 29 OLE_VT_DISPATCH to retVal
  1548        Function_Return retVal
  1549    End_Function
  1550
  1551    { MethodType=Property DesignTime=False }
  1552    Function ComToolTipContext Returns Variant
  1553        Handle hDispatchDriver
  1554        Variant retVal
  1555        Get phDispatchDriver to hDispatchDriver
  1556        Get InvokeComMethod of hDispatchDriver 30 OLE_VT_DISPATCH to retVal
  1557        Function_Return retVal
  1558    End_Function
  1559
  1560    Function ComCreateLayout Returns Variant
  1561        Handle hDispatchDriver
  1562        Variant retVal
  1563        Get phDispatchDriver to hDispatchDriver
  1564        Get InvokeComMethod of hDispatchDriver 31 OLE_VT_DISPATCH to retVal
  1565        Function_Return retVal
  1566    End_Function
  1567
  1568    Procedure ComGetLayout Variant llLayout
  1569        Handle hDispatchDriver
  1570        Get phDispatchDriver to hDispatchDriver
  1571        Send PrepareParams to hDispatchDriver 1
  1572        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llLayout
  1573        Send InvokeComMethod to hDispatchDriver 32 OLE_VT_VOID
  1574    End_Procedure
  1575
  1576    Procedure ComSetLayout Variant llLayout
  1577        Handle hDispatchDriver
  1578        Get phDispatchDriver to hDispatchDriver
  1579        Send PrepareParams to hDispatchDriver 1
  1580        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llLayout
  1581        Send InvokeComMethod to hDispatchDriver 33 OLE_VT_VOID
  1582    End_Procedure
  1583
  1584    Procedure ComSetMDIClient OLE_HANDLE llhWnd
  1585        Handle hDispatchDriver
  1586        Get phDispatchDriver to hDispatchDriver
  1587        Send PrepareParams to hDispatchDriver 1
  1588        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
  1589        Send InvokeComMethod to hDispatchDriver 34 OLE_VT_VOID
  1590    End_Procedure
  1591
  1592    Procedure ComUpdatePanes
  1593        Handle hDispatchDriver
  1594        Get phDispatchDriver to hDispatchDriver
  1595        Send InvokeComMethod to hDispatchDriver 35 OLE_VT_VOID
  1596    End_Procedure
  1597
  1598    Procedure ComAttachToWindow OLE_HANDLE llhWnd
  1599        Handle hDispatchDriver
  1600        Get phDispatchDriver to hDispatchDriver
  1601        Send PrepareParams to hDispatchDriver 1
  1602        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
  1603        Send InvokeComMethod to hDispatchDriver 50 OLE_VT_VOID
  1604    End_Procedure
  1605
  1606    Procedure ComDockPane Variant llPane Integer llcx Integer llcy OLEDockingDirection llDirection Variant llNeighbour
  1607        Handle hDispatchDriver
  1608        Get phDispatchDriver to hDispatchDriver
  1609        Send PrepareParams to hDispatchDriver 5
  1610        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1611        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  1612        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  1613        Send DefineParam to hDispatchDriver OLE_VT_I4 llDirection
  1614        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llNeighbour
  1615        Send InvokeComMethod to hDispatchDriver 51 OLE_VT_VOID
  1616    End_Procedure
  1617
  1618    Procedure ComEnableKeyboardNavigate OLEDockingPaneKeyboardNavigate llOptions
  1619        Handle hDispatchDriver
  1620        Get phDispatchDriver to hDispatchDriver
  1621        Send PrepareParams to hDispatchDriver 1
  1622        Send DefineParam to hDispatchDriver OLE_VT_I4 llOptions
  1623        Send InvokeComMethod to hDispatchDriver 52 OLE_VT_VOID
  1624    End_Procedure
  1625
  1626    { MethodType=Property DesignTime=False }
  1627    Function ComLayout Returns Variant
  1628        Handle hDispatchDriver
  1629        Variant retVal
  1630        Get phDispatchDriver to hDispatchDriver
  1631        Get InvokeComMethod of hDispatchDriver 53 OLE_VT_DISPATCH to retVal
  1632        Function_Return retVal
  1633    End_Function
  1634
  1635    Procedure ComDockSidePane Variant llPane Integer llOffset OLEDockingDirection llDirection
  1636        Handle hDispatchDriver
  1637        Get phDispatchDriver to hDispatchDriver
  1638        Send PrepareParams to hDispatchDriver 3
  1639        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1640        Send DefineParam to hDispatchDriver OLE_VT_I4 llOffset
  1641        Send DefineParam to hDispatchDriver OLE_VT_I4 llDirection
  1642        Send InvokeComMethod to hDispatchDriver 54 OLE_VT_VOID
  1643    End_Procedure
  1644
  1645    Procedure ComAboutBox
  1646        Handle hDispatchDriver
  1647        Get phDispatchDriver to hDispatchDriver
  1648        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  1649    End_Procedure
  1650End_Class
  1651
  1652// Event interface for DockingPane Control
  1653Class cSigCjCom_DDockingPaneEvents is a Mixin
  1654
  1655    { MethodType=Event }
  1656    Procedure OnComAttachPane Variant llItem
  1657    End_Procedure
  1658
  1659    { MethodType=Event }
  1660    Procedure OnComGetClientBordersWidth Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
  1661    End_Procedure
  1662
  1663    { MethodType=Event }
  1664    Procedure OnComResize
  1665    End_Procedure
  1666
  1667    { MethodType=Event }
  1668    Procedure OnComAction OLEDockingPaneAction llAction Variant llPane Variant llContainer Boolean ByRef llCancel
  1669    End_Procedure
  1670
  1671    { MethodType=Event }
  1672    Procedure OnComResizeClient Integer llLeft Integer llTop Integer llRight Integer llBottom
  1673    End_Procedure
  1674
  1675    { MethodType=Event }
  1676    Procedure OnComRClick Variant llPane
  1677    End_Procedure
  1678
  1679    { MethodType=Event }
  1680    Procedure OnComPanePopupMenu Variant llPane Integer llx Integer lly Boolean ByRef llHandled
  1681    End_Procedure
  1682
  1683    { Visibility=Private }
  1684    Procedure RegisterComEvents
  1685        Send RegisterComEvent 1 msg_OnComAttachPane
  1686        Send RegisterComEvent 2 msg_OnComGetClientBordersWidth
  1687        Send RegisterComEvent 3 msg_OnComResize
  1688        Send RegisterComEvent 4 msg_OnComAction
  1689        Send RegisterComEvent 7 msg_OnComResizeClient
  1690        Send RegisterComEvent 8 msg_OnComRClick
  1691        Send RegisterComEvent 9 msg_OnComPanePopupMenu
  1692    End_Procedure
  1693End_Class
  1694
  1695// CoClass
  1696// Xtreme DockingPane Control
  1697{ CLSID=L_cSigCjComDockingPane }
  1698Class cSigCjComDockingPane is a cComActiveXControl
  1699    Import_Class_Protocol cSigCjCom_DDockingPane
  1700    Import_Class_Protocol cSigCjCom_DDockingPaneEvents
  1701
  1702    Procedure Construct_Object
  1703        Forward Send Construct_Object
  1704        Set psProgID to L_cSigCjComDockingPane
  1705        Set psEventId to "{95DFF694-1D1A-4AFA-8DFF-8798A2181226}"
  1706        Set psLicenseKey to L_cSigCjKeyDockingPane
  1707        Set peAutoCreate to acAutoCreate
  1708    End_Procedure
  1709End_Class
  1710
  1711// Dispatch interface for DockingPane Control
  1712Class cSigCjCom_DDockingPaneFrame is a Mixin
  1713
  1714    { MethodType=Property DesignTime=False }
  1715    Function ComVisualTheme Returns OLEVisualTheme
  1716        OLEVisualTheme retVal
  1717        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  1718        Function_Return retVal
  1719    End_Function
  1720
  1721    { MethodType=Property DesignTime=False }
  1722    Procedure Set ComVisualTheme OLEVisualTheme value
  1723        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  1724    End_Procedure
  1725
  1726    { MethodType=Property DesignTime=False }
  1727    Function ComImageList Returns Variant
  1728        Variant retVal
  1729        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_DISPATCH to retVal
  1730        Function_Return retVal
  1731    End_Function
  1732
  1733    { MethodType=Property DesignTime=False }
  1734    Procedure Set ComImageList Variant value
  1735        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_DISPATCH to value
  1736    End_Procedure
  1737
  1738    { MethodType=Property DesignTime=False }
  1739    Function ComScaleMode Returns OLEXTPScaleMode
  1740        OLEXTPScaleMode retVal
  1741        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to retVal
  1742        Function_Return retVal
  1743    End_Function
  1744
  1745    { MethodType=Property DesignTime=False }
  1746    Procedure Set ComScaleMode OLEXTPScaleMode value
  1747        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to value
  1748    End_Procedure
  1749
  1750    { MethodType=Property DesignTime=False }
  1751    Function ComIcons Returns Variant
  1752        Variant retVal
  1753        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_DISPATCH to retVal
  1754        Function_Return retVal
  1755    End_Function
  1756
  1757    { MethodType=Property DesignTime=False }
  1758    Procedure Set ComIcons Variant value
  1759        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_DISPATCH to value
  1760    End_Procedure
  1761
  1762    Function ComCreatePane Integer llId Integer llcx Integer llcy OLEDockingDirection llDirection Variant llNeighbour Returns Variant
  1763        Handle hDispatchDriver
  1764        Variant retVal
  1765        Get phDispatchDriver to hDispatchDriver
  1766        Send PrepareParams to hDispatchDriver 5
  1767        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1768        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  1769        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  1770        Send DefineParam to hDispatchDriver OLE_VT_I4 llDirection
  1771        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llNeighbour
  1772        Get InvokeComMethod of hDispatchDriver 3 OLE_VT_DISPATCH to retVal
  1773        Function_Return retVal
  1774    End_Function
  1775
  1776    Procedure ComAttachPane Variant llPane Variant llNeighbour
  1777        Handle hDispatchDriver
  1778        Get phDispatchDriver to hDispatchDriver
  1779        Send PrepareParams to hDispatchDriver 2
  1780        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1781        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llNeighbour
  1782        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
  1783    End_Procedure
  1784
  1785    Procedure ComHidePane Variant llPane
  1786        Handle hDispatchDriver
  1787        Get phDispatchDriver to hDispatchDriver
  1788        Send PrepareParams to hDispatchDriver 1
  1789        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1790        Send InvokeComMethod to hDispatchDriver 5 OLE_VT_VOID
  1791    End_Procedure
  1792
  1793    Procedure ComShowPane Integer llId
  1794        Handle hDispatchDriver
  1795        Get phDispatchDriver to hDispatchDriver
  1796        Send PrepareParams to hDispatchDriver 1
  1797        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1798        Send InvokeComMethod to hDispatchDriver 6 OLE_VT_VOID
  1799    End_Procedure
  1800
  1801    Function ComFindPane Integer llId Returns Variant
  1802        Handle hDispatchDriver
  1803        Variant retVal
  1804        Get phDispatchDriver to hDispatchDriver
  1805        Send PrepareParams to hDispatchDriver 1
  1806        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1807        Get InvokeComMethod of hDispatchDriver 7 OLE_VT_DISPATCH to retVal
  1808        Function_Return retVal
  1809    End_Function
  1810
  1811    Procedure ComGetClientRect Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
  1812        Handle hDispatchDriver
  1813        Get phDispatchDriver to hDispatchDriver
  1814        Send PrepareParams to hDispatchDriver 4
  1815        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llLeft
  1816        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llTop
  1817        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llRight
  1818        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llBottom
  1819        Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
  1820    End_Procedure
  1821
  1822    Procedure ComRecalcLayout
  1823        Handle hDispatchDriver
  1824        Get phDispatchDriver to hDispatchDriver
  1825        Send InvokeComMethod to hDispatchDriver 9 OLE_VT_VOID
  1826    End_Procedure
  1827
  1828    Procedure ComSaveState String llRegistryKey String llAppName String llSection
  1829        Handle hDispatchDriver
  1830        Get phDispatchDriver to hDispatchDriver
  1831        Send PrepareParams to hDispatchDriver 3
  1832        Send DefineParam to hDispatchDriver OLE_VT_BSTR llRegistryKey
  1833        Send DefineParam to hDispatchDriver OLE_VT_BSTR llAppName
  1834        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  1835        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
  1836    End_Procedure
  1837
  1838    Procedure ComLoadState String llRegistryKey String llAppName String llSection
  1839        Handle hDispatchDriver
  1840        Get phDispatchDriver to hDispatchDriver
  1841        Send PrepareParams to hDispatchDriver 3
  1842        Send DefineParam to hDispatchDriver OLE_VT_BSTR llRegistryKey
  1843        Send DefineParam to hDispatchDriver OLE_VT_BSTR llAppName
  1844        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  1845        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
  1846    End_Procedure
  1847
  1848    Procedure ComSetCommandBars Variant llCommandBars
  1849        Handle hDispatchDriver
  1850        Get phDispatchDriver to hDispatchDriver
  1851        Send PrepareParams to hDispatchDriver 1
  1852        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llCommandBars
  1853        Send InvokeComMethod to hDispatchDriver 12 OLE_VT_VOID
  1854    End_Procedure
  1855
  1856    Procedure ComAddIconHandle Integer llIcon Integer llId
  1857        Handle hDispatchDriver
  1858        Get phDispatchDriver to hDispatchDriver
  1859        Send PrepareParams to hDispatchDriver 2
  1860        Send DefineParam to hDispatchDriver OLE_VT_I4 llIcon
  1861        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  1862        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  1863    End_Procedure
  1864
  1865    { MethodType=Property DesignTime=False }
  1866    Function ComOptions Returns Variant
  1867        Handle hDispatchDriver
  1868        Variant retVal
  1869        Get phDispatchDriver to hDispatchDriver
  1870        Get InvokeComMethod of hDispatchDriver 14 OLE_VT_DISPATCH to retVal
  1871        Function_Return retVal
  1872    End_Function
  1873
  1874    Procedure ComLoadStateFromString String llNode
  1875        Handle hDispatchDriver
  1876        Get phDispatchDriver to hDispatchDriver
  1877        Send PrepareParams to hDispatchDriver 1
  1878        Send DefineParam to hDispatchDriver OLE_VT_BSTR llNode
  1879        Send InvokeComMethod to hDispatchDriver 15 OLE_VT_VOID
  1880    End_Procedure
  1881
  1882    Function ComSaveStateToString Returns String
  1883        Handle hDispatchDriver
  1884        String retVal
  1885        Get phDispatchDriver to hDispatchDriver
  1886        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_BSTR to retVal
  1887        Function_Return retVal
  1888    End_Function
  1889
  1890    Procedure ComRedrawPanes
  1891        Handle hDispatchDriver
  1892        Get phDispatchDriver to hDispatchDriver
  1893        Send InvokeComMethod to hDispatchDriver 17 OLE_VT_VOID
  1894    End_Procedure
  1895
  1896    Procedure ComDestroyPane Variant llPane
  1897        Handle hDispatchDriver
  1898        Get phDispatchDriver to hDispatchDriver
  1899        Send PrepareParams to hDispatchDriver 1
  1900        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1901        Send InvokeComMethod to hDispatchDriver 18 OLE_VT_VOID
  1902    End_Procedure
  1903
  1904    Procedure ComDestroyAll
  1905        Handle hDispatchDriver
  1906        Get phDispatchDriver to hDispatchDriver
  1907        Send InvokeComMethod to hDispatchDriver 19 OLE_VT_VOID
  1908    End_Procedure
  1909
  1910    Procedure ComCloseAll
  1911        Handle hDispatchDriver
  1912        Get phDispatchDriver to hDispatchDriver
  1913        Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
  1914    End_Procedure
  1915
  1916    { MethodType=Property DesignTime=False }
  1917    Function ComPanesCount Returns Integer
  1918        Handle hDispatchDriver
  1919        Integer retVal
  1920        Get phDispatchDriver to hDispatchDriver
  1921        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
  1922        Function_Return retVal
  1923    End_Function
  1924
  1925    { MethodType=Property DesignTime=False }
  1926    Function ComTabPaintManager Returns Variant
  1927        Handle hDispatchDriver
  1928        Variant retVal
  1929        Get phDispatchDriver to hDispatchDriver
  1930        Get InvokeComMethod of hDispatchDriver 22 OLE_VT_DISPATCH to retVal
  1931        Function_Return retVal
  1932    End_Function
  1933
  1934    { MethodType=Property DesignTime=False }
  1935    Function ComPanelPaintManager Returns Variant
  1936        Handle hDispatchDriver
  1937        Variant retVal
  1938        Get phDispatchDriver to hDispatchDriver
  1939        Get InvokeComMethod of hDispatchDriver 23 OLE_VT_DISPATCH to retVal
  1940        Function_Return retVal
  1941    End_Function
  1942
  1943    { MethodType=Property DesignTime=False }
  1944    Function ComPanes Integer llnIndex Returns Variant
  1945        Handle hDispatchDriver
  1946        Variant retVal
  1947        Get phDispatchDriver to hDispatchDriver
  1948        Send PrepareParams to hDispatchDriver 1
  1949        Send DefineParam to hDispatchDriver OLE_VT_I4 llnIndex
  1950        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
  1951        Function_Return retVal
  1952    End_Function
  1953
  1954    { MethodType=Property DesignTime=False }
  1955    Function Com_NewEnum Returns Variant
  1956        Handle hDispatchDriver
  1957        Variant retVal
  1958        Get phDispatchDriver to hDispatchDriver
  1959        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
  1960        Function_Return retVal
  1961    End_Function
  1962
  1963    Procedure ComFloatPane Variant llPane Integer llLeft Integer llTop Integer llRight Integer llBottom
  1964        Handle hDispatchDriver
  1965        Get phDispatchDriver to hDispatchDriver
  1966        Send PrepareParams to hDispatchDriver 5
  1967        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  1968        Send DefineParam to hDispatchDriver OLE_VT_I4 llLeft
  1969        Send DefineParam to hDispatchDriver OLE_VT_I4 llTop
  1970        Send DefineParam to hDispatchDriver OLE_VT_I4 llRight
  1971        Send DefineParam to hDispatchDriver OLE_VT_I4 llBottom
  1972        Send InvokeComMethod to hDispatchDriver 26 OLE_VT_VOID
  1973    End_Procedure
  1974
  1975    Procedure ComNormalizeSplitters
  1976        Handle hDispatchDriver
  1977        Get phDispatchDriver to hDispatchDriver
  1978        Send InvokeComMethod to hDispatchDriver 27 OLE_VT_VOID
  1979    End_Procedure
  1980
  1981    { MethodType=Property DesignTime=False }
  1982    Function ComPaintManager Returns Variant
  1983        Handle hDispatchDriver
  1984        Variant retVal
  1985        Get phDispatchDriver to hDispatchDriver
  1986        Get InvokeComMethod of hDispatchDriver 28 OLE_VT_DISPATCH to retVal
  1987        Function_Return retVal
  1988    End_Function
  1989
  1990    { MethodType=Property DesignTime=False }
  1991    Function ComActivePane Returns Variant
  1992        Handle hDispatchDriver
  1993        Variant retVal
  1994        Get phDispatchDriver to hDispatchDriver
  1995        Get InvokeComMethod of hDispatchDriver 29 OLE_VT_DISPATCH to retVal
  1996        Function_Return retVal
  1997    End_Function
  1998
  1999    { MethodType=Property DesignTime=False }
  2000    Function ComToolTipContext Returns Variant
  2001        Handle hDispatchDriver
  2002        Variant retVal
  2003        Get phDispatchDriver to hDispatchDriver
  2004        Get InvokeComMethod of hDispatchDriver 30 OLE_VT_DISPATCH to retVal
  2005        Function_Return retVal
  2006    End_Function
  2007
  2008    Function ComCreateLayout Returns Variant
  2009        Handle hDispatchDriver
  2010        Variant retVal
  2011        Get phDispatchDriver to hDispatchDriver
  2012        Get InvokeComMethod of hDispatchDriver 31 OLE_VT_DISPATCH to retVal
  2013        Function_Return retVal
  2014    End_Function
  2015
  2016    Procedure ComGetLayout Variant llLayout
  2017        Handle hDispatchDriver
  2018        Get phDispatchDriver to hDispatchDriver
  2019        Send PrepareParams to hDispatchDriver 1
  2020        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llLayout
  2021        Send InvokeComMethod to hDispatchDriver 32 OLE_VT_VOID
  2022    End_Procedure
  2023
  2024    Procedure ComSetLayout Variant llLayout
  2025        Handle hDispatchDriver
  2026        Get phDispatchDriver to hDispatchDriver
  2027        Send PrepareParams to hDispatchDriver 1
  2028        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llLayout
  2029        Send InvokeComMethod to hDispatchDriver 33 OLE_VT_VOID
  2030    End_Procedure
  2031
  2032    Procedure ComSetMDIClient OLE_HANDLE llhWnd
  2033        Handle hDispatchDriver
  2034        Get phDispatchDriver to hDispatchDriver
  2035        Send PrepareParams to hDispatchDriver 1
  2036        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
  2037        Send InvokeComMethod to hDispatchDriver 34 OLE_VT_VOID
  2038    End_Procedure
  2039
  2040    Procedure ComUpdatePanes
  2041        Handle hDispatchDriver
  2042        Get phDispatchDriver to hDispatchDriver
  2043        Send InvokeComMethod to hDispatchDriver 35 OLE_VT_VOID
  2044    End_Procedure
  2045
  2046    Procedure ComAttachToWindow OLE_HANDLE llhWnd
  2047        Handle hDispatchDriver
  2048        Get phDispatchDriver to hDispatchDriver
  2049        Send PrepareParams to hDispatchDriver 1
  2050        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
  2051        Send InvokeComMethod to hDispatchDriver 50 OLE_VT_VOID
  2052    End_Procedure
  2053
  2054    Procedure ComDockPane Variant llPane Integer llcx Integer llcy OLEDockingDirection llDirection Variant llNeighbour
  2055        Handle hDispatchDriver
  2056        Get phDispatchDriver to hDispatchDriver
  2057        Send PrepareParams to hDispatchDriver 5
  2058        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  2059        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  2060        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  2061        Send DefineParam to hDispatchDriver OLE_VT_I4 llDirection
  2062        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llNeighbour
  2063        Send InvokeComMethod to hDispatchDriver 51 OLE_VT_VOID
  2064    End_Procedure
  2065
  2066    Procedure ComEnableKeyboardNavigate OLEDockingPaneKeyboardNavigate llOptions
  2067        Handle hDispatchDriver
  2068        Get phDispatchDriver to hDispatchDriver
  2069        Send PrepareParams to hDispatchDriver 1
  2070        Send DefineParam to hDispatchDriver OLE_VT_I4 llOptions
  2071        Send InvokeComMethod to hDispatchDriver 52 OLE_VT_VOID
  2072    End_Procedure
  2073
  2074    { MethodType=Property DesignTime=False }
  2075    Function ComLayout Returns Variant
  2076        Handle hDispatchDriver
  2077        Variant retVal
  2078        Get phDispatchDriver to hDispatchDriver
  2079        Get InvokeComMethod of hDispatchDriver 53 OLE_VT_DISPATCH to retVal
  2080        Function_Return retVal
  2081    End_Function
  2082
  2083    Procedure ComDockSidePane Variant llPane Integer llOffset OLEDockingDirection llDirection
  2084        Handle hDispatchDriver
  2085        Get phDispatchDriver to hDispatchDriver
  2086        Send PrepareParams to hDispatchDriver 3
  2087        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llPane
  2088        Send DefineParam to hDispatchDriver OLE_VT_I4 llOffset
  2089        Send DefineParam to hDispatchDriver OLE_VT_I4 llDirection
  2090        Send InvokeComMethod to hDispatchDriver 54 OLE_VT_VOID
  2091    End_Procedure
  2092
  2093    Procedure ComAboutBox
  2094        Handle hDispatchDriver
  2095        Get phDispatchDriver to hDispatchDriver
  2096        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  2097    End_Procedure
  2098End_Class
  2099
  2100// Event interface for DockingPane Control
  2101Class cSigCjCom_DDockingPaneFrameEvents is a Mixin
  2102
  2103    { MethodType=Event }
  2104    Procedure OnComAttachPane Variant llItem
  2105    End_Procedure
  2106
  2107    { MethodType=Event }
  2108    Procedure OnComGetClientBordersWidth Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
  2109    End_Procedure
  2110
  2111    { MethodType=Event }
  2112    Procedure OnComResize
  2113    End_Procedure
  2114
  2115    { MethodType=Event }
  2116    Procedure OnComAction OLEDockingPaneAction llAction Variant llPane Variant llContainer Boolean ByRef llCancel
  2117    End_Procedure
  2118
  2119    { MethodType=Event }
  2120    Procedure OnComResizeClient Integer llLeft Integer llTop Integer llRight Integer llBottom
  2121    End_Procedure
  2122
  2123    { MethodType=Event }
  2124    Procedure OnComRClick Variant llPane
  2125    End_Procedure
  2126
  2127    { MethodType=Event }
  2128    Procedure OnComPanePopupMenu Variant llPane Integer llx Integer lly Boolean ByRef llHandled
  2129    End_Procedure
  2130
  2131    { Visibility=Private }
  2132    Procedure RegisterComEvents
  2133        Send RegisterComEvent 1 msg_OnComAttachPane
  2134        Send RegisterComEvent 2 msg_OnComGetClientBordersWidth
  2135        Send RegisterComEvent 3 msg_OnComResize
  2136        Send RegisterComEvent 4 msg_OnComAction
  2137        Send RegisterComEvent 7 msg_OnComResizeClient
  2138        Send RegisterComEvent 8 msg_OnComRClick
  2139        Send RegisterComEvent 9 msg_OnComPanePopupMenu
  2140    End_Procedure
  2141End_Class
  2142
  2143// CoClass
  2144// Xtreme DockingPane Frame Control
  2145{ CLSID=L_cSigCjComDockingPaneFrame }
  2146Class cSigCjComDockingPaneFrame is a cComActiveXControl
  2147    Import_Class_Protocol cSigCjCom_DDockingPaneFrame
  2148    Import_Class_Protocol cSigCjCom_DDockingPaneFrameEvents
  2149
  2150    Procedure Construct_Object
  2151        Forward Send Construct_Object
  2152        Set psProgID to L_cSigCjComDockingPaneFrame
  2153        Set psEventId to "{665FF694-1D1A-4AFA-8DFF-8798A2181226}"
  2154        Set psLicenseKey to L_cSigCjKeyDockingPane
  2155        Set peAutoCreate to acDeferredAutoCreate
  2156    End_Procedure
  2157End_Class
  2158
  2159// Global Settings
  2160Class cSigCjComIDockingPaneGlobalSettings is a Mixin
  2161
  2162    { MethodType=Property DesignTime=False }
  2163    Function ComResourceFile Returns String
  2164        String retVal
  2165        Get ComProperty of (phDispatchDriver(Self)) 100 OLE_VT_BSTR to retVal
  2166        Function_Return retVal
  2167    End_Function
  2168
  2169    { MethodType=Property DesignTime=False }
  2170    Procedure Set ComResourceFile String value
  2171        Set ComProperty of (phDispatchDriver(Self)) 100 OLE_VT_BSTR to value
  2172    End_Procedure
  2173
  2174    { MethodType=Property DesignTime=False }
  2175    Function ComLicense Returns String
  2176        String retVal
  2177        Get ComProperty of (phDispatchDriver(Self)) 101 OLE_VT_BSTR to retVal
  2178        Function_Return retVal
  2179    End_Function
  2180
  2181    { MethodType=Property DesignTime=False }
  2182    Procedure Set ComLicense String value
  2183        Set ComProperty of (phDispatchDriver(Self)) 101 OLE_VT_BSTR to value
  2184    End_Procedure
  2185
  2186    { MethodType=Property DesignTime=False }
  2187    Function ComTitle Returns String
  2188        String retVal
  2189        Get ComProperty of (phDispatchDriver(Self)) 102 OLE_VT_BSTR to retVal
  2190        Function_Return retVal
  2191    End_Function
  2192
  2193    { MethodType=Property DesignTime=False }
  2194    Procedure Set ComTitle String value
  2195        Set ComProperty of (phDispatchDriver(Self)) 102 OLE_VT_BSTR to value
  2196    End_Procedure
  2197
  2198    { MethodType=Property DesignTime=False }
  2199    Function ComOffice2007Images Returns String
  2200        String retVal
  2201        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to retVal
  2202        Function_Return retVal
  2203    End_Function
  2204
  2205    { MethodType=Property DesignTime=False }
  2206    Procedure Set ComOffice2007Images String value
  2207        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to value
  2208    End_Procedure
  2209
  2210    { MethodType=Property DesignTime=False }
  2211    Function ComColorManager Returns Variant
  2212        Handle hDispatchDriver
  2213        Variant retVal
  2214        Get phDispatchDriver to hDispatchDriver
  2215        Get InvokeComMethod of hDispatchDriver 103 OLE_VT_DISPATCH to retVal
  2216        Function_Return retVal
  2217    End_Function
  2218
  2219    { MethodType=Property DesignTime=False }
  2220    Function ComVersion Returns String
  2221        Handle hDispatchDriver
  2222        String retVal
  2223        Get phDispatchDriver to hDispatchDriver
  2224        Get InvokeComMethod of hDispatchDriver 104 OLE_VT_BSTR to retVal
  2225        Function_Return retVal
  2226    End_Function
  2227
  2228    { MethodType=Property DesignTime=False }
  2229    Function ComUnicode Returns Boolean
  2230        Handle hDispatchDriver
  2231        Boolean retVal
  2232        Get phDispatchDriver to hDispatchDriver
  2233        Get InvokeComMethod of hDispatchDriver 105 OLE_VT_BOOL to retVal
  2234        Function_Return retVal
  2235    End_Function
  2236
  2237    { MethodType=Property DesignTime=False }
  2238    Function ComOcxPath Returns String
  2239        Handle hDispatchDriver
  2240        String retVal
  2241        Get phDispatchDriver to hDispatchDriver
  2242        Get InvokeComMethod of hDispatchDriver 106 OLE_VT_BSTR to retVal
  2243        Function_Return retVal
  2244    End_Function
  2245
  2246    Function ComCreatePropExchange Returns Variant
  2247        Handle hDispatchDriver
  2248        Variant retVal
  2249        Get phDispatchDriver to hDispatchDriver
  2250        Get InvokeComMethod of hDispatchDriver 107 OLE_VT_DISPATCH to retVal
  2251        Function_Return retVal
  2252    End_Function
  2253
  2254    { MethodType=Property DesignTime=False }
  2255    Function ComIcons Returns Variant
  2256        Handle hDispatchDriver
  2257        Variant retVal
  2258        Get phDispatchDriver to hDispatchDriver
  2259        Get InvokeComMethod of hDispatchDriver 108 OLE_VT_DISPATCH to retVal
  2260        Function_Return retVal
  2261    End_Function
  2262End_Class
  2263
  2264// CoClass
  2265// DockignPane Global Settings
  2266Class cSigCjComDockingPaneGlobalSettings is a cComAutomationObject
  2267    Import_Class_Protocol cSigCjComIDockingPaneGlobalSettings
  2268
  2269    Procedure Construct_Object
  2270        Forward Send Construct_Object
  2271        Set psProgID to L_cSigCjComDockingPaneGlobalSettings
  2272        Set peAutoCreate to acNoAutoCreate
  2273    End_Procedure
  2274End_Class
  2275
  2276//==============================================================================
  2277//End of package - SigCjW_DockingPane.pkg
  2278//==============================================================================
  2279