Module SigCjC_TabManager.pkg

     1//==============================================================================
     2// Project      : SigCj - VDF Classes for Codejock
     3// File         : SigCjC_TabManager.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
    38
    39Define OLEXTPTabAppearanceStyle for Integer
    40    Define OLExtpTabAppearancePropertyPage for 0
    41    Define OLExtpTabAppearancePropertyPageSelected for 1
    42    Define OLExtpTabAppearancePropertyPageFlat for 2
    43    Define OLExtpTabAppearancePropertyPage2003 for 3
    44    Define OLExtpTabAppearanceStateButtons for 4
    45    Define OLExtpTabAppearanceVisualStudio for 5
    46    Define OLExtpTabAppearanceFlat for 6
    47    Define OLExtpTabAppearanceExcel for 7
    48    Define OLExtpTabAppearanceVisio for 8
    49    Define OLExtpTabAppearanceVisualStudio2005 for 9
    50    Define OLExtpTabAppearancePropertyPage2007 for 10
    51    Define OLExtpTabAppearancePropertyPageAccess2007 for 11
    52
    53Define OLEXTPTabColorStyle for Integer
    54    Define OLExtpTabColorDefault for 1
    55    Define OLExtpTabColorVisualStudio for 2
    56    Define OLExtpTabColorOffice2003 for 4
    57    Define OLExtpTabColorWinXP for 8
    58    Define OLExtpTabColorWhidbey for 16
    59    Define OLExtpTabColorOffice2007 for 32
    60    Define OLExtpTabColorVisualStudio2008 for 64
    61    Define OLExtpTabColorAccess2007 for 128
    62
    63Define OLEXTPTabPosition for Integer
    64    Define OLExtpTabPositionTop for 0
    65    Define OLExtpTabPositionLeft for 1
    66    Define OLExtpTabPositionBottom for 2
    67    Define OLExtpTabPositionRight for 3
    68
    69Define OLEXTPTabLayoutStyle for Integer
    70    Define OLExtpTabLayoutAutoSize for 0
    71    Define OLExtpTabLayoutSizeToFit for 1
    72    Define OLExtpTabLayoutFixed for 2
    73    Define OLExtpTabLayoutCompressed for 3
    74    Define OLExtpTabLayoutMultiRow for 4
    75    Define OLExtpTabLayoutRotated for 5
    76
    77Define OLEXTPTabClientFrame for Integer
    78    Define OLExtpTabFrameBorder for 0
    79    Define OLExtpTabFrameSingleLine for 1
    80    Define OLExtpTabFrameNone for 2
    81
    82Define OLEXTPTabToolTipBehaviour for Integer
    83    Define OLExtpTabToolTipNever for 0
    84    Define OLExtpTabToolTipAlways for 1
    85    Define OLExtpTabToolTipShrinkedOnly for 2
    86
    87Define OLEXTPTabDrawTextFormat for Integer
    88    Define OLExtpTabDrawTextLeft for 0
    89    Define OLExtpTabDrawTextCenter for 1
    90    Define OLExtpTabDrawTextRight for 2
    91    Define OLExtpTabDrawTextVCenter for 4
    92
    93Class cSigCjComITabManagerMargin is a Mixin
    94
    95    { MethodType=Property DesignTime=False }
    96    Function ComLeft Returns Integer
    97        Integer retVal
    98        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
    99        Function_Return retVal
   100    End_Function
   101
   102    { MethodType=Property DesignTime=False }
   103    Procedure Set ComLeft Integer value
   104        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
   105    End_Procedure
   106
   107    { MethodType=Property DesignTime=False }
   108    Function ComTop Returns Integer
   109        Integer retVal
   110        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
   111        Function_Return retVal
   112    End_Function
   113
   114    { MethodType=Property DesignTime=False }
   115    Procedure Set ComTop Integer value
   116        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
   117    End_Procedure
   118
   119    { MethodType=Property DesignTime=False }
   120    Function ComRight Returns Integer
   121        Integer retVal
   122        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
   123        Function_Return retVal
   124    End_Function
   125
   126    { MethodType=Property DesignTime=False }
   127    Procedure Set ComRight Integer value
   128        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
   129    End_Procedure
   130
   131    { MethodType=Property DesignTime=False }
   132    Function ComBottom Returns Integer
   133        Integer retVal
   134        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
   135        Function_Return retVal
   136    End_Function
   137
   138    { MethodType=Property DesignTime=False }
   139    Procedure Set ComBottom Integer value
   140        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
   141    End_Procedure
   142
   143    Procedure ComSetRect Integer llLeft Integer llTop Integer llRight Integer llBottom
   144        Handle hDispatchDriver
   145        Get phDispatchDriver to hDispatchDriver
   146        Send PrepareParams to hDispatchDriver 4
   147        Send DefineParam to hDispatchDriver OLE_VT_I4 llLeft
   148        Send DefineParam to hDispatchDriver OLE_VT_I4 llTop
   149        Send DefineParam to hDispatchDriver OLE_VT_I4 llRight
   150        Send DefineParam to hDispatchDriver OLE_VT_I4 llBottom
   151        Send InvokeComMethod to hDispatchDriver 5 OLE_VT_VOID
   152    End_Procedure
   153End_Class
   154
   155// CoClass
   156Class cSigCjComTabManagerMargin is a cComAutomationObject
   157    Import_Class_Protocol cSigCjComITabManagerMargin
   158
   159    Procedure Construct_Object
   160        Forward Send Construct_Object
   161        Set peAutoCreate to acNoAutoCreate
   162    End_Procedure
   163End_Class
   164
   165Class cSigCjComITabPaintManagerColorSet is a Mixin
   166
   167    { MethodType=Property DesignTime=False }
   168    Function ComHeaderFaceLight Returns OLE_COLOR
   169        OLE_COLOR retVal
   170        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
   171        Function_Return retVal
   172    End_Function
   173
   174    { MethodType=Property DesignTime=False }
   175    Procedure Set ComHeaderFaceLight OLE_COLOR value
   176        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
   177    End_Procedure
   178
   179    { MethodType=Property DesignTime=False }
   180    Function ComHeaderFaceDark Returns OLE_COLOR
   181        OLE_COLOR retVal
   182        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
   183        Function_Return retVal
   184    End_Function
   185
   186    { MethodType=Property DesignTime=False }
   187    Procedure Set ComHeaderFaceDark OLE_COLOR value
   188        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
   189    End_Procedure
   190
   191    { MethodType=Property DesignTime=False }
   192    Function ComFrameBorder Returns OLE_COLOR
   193        OLE_COLOR retVal
   194        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
   195        Function_Return retVal
   196    End_Function
   197
   198    { MethodType=Property DesignTime=False }
   199    Procedure Set ComFrameBorder OLE_COLOR value
   200        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
   201    End_Procedure
   202
   203    { MethodType=Property DesignTime=False }
   204    Function ComControlFace Returns OLE_COLOR
   205        OLE_COLOR retVal
   206        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
   207        Function_Return retVal
   208    End_Function
   209
   210    { MethodType=Property DesignTime=False }
   211    Procedure Set ComControlFace OLE_COLOR value
   212        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
   213    End_Procedure
   214
   215    { MethodType=Property DesignTime=False }
   216    Function ComBorderHighlight Returns OLE_COLOR
   217        OLE_COLOR retVal
   218        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
   219        Function_Return retVal
   220    End_Function
   221
   222    { MethodType=Property DesignTime=False }
   223    Procedure Set ComBorderHighlight OLE_COLOR value
   224        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
   225    End_Procedure
   226
   227    { MethodType=Property DesignTime=False }
   228    Function ComButtonSelected Returns OLE_COLOR
   229        OLE_COLOR retVal
   230        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
   231        Function_Return retVal
   232    End_Function
   233
   234    { MethodType=Property DesignTime=False }
   235    Procedure Set ComButtonSelected OLE_COLOR value
   236        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
   237    End_Procedure
   238
   239    { MethodType=Property DesignTime=False }
   240    Function ComButtonNormal Returns OLE_COLOR
   241        OLE_COLOR retVal
   242        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
   243        Function_Return retVal
   244    End_Function
   245
   246    { MethodType=Property DesignTime=False }
   247    Procedure Set ComButtonNormal OLE_COLOR value
   248        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
   249    End_Procedure
   250
   251    { MethodType=Property DesignTime=False }
   252    Function ComNormalText Returns OLE_COLOR
   253        OLE_COLOR retVal
   254        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
   255        Function_Return retVal
   256    End_Function
   257
   258    { MethodType=Property DesignTime=False }
   259    Procedure Set ComNormalText OLE_COLOR value
   260        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
   261    End_Procedure
   262
   263    { MethodType=Property DesignTime=False }
   264    Function ComInActiveText Returns OLE_COLOR
   265        OLE_COLOR retVal
   266        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
   267        Function_Return retVal
   268    End_Function
   269
   270    { MethodType=Property DesignTime=False }
   271    Procedure Set ComInActiveText OLE_COLOR value
   272        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
   273    End_Procedure
   274
   275    { MethodType=Property DesignTime=False }
   276    Function ComSelectedText Returns OLE_COLOR
   277        OLE_COLOR retVal
   278        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
   279        Function_Return retVal
   280    End_Function
   281
   282    { MethodType=Property DesignTime=False }
   283    Procedure Set ComSelectedText OLE_COLOR value
   284        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
   285    End_Procedure
   286
   287    { MethodType=Property DesignTime=False }
   288    Function ComHighlightText Returns OLE_COLOR
   289        OLE_COLOR retVal
   290        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
   291        Function_Return retVal
   292    End_Function
   293
   294    { MethodType=Property DesignTime=False }
   295    Procedure Set ComHighlightText OLE_COLOR value
   296        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
   297    End_Procedure
   298
   299    { MethodType=Property DesignTime=False }
   300    Function ComDisabledText Returns OLE_COLOR
   301        OLE_COLOR retVal
   302        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
   303        Function_Return retVal
   304    End_Function
   305
   306    { MethodType=Property DesignTime=False }
   307    Procedure Set ComDisabledText OLE_COLOR value
   308        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
   309    End_Procedure
   310
   311    { MethodType=Property DesignTime=False }
   312    Function ComTabExcelSelectedLeftInnerBorder Returns OLE_COLOR
   313        OLE_COLOR retVal
   314        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
   315        Function_Return retVal
   316    End_Function
   317
   318    { MethodType=Property DesignTime=False }
   319    Procedure Set ComTabExcelSelectedLeftInnerBorder OLE_COLOR value
   320        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
   321    End_Procedure
   322
   323    { MethodType=Property DesignTime=False }
   324    Function ComTabExcelSelectedTopInnerBorder Returns OLE_COLOR
   325        OLE_COLOR retVal
   326        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
   327        Function_Return retVal
   328    End_Function
   329
   330    { MethodType=Property DesignTime=False }
   331    Procedure Set ComTabExcelSelectedTopInnerBorder OLE_COLOR value
   332        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
   333    End_Procedure
   334
   335    { MethodType=Property DesignTime=False }
   336    Function ComTabExcelSelectedRightInnerBorder Returns OLE_COLOR
   337        OLE_COLOR retVal
   338        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
   339        Function_Return retVal
   340    End_Function
   341
   342    { MethodType=Property DesignTime=False }
   343    Procedure Set ComTabExcelSelectedRightInnerBorder OLE_COLOR value
   344        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
   345    End_Procedure
   346
   347    { MethodType=Property DesignTime=False }
   348    Function ComTabExcelSelectedLeftOuterBorder Returns OLE_COLOR
   349        OLE_COLOR retVal
   350        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to retVal
   351        Function_Return retVal
   352    End_Function
   353
   354    { MethodType=Property DesignTime=False }
   355    Procedure Set ComTabExcelSelectedLeftOuterBorder OLE_COLOR value
   356        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to value
   357    End_Procedure
   358
   359    { MethodType=Property DesignTime=False }
   360    Function ComTabExcelSelectedRightOuterBorder Returns OLE_COLOR
   361        OLE_COLOR retVal
   362        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to retVal
   363        Function_Return retVal
   364    End_Function
   365
   366    { MethodType=Property DesignTime=False }
   367    Procedure Set ComTabExcelSelectedRightOuterBorder OLE_COLOR value
   368        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to value
   369    End_Procedure
   370
   371    { MethodType=Property DesignTime=False }
   372    Function ComTabExcelSelectedTopOuterBorder Returns OLE_COLOR
   373        OLE_COLOR retVal
   374        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
   375        Function_Return retVal
   376    End_Function
   377
   378    { MethodType=Property DesignTime=False }
   379    Procedure Set ComTabExcelSelectedTopOuterBorder OLE_COLOR value
   380        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
   381    End_Procedure
   382
   383    { MethodType=Property DesignTime=False }
   384    Function ComTabExcelNormalLeftInnerBorder Returns OLE_COLOR
   385        OLE_COLOR retVal
   386        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
   387        Function_Return retVal
   388    End_Function
   389
   390    { MethodType=Property DesignTime=False }
   391    Procedure Set ComTabExcelNormalLeftInnerBorder OLE_COLOR value
   392        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
   393    End_Procedure
   394
   395    { MethodType=Property DesignTime=False }
   396    Function ComTabExcelNormalTopInnerBorder Returns OLE_COLOR
   397        OLE_COLOR retVal
   398        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to retVal
   399        Function_Return retVal
   400    End_Function
   401
   402    { MethodType=Property DesignTime=False }
   403    Procedure Set ComTabExcelNormalTopInnerBorder OLE_COLOR value
   404        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to value
   405    End_Procedure
   406
   407    { MethodType=Property DesignTime=False }
   408    Function ComTabExcelNormalRightInnerBorder Returns OLE_COLOR
   409        OLE_COLOR retVal
   410        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to retVal
   411        Function_Return retVal
   412    End_Function
   413
   414    { MethodType=Property DesignTime=False }
   415    Procedure Set ComTabExcelNormalRightInnerBorder OLE_COLOR value
   416        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to value
   417    End_Procedure
   418
   419    { MethodType=Property DesignTime=False }
   420    Function ComTabExcelNormalLeftOuterBorder Returns OLE_COLOR
   421        OLE_COLOR retVal
   422        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
   423        Function_Return retVal
   424    End_Function
   425
   426    { MethodType=Property DesignTime=False }
   427    Procedure Set ComTabExcelNormalLeftOuterBorder OLE_COLOR value
   428        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
   429    End_Procedure
   430
   431    { MethodType=Property DesignTime=False }
   432    Function ComTabExcelNormalRightOuterBorder Returns OLE_COLOR
   433        OLE_COLOR retVal
   434        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to retVal
   435        Function_Return retVal
   436    End_Function
   437
   438    { MethodType=Property DesignTime=False }
   439    Procedure Set ComTabExcelNormalRightOuterBorder OLE_COLOR value
   440        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to value
   441    End_Procedure
   442
   443    { MethodType=Property DesignTime=False }
   444    Function ComTabExcelNormalTopOuterBorder Returns OLE_COLOR
   445        OLE_COLOR retVal
   446        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to retVal
   447        Function_Return retVal
   448    End_Function
   449
   450    { MethodType=Property DesignTime=False }
   451    Procedure Set ComTabExcelNormalTopOuterBorder OLE_COLOR value
   452        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to value
   453    End_Procedure
   454
   455    { MethodType=Property DesignTime=False }
   456    Function ComTabPropertyPageHighlight Returns OLE_COLOR
   457        OLE_COLOR retVal
   458        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to retVal
   459        Function_Return retVal
   460    End_Function
   461
   462    { MethodType=Property DesignTime=False }
   463    Procedure Set ComTabPropertyPageHighlight OLE_COLOR value
   464        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to value
   465    End_Procedure
   466
   467    { MethodType=Property DesignTime=False }
   468    Function ComTabPropertyPageShadow Returns OLE_COLOR
   469        OLE_COLOR retVal
   470        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
   471        Function_Return retVal
   472    End_Function
   473
   474    { MethodType=Property DesignTime=False }
   475    Procedure Set ComTabPropertyPageShadow OLE_COLOR value
   476        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
   477    End_Procedure
   478
   479    { MethodType=Property DesignTime=False }
   480    Function ComTabPropertyPageDarkShadow Returns OLE_COLOR
   481        OLE_COLOR retVal
   482        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
   483        Function_Return retVal
   484    End_Function
   485
   486    { MethodType=Property DesignTime=False }
   487    Procedure Set ComTabPropertyPageDarkShadow OLE_COLOR value
   488        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
   489    End_Procedure
   490
   491    { MethodType=Property DesignTime=False }
   492    Function ComTabPropertyPage2003DarkShadow Returns OLE_COLOR
   493        OLE_COLOR retVal
   494        Get ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_I4 to retVal
   495        Function_Return retVal
   496    End_Function
   497
   498    { MethodType=Property DesignTime=False }
   499    Procedure Set ComTabPropertyPage2003DarkShadow OLE_COLOR value
   500        Set ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_I4 to value
   501    End_Procedure
   502
   503    { MethodType=Property DesignTime=False }
   504    Function ComTabPropertyPage2003FrameBorder Returns OLE_COLOR
   505        OLE_COLOR retVal
   506        Get ComProperty of (phDispatchDriver(Self)) 29 OLE_VT_I4 to retVal
   507        Function_Return retVal
   508    End_Function
   509
   510    { MethodType=Property DesignTime=False }
   511    Procedure Set ComTabPropertyPage2003FrameBorder OLE_COLOR value
   512        Set ComProperty of (phDispatchDriver(Self)) 29 OLE_VT_I4 to value
   513    End_Procedure
   514
   515    { MethodType=Property DesignTime=False }
   516    Function ComTabPropertyPage2003BorderLeftHighlight Returns OLE_COLOR
   517        OLE_COLOR retVal
   518        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_I4 to retVal
   519        Function_Return retVal
   520    End_Function
   521
   522    { MethodType=Property DesignTime=False }
   523    Procedure Set ComTabPropertyPage2003BorderLeftHighlight OLE_COLOR value
   524        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_I4 to value
   525    End_Procedure
   526
   527    { MethodType=Property DesignTime=False }
   528    Function ComTabPropertyPage2003BorderTopHighlight Returns OLE_COLOR
   529        OLE_COLOR retVal
   530        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to retVal
   531        Function_Return retVal
   532    End_Function
   533
   534    { MethodType=Property DesignTime=False }
   535    Procedure Set ComTabPropertyPage2003BorderTopHighlight OLE_COLOR value
   536        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to value
   537    End_Procedure
   538
   539    { MethodType=Property DesignTime=False }
   540    Function ComTabStateButtonFaceLight Returns OLE_COLOR
   541        OLE_COLOR retVal
   542        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_I4 to retVal
   543        Function_Return retVal
   544    End_Function
   545
   546    { MethodType=Property DesignTime=False }
   547    Procedure Set ComTabStateButtonFaceLight OLE_COLOR value
   548        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_I4 to value
   549    End_Procedure
   550
   551    { MethodType=Property DesignTime=False }
   552    Function ComTabStateButtonFaceDark Returns OLE_COLOR
   553        OLE_COLOR retVal
   554        Get ComProperty of (phDispatchDriver(Self)) 33 OLE_VT_I4 to retVal
   555        Function_Return retVal
   556    End_Function
   557
   558    { MethodType=Property DesignTime=False }
   559    Procedure Set ComTabStateButtonFaceDark OLE_COLOR value
   560        Set ComProperty of (phDispatchDriver(Self)) 33 OLE_VT_I4 to value
   561    End_Procedure
   562
   563    { MethodType=Property DesignTime=False }
   564    Function ComTabStateButtonBorderTopLeft Returns OLE_COLOR
   565        OLE_COLOR retVal
   566        Get ComProperty of (phDispatchDriver(Self)) 34 OLE_VT_I4 to retVal
   567        Function_Return retVal
   568    End_Function
   569
   570    { MethodType=Property DesignTime=False }
   571    Procedure Set ComTabStateButtonBorderTopLeft OLE_COLOR value
   572        Set ComProperty of (phDispatchDriver(Self)) 34 OLE_VT_I4 to value
   573    End_Procedure
   574
   575    { MethodType=Property DesignTime=False }
   576    Function ComTabStateButtonBorderBottomRight Returns OLE_COLOR
   577        OLE_COLOR retVal
   578        Get ComProperty of (phDispatchDriver(Self)) 35 OLE_VT_I4 to retVal
   579        Function_Return retVal
   580    End_Function
   581
   582    { MethodType=Property DesignTime=False }
   583    Procedure Set ComTabStateButtonBorderBottomRight OLE_COLOR value
   584        Set ComProperty of (phDispatchDriver(Self)) 35 OLE_VT_I4 to value
   585    End_Procedure
   586
   587    { MethodType=Property DesignTime=False }
   588    Function ComPaneFace Returns OLE_COLOR
   589        OLE_COLOR retVal
   590        Get ComProperty of (phDispatchDriver(Self)) 36 OLE_VT_I4 to retVal
   591        Function_Return retVal
   592    End_Function
   593
   594    { MethodType=Property DesignTime=False }
   595    Procedure Set ComPaneFace OLE_COLOR value
   596        Set ComProperty of (phDispatchDriver(Self)) 36 OLE_VT_I4 to value
   597    End_Procedure
   598
   599    { MethodType=Property DesignTime=False }
   600    Function ComButtonHighlighted Returns OLE_COLOR
   601        OLE_COLOR retVal
   602        Get ComProperty of (phDispatchDriver(Self)) 37 OLE_VT_I4 to retVal
   603        Function_Return retVal
   604    End_Function
   605
   606    { MethodType=Property DesignTime=False }
   607    Procedure Set ComButtonHighlighted OLE_COLOR value
   608        Set ComProperty of (phDispatchDriver(Self)) 37 OLE_VT_I4 to value
   609    End_Procedure
   610End_Class
   611
   612// CoClass
   613Class cSigCjComTabPaintManagerColorSet is a cComAutomationObject
   614    Import_Class_Protocol cSigCjComITabPaintManagerColorSet
   615
   616    Procedure Construct_Object
   617        Forward Send Construct_Object
   618        Set peAutoCreate to acNoAutoCreate
   619    End_Procedure
   620End_Class
   621
   622Class cSigCjComITabPaintManager is a Mixin
   623
   624    { MethodType=Property DesignTime=False }
   625    Function ComAppearance Returns OLEXTPTabAppearanceStyle
   626        OLEXTPTabAppearanceStyle retVal
   627        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
   628        Function_Return retVal
   629    End_Function
   630
   631    { MethodType=Property DesignTime=False }
   632    Procedure Set ComAppearance OLEXTPTabAppearanceStyle value
   633        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
   634    End_Procedure
   635
   636    { MethodType=Property DesignTime=False }
   637    Function ComColor Returns OLEXTPTabColorStyle
   638        OLEXTPTabColorStyle retVal
   639        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
   640        Function_Return retVal
   641    End_Function
   642
   643    { MethodType=Property DesignTime=False }
   644    Procedure Set ComColor OLEXTPTabColorStyle value
   645        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
   646    End_Procedure
   647
   648    { MethodType=Property DesignTime=False }
   649    Function ComLayout Returns OLEXTPTabLayoutStyle
   650        OLEXTPTabLayoutStyle retVal
   651        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
   652        Function_Return retVal
   653    End_Function
   654
   655    { MethodType=Property DesignTime=False }
   656    Procedure Set ComLayout OLEXTPTabLayoutStyle value
   657        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
   658    End_Procedure
   659
   660    { MethodType=Property DesignTime=False }
   661    Function ComPosition Returns OLEXTPTabPosition
   662        OLEXTPTabPosition retVal
   663        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
   664        Function_Return retVal
   665    End_Function
   666
   667    { MethodType=Property DesignTime=False }
   668    Procedure Set ComPosition OLEXTPTabPosition value
   669        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
   670    End_Procedure
   671
   672    { MethodType=Property DesignTime=False }
   673    Function ComBoldSelected Returns Boolean
   674        Boolean retVal
   675        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
   676        Function_Return retVal
   677    End_Function
   678
   679    { MethodType=Property DesignTime=False }
   680    Procedure Set ComBoldSelected Boolean value
   681        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
   682    End_Procedure
   683
   684    { MethodType=Property DesignTime=False }
   685    Function ComHotTracking Returns Boolean
   686        Boolean retVal
   687        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
   688        Function_Return retVal
   689    End_Function
   690
   691    { MethodType=Property DesignTime=False }
   692    Procedure Set ComHotTracking Boolean value
   693        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
   694    End_Procedure
   695
   696    { MethodType=Property DesignTime=False }
   697    Function ComShowIcons Returns Boolean
   698        Boolean retVal
   699        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
   700        Function_Return retVal
   701    End_Function
   702
   703    { MethodType=Property DesignTime=False }
   704    Procedure Set ComShowIcons Boolean value
   705        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
   706    End_Procedure
   707
   708    { MethodType=Property DesignTime=False }
   709    Function ComDisableLunaColors Returns Boolean
   710        Boolean retVal
   711        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
   712        Function_Return retVal
   713    End_Function
   714
   715    { MethodType=Property DesignTime=False }
   716    Procedure Set ComDisableLunaColors Boolean value
   717        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
   718    End_Procedure
   719
   720    { MethodType=Property DesignTime=False }
   721    Function ComOneNoteColors Returns Boolean
   722        Boolean retVal
   723        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to retVal
   724        Function_Return retVal
   725    End_Function
   726
   727    { MethodType=Property DesignTime=False }
   728    Procedure Set ComOneNoteColors Boolean value
   729        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to value
   730    End_Procedure
   731
   732    { MethodType=Property DesignTime=False }
   733    Function ComClientFrame Returns OLEXTPTabClientFrame
   734        OLEXTPTabClientFrame retVal
   735        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
   736        Function_Return retVal
   737    End_Function
   738
   739    { MethodType=Property DesignTime=False }
   740    Procedure Set ComClientFrame OLEXTPTabClientFrame value
   741        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
   742    End_Procedure
   743
   744    { MethodType=Property DesignTime=False }
   745    Function ComStaticFrame Returns Boolean
   746        Boolean retVal
   747        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
   748        Function_Return retVal
   749    End_Function
   750
   751    { MethodType=Property DesignTime=False }
   752    Procedure Set ComStaticFrame Boolean value
   753        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
   754    End_Procedure
   755
   756    { MethodType=Property DesignTime=False }
   757    Function ComDrawTextPathEllipsis Returns Boolean
   758        Boolean retVal
   759        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BOOL to retVal
   760        Function_Return retVal
   761    End_Function
   762
   763    { MethodType=Property DesignTime=False }
   764    Procedure Set ComDrawTextPathEllipsis Boolean value
   765        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BOOL to value
   766    End_Procedure
   767
   768    { MethodType=Property DesignTime=False }
   769    Function ComDrawTextNoPrefix Returns Boolean
   770        Boolean retVal
   771        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_BOOL to retVal
   772        Function_Return retVal
   773    End_Function
   774
   775    { MethodType=Property DesignTime=False }
   776    Procedure Set ComDrawTextNoPrefix Boolean value
   777        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_BOOL to value
   778    End_Procedure
   779
   780    { MethodType=Property DesignTime=False }
   781    Function ComFont Returns Variant
   782        Variant retVal
   783        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
   784        Function_Return retVal
   785    End_Function
   786
   787    { MethodType=Property DesignTime=False }
   788    Procedure Set ComFont Variant value
   789        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
   790    End_Procedure
   791
   792    { MethodType=Property DesignTime=False }
   793    Function ComMultiRowFixedSelection Returns Boolean
   794        Boolean retVal
   795        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to retVal
   796        Function_Return retVal
   797    End_Function
   798
   799    { MethodType=Property DesignTime=False }
   800    Procedure Set ComMultiRowFixedSelection Boolean value
   801        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to value
   802    End_Procedure
   803
   804    { MethodType=Property DesignTime=False }
   805    Function ComMultiRowJustified Returns Boolean
   806        Boolean retVal
   807        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_BOOL to retVal
   808        Function_Return retVal
   809    End_Function
   810
   811    { MethodType=Property DesignTime=False }
   812    Procedure Set ComMultiRowJustified Boolean value
   813        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_BOOL to value
   814    End_Procedure
   815
   816    { MethodType=Property DesignTime=False }
   817    Function ComToolTipBehaviour Returns OLEXTPTabToolTipBehaviour
   818        OLEXTPTabToolTipBehaviour retVal
   819        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to retVal
   820        Function_Return retVal
   821    End_Function
   822
   823    { MethodType=Property DesignTime=False }
   824    Procedure Set ComToolTipBehaviour OLEXTPTabToolTipBehaviour value
   825        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to value
   826    End_Procedure
   827
   828    { MethodType=Property DesignTime=False }
   829    Function ComSelectTabOnDragOver Returns Boolean
   830        Boolean retVal
   831        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to retVal
   832        Function_Return retVal
   833    End_Function
   834
   835    { MethodType=Property DesignTime=False }
   836    Procedure Set ComSelectTabOnDragOver Boolean value
   837        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to value
   838    End_Procedure
   839
   840    { MethodType=Property DesignTime=False }
   841    Function ComFillBackground Returns Boolean
   842        Boolean retVal
   843        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_BOOL to retVal
   844        Function_Return retVal
   845    End_Function
   846
   847    { MethodType=Property DesignTime=False }
   848    Procedure Set ComFillBackground Boolean value
   849        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_BOOL to value
   850    End_Procedure
   851
   852    { MethodType=Property DesignTime=False }
   853    Function ComRotateImageOnVerticalDraw Returns Boolean
   854        Boolean retVal
   855        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BOOL to retVal
   856        Function_Return retVal
   857    End_Function
   858
   859    { MethodType=Property DesignTime=False }
   860    Procedure Set ComRotateImageOnVerticalDraw Boolean value
   861        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_BOOL to value
   862    End_Procedure
   863
   864    { MethodType=Property DesignTime=False }
   865    Function ComFixedTabWidth Returns Integer
   866        Integer retVal
   867        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
   868        Function_Return retVal
   869    End_Function
   870
   871    { MethodType=Property DesignTime=False }
   872    Procedure Set ComFixedTabWidth Integer value
   873        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
   874    End_Procedure
   875
   876    { MethodType=Property DesignTime=False }
   877    Function ComMinTabWidth Returns Integer
   878        Integer retVal
   879        Get ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_I4 to retVal
   880        Function_Return retVal
   881    End_Function
   882
   883    { MethodType=Property DesignTime=False }
   884    Procedure Set ComMinTabWidth Integer value
   885        Set ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_I4 to value
   886    End_Procedure
   887
   888    { MethodType=Property DesignTime=False }
   889    Function ComMaxTabWidth Returns Integer
   890        Integer retVal
   891        Get ComProperty of (phDispatchDriver(Self)) 29 OLE_VT_I4 to retVal
   892        Function_Return retVal
   893    End_Function
   894
   895    { MethodType=Property DesignTime=False }
   896    Procedure Set ComMaxTabWidth Integer value
   897        Set ComProperty of (phDispatchDriver(Self)) 29 OLE_VT_I4 to value
   898    End_Procedure
   899
   900    { MethodType=Property DesignTime=False }
   901    Function ComDrawTextFormat Returns OLEXTPTabDrawTextFormat
   902        OLEXTPTabDrawTextFormat retVal
   903        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_I4 to retVal
   904        Function_Return retVal
   905    End_Function
   906
   907    { MethodType=Property DesignTime=False }
   908    Procedure Set ComDrawTextFormat OLEXTPTabDrawTextFormat value
   909        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_I4 to value
   910    End_Procedure
   911
   912    { MethodType=Property DesignTime=False }
   913    Function ComShowTabs Returns Boolean
   914        Boolean retVal
   915        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to retVal
   916        Function_Return retVal
   917    End_Function
   918
   919    { MethodType=Property DesignTime=False }
   920    Procedure Set ComShowTabs Boolean value
   921        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to value
   922    End_Procedure
   923
   924    { MethodType=Property DesignTime=False }
   925    Function ComClearTypeTextQuality Returns Boolean
   926        Boolean retVal
   927        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to retVal
   928        Function_Return retVal
   929    End_Function
   930
   931    { MethodType=Property DesignTime=False }
   932    Procedure Set ComClearTypeTextQuality Boolean value
   933        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to value
   934    End_Procedure
   935
   936    Function ComIsColorSupported OLEXTPTabColorStyle llColor Returns Boolean
   937        Handle hDispatchDriver
   938        Boolean retVal
   939        Get phDispatchDriver to hDispatchDriver
   940        Send PrepareParams to hDispatchDriver 1
   941        Send DefineParam to hDispatchDriver OLE_VT_I4 llColor
   942        Get InvokeComMethod of hDispatchDriver 10 OLE_VT_BOOL to retVal
   943        Function_Return retVal
   944    End_Function
   945
   946    { MethodType=Property DesignTime=False }
   947    Function ComClientMargin Returns Variant
   948        Handle hDispatchDriver
   949        Variant retVal
   950        Get phDispatchDriver to hDispatchDriver
   951        Get InvokeComMethod of hDispatchDriver 13 OLE_VT_DISPATCH to retVal
   952        Function_Return retVal
   953    End_Function
   954
   955    { MethodType=Property DesignTime=False }
   956    Function ComControlMargin Returns Variant
   957        Handle hDispatchDriver
   958        Variant retVal
   959        Get phDispatchDriver to hDispatchDriver
   960        Get InvokeComMethod of hDispatchDriver 14 OLE_VT_DISPATCH to retVal
   961        Function_Return retVal
   962    End_Function
   963
   964    { MethodType=Property DesignTime=False }
   965    Function ComHeaderMargin Returns Variant
   966        Handle hDispatchDriver
   967        Variant retVal
   968        Get phDispatchDriver to hDispatchDriver
   969        Get InvokeComMethod of hDispatchDriver 15 OLE_VT_DISPATCH to retVal
   970        Function_Return retVal
   971    End_Function
   972
   973    { MethodType=Property DesignTime=False }
   974    Function ComButtonMargin Returns Variant
   975        Handle hDispatchDriver
   976        Variant retVal
   977        Get phDispatchDriver to hDispatchDriver
   978        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_DISPATCH to retVal
   979        Function_Return retVal
   980    End_Function
   981
   982    { MethodType=Property DesignTime=False }
   983    Function ComColorSet Returns Variant
   984        Handle hDispatchDriver
   985        Variant retVal
   986        Get phDispatchDriver to hDispatchDriver
   987        Get InvokeComMethod of hDispatchDriver 19 OLE_VT_DISPATCH to retVal
   988        Function_Return retVal
   989    End_Function
   990
   991    Procedure ComSetIconSize Integer llcx Integer llcy
   992        Handle hDispatchDriver
   993        Get phDispatchDriver to hDispatchDriver
   994        Send PrepareParams to hDispatchDriver 2
   995        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
   996        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
   997        Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
   998    End_Procedure
   999End_Class
  1000
  1001// CoClass
  1002Class cSigCjComTabPaintManager is a cComAutomationObject
  1003    Import_Class_Protocol cSigCjComITabPaintManager
  1004
  1005    Procedure Construct_Object
  1006        Forward Send Construct_Object
  1007        Set peAutoCreate to acNoAutoCreate
  1008    End_Procedure
  1009End_Class
  1010
  1011Class cSigCjComITabControlItem is a Mixin
  1012
  1013    { MethodType=Property DesignTime=False }
  1014    Function ComCaption Returns String
  1015        String retVal
  1016        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
  1017        Function_Return retVal
  1018    End_Function
  1019
  1020    { MethodType=Property DesignTime=False }
  1021    Procedure Set ComCaption String value
  1022        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
  1023    End_Procedure
  1024
  1025    { MethodType=Property DesignTime=False }
  1026    Function ComTag Returns Variant
  1027        Variant retVal
  1028        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_VARIANT to retVal
  1029        Function_Return retVal
  1030    End_Function
  1031
  1032    { MethodType=Property DesignTime=False }
  1033    Procedure Set ComTag Variant value
  1034        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_VARIANT to value
  1035    End_Procedure
  1036
  1037    { MethodType=Property DesignTime=False }
  1038    Function ComSelected Returns Boolean
  1039        Boolean retVal
  1040        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  1041        Function_Return retVal
  1042    End_Function
  1043
  1044    { MethodType=Property DesignTime=False }
  1045    Procedure Set ComSelected Boolean value
  1046        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  1047    End_Procedure
  1048
  1049    { MethodType=Property DesignTime=False }
  1050    Function ComImage Returns Integer
  1051        Integer retVal
  1052        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  1053        Function_Return retVal
  1054    End_Function
  1055
  1056    { MethodType=Property DesignTime=False }
  1057    Procedure Set ComImage Integer value
  1058        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  1059    End_Procedure
  1060
  1061    { MethodType=Property DesignTime=False }
  1062    Function ComColor Returns OLE_COLOR
  1063        OLE_COLOR retVal
  1064        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  1065        Function_Return retVal
  1066    End_Function
  1067
  1068    { MethodType=Property DesignTime=False }
  1069    Procedure Set ComColor OLE_COLOR value
  1070        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  1071    End_Procedure
  1072
  1073    { MethodType=Property DesignTime=False }
  1074    Function ComVisible Returns Boolean
  1075        Boolean retVal
  1076        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  1077        Function_Return retVal
  1078    End_Function
  1079
  1080    { MethodType=Property DesignTime=False }
  1081    Procedure Set ComVisible Boolean value
  1082        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  1083    End_Procedure
  1084
  1085    { MethodType=Property DesignTime=False }
  1086    Function ComEnabled Returns Boolean
  1087        Boolean retVal
  1088        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to retVal
  1089        Function_Return retVal
  1090    End_Function
  1091
  1092    { MethodType=Property DesignTime=False }
  1093    Procedure Set ComEnabled Boolean value
  1094        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to value
  1095    End_Procedure
  1096
  1097    { MethodType=Property DesignTime=False }
  1098    Function ComToolTip Returns String
  1099        String retVal
  1100        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BSTR to retVal
  1101        Function_Return retVal
  1102    End_Function
  1103
  1104    { MethodType=Property DesignTime=False }
  1105    Procedure Set ComToolTip String value
  1106        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BSTR to value
  1107    End_Procedure
  1108
  1109    { MethodType=Property DesignTime=False }
  1110    Function ComClosable Returns Boolean
  1111        Boolean retVal
  1112        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
  1113        Function_Return retVal
  1114    End_Function
  1115
  1116    { MethodType=Property DesignTime=False }
  1117    Procedure Set ComClosable Boolean value
  1118        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
  1119    End_Procedure
  1120
  1121    { MethodType=Property DesignTime=False }
  1122    Function ComHandle Returns OLE_HANDLE
  1123        OLE_HANDLE retVal
  1124        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  1125        Function_Return retVal
  1126    End_Function
  1127
  1128    { MethodType=Property DesignTime=False }
  1129    Procedure Set ComHandle OLE_HANDLE value
  1130        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  1131    End_Procedure
  1132
  1133    { MethodType=Property DesignTime=False }
  1134    Function ComIndex Returns Integer
  1135        Handle hDispatchDriver
  1136        Integer retVal
  1137        Get phDispatchDriver to hDispatchDriver
  1138        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_I4 to retVal
  1139        Function_Return retVal
  1140    End_Function
  1141
  1142    Procedure ComMove Integer llIndex
  1143        Handle hDispatchDriver
  1144        Get phDispatchDriver to hDispatchDriver
  1145        Send PrepareParams to hDispatchDriver 1
  1146        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  1147        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
  1148    End_Procedure
  1149
  1150    Procedure ComGetRect Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
  1151        Handle hDispatchDriver
  1152        Get phDispatchDriver to hDispatchDriver
  1153        Send PrepareParams to hDispatchDriver 4
  1154        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llLeft
  1155        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llTop
  1156        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llRight
  1157        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llBottom
  1158        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  1159    End_Procedure
  1160
  1161    Procedure ComEnsureVisible
  1162        Handle hDispatchDriver
  1163        Get phDispatchDriver to hDispatchDriver
  1164        Send InvokeComMethod to hDispatchDriver 14 OLE_VT_VOID
  1165    End_Procedure
  1166End_Class
  1167
  1168// CoClass
  1169Class cSigCjComTabControlItem is a cComAutomationObject
  1170    Import_Class_Protocol cSigCjComITabControlItem
  1171
  1172    Procedure Construct_Object
  1173        Forward Send Construct_Object
  1174        Set peAutoCreate to acNoAutoCreate
  1175    End_Procedure
  1176End_Class
  1177
  1178//==============================================================================
  1179//End of package - SigCjC_TabManager.pkg
  1180//==============================================================================
  1181