Module SigCjW_Controls.pkg

     1//==============================================================================
     2// Project      : SigCj - VDF Classes for Codejock
     3// File         : SigCjW_Controls.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_DataObjectFiles.pkg
    41Use SigCjC_ImageManager.pkg
    42Use SigCjC_MarkupContext.pkg
    43Use SigCjC_PropExchange.pkg
    44Use SigCjC_TabManager.pkg
    45Use SigCjC_ToolTipContext.pkg
    46
    47Define OLEOLEDropConstants for Integer
    48    Define OLExtpOLEDropNone for 0
    49    Define OLExtpOLEDropManual for 1
    50
    51Define OLEOLEDragConstants for Integer
    52    Define OLExtpOLEDragManual for 0
    53    Define OLExtpOLEDragAutomatic for 1
    54
    55Define OLECommonDialogColorConstants for Integer
    56    // Entire dialog box is displayed, including the Define Custom Colors section
    57    Define OLExtpCCFullOpen for 2
    58    // Causes the dialog box to display a Help button
    59    Define OLExtpCCShowHelp for 8
    60    // Disables the Define Custom Colors command button and prevents the user from defining custom colors
    61    Define OLExtpCCPreventFullOpen for 4
    62    // Sets the initial color value for the dialog box 
    63    Define OLExtpCCRGBInit for 1
    64
    65Define OLECommonDialogFileOpenConstants for Integer
    66    // Specifies that the File Namelist box allows multiple selections.
    67    Define OLExtpOFNAllowMultiselect for 512
    68    // Specifies that the dialog box prompts the user to create a file that doesn't currently exist. This flag automatically sets the xtpOFNPathMustExist and xtpOFNFileMustExist flags. 
    69    Define OLExtpOFNCreatePrompt for 8192
    70    // Use the Explorer-like Open A File dialog box template. Common dialogs that use this flag do not work under Windows NT using the Windows 95 shell. 
    71    Define OLExtpOFNExplorer for 524288
    72    // Indicates that the extension of the returned filename is different from the extension specified by the DefaultExt property. This flag isn't set if the DefaultExt property is Null, if the extensions match, or if the file has no extension.
    73    Define OLExtpOFNExtensionDifferent for 1024
    74    // Specifies that the user can enter only names of existing files in the File Name text box. If this flag is set and the user enters an invalid filename, a warning is displayed. This flag automatically sets the xtpOFNPathMustExist flag. 
    75    Define OLExtpOFNFileMustExist for 4096
    76    // Causes the dialog box to display the Help button. 
    77    Define OLExtpOFNHelpButton for 16
    78    // Hides the Read Onlycheck box. 
    79    Define OLExtpOFNHideReadOnly for 4
    80    // Use long filenames. 
    81    Define OLExtpOFNLongNames for 2097152
    82    // Forces the dialog box to set the current directory to what it was when the dialog box was opened. 
    83    Define OLExtpOFNNoChangeDir for 8
    84    // Do not dereference shell links (also known as shortcuts). By default, choosing a shell link causes it to be dereferenced by the shell. 
    85    Define OLExtpOFNNoDereferenceLinks for 1048576
    86    // Do not use long file names. 
    87    Define OLExtpOFNNoLongNames for 262144
    88    //  Specifies that the returned file won't have the Read Only attribute set and won't be in a write-protected directory. 
    89    Define OLExtpOFNNoReadOnlyReturn for 32768
    90    // Specifies that the common dialog box allows invalid characters in the returned filename. 
    91    Define OLExtpOFNNoValidate for 256
    92    // Causes the Save As dialog box to generate a message box if the selected file already exists. The user must confirm whether to overwrite the file. 
    93    Define OLExtpOFNOverwritePrompt for 2
    94    // Specifies that the user can enter only validpaths. If this flag is set and the user enters an invalid path, a warning message is displayed. 
    95    Define OLExtpOFNPathMustExist for 2048
    96    // Causes the Read Only check box to be initially checked when the dialog box is created. This flag also indicates the state of the Read Only check box when the dialog box is closed. 
    97    Define OLExtpOFNReadOnly for 1
    98    // Specifies that sharing violation errors will be ignored. 
    99    Define OLExtpOFNShareAware for 16384
   100
   101Define OLECommonDialogFontConstants for Integer
   102    // Specifies that the dialog box allows only a selection of the fonts that use the Windows character set. If this flag is set, the user won't be able to select a font that contains only symbols. 
   103    Define OLExtpCFANSIOnly for 1024
   104    // Enables the Apply button on the dialog box. 
   105    Define OLExtpCFApply for 512
   106    // Causes the dialog box to list the available printer and screen fonts. The hDC property identifies thedevice context associated with the printer. 
   107    Define OLExtpCFBoth for 3
   108    // Specifies that the dialog box enables strikethrough, underline, and color effects. 
   109    Define OLExtpCFEffects for 256
   110    // Specifies that the dialog box selects only fixed-pitch fonts. 
   111    Define OLExtpCFFixedPitchOnly for 16384
   112    // Specifies that an error message box is displayed if the user attempts to select a font or style that doesn't exist. 
   113    Define OLExtpCFForceFontExist for 65536
   114    // Causes the dialog box to display a Help button. 
   115    Define OLExtpCFHelpButton for 4
   116    // Specifies that the dialog box selects only font sizes within the range specified by the Min and Max properties. 
   117    Define OLExtpCFLimitSize for 8192
   118    // No font name selected. 
   119    Define OLExtpCFNoFaceSel for 524288
   120    // Specifies that the dialog box doesn't allow graphic device interface (GDI) font simulations. 
   121    Define OLExtpCFNoSimulations for 4096
   122    // No font size selected. 
   123    Define OLExtpCFNoSizeSel for 2097152
   124    // No style was selected. 
   125    Define OLExtpCFNoStyleSel for 1048576
   126    // Specifies that the dialog box doesn't allow vector-font selections. 
   127    Define OLExtpCFNoVectorFonts for 2048
   128    // Causes the dialog box to list only the fonts supported by the printer, specified by the hDC property. 
   129    Define OLExtpCFPrinterFonts for 2
   130    // Specifies that the dialog box allows only the selection of fonts that can be scaled.  
   131    Define OLExtpCFScalableOnly for 131072
   132    // Causes the dialog box to list only the screen fonts supported by the system. 
   133    Define OLExtpCFScreenFonts for 1
   134    // Specifies that the dialog box allows only the selection of TrueType fonts. 
   135    Define OLExtpCFTTOnly for 262144
   136    // Specifies that the dialog box allows only the selection of fonts that are available on both the printer and on screen. If this flag is set, the xtpCFBoth and xtpCFScalableOnly flags should also be set. 
   137    Define OLExtpCFWYSIWYG for 32768
   138
   139Define OLECommonDialogHelpConstants for Integer
   140    // Displays Help for a particular command 
   141    Define OLExtpHelpCommandHelp for 258
   142    // Displays the contents topic in the current Help file 
   143    Define OLExtpHelpContents for 3
   144    // Displays Help for a particular topic 
   145    Define OLExtpHelpContext for 1
   146    // Displays a topic identified by a context number 
   147    Define OLExtpHelpContextPopup for 8
   148    // Creates a Help file that displays text in only one font 
   149    Define OLExtpHelpForceFile for 9
   150    // Displays Help for using the Help application itself 
   151    Define OLExtpHelpHelpOnHelp for 4
   152    // Displays the index of the specified Help file 
   153    Define OLExtpHelpIndex for 3
   154    // Displays Help for a particular keyword 
   155    Define OLExtpHelpKey for 257
   156    // Calls the search engine in Windows Help 
   157    Define OLExtpHelpPartialKey for 261
   158    // Notifies the Help application that the specified Help file is no longer in use 
   159    Define OLExtpHelpQuit for 2
   160    // Designates a specific topic as the contents topic 
   161    Define OLExtpHelpSetContents for 5
   162    // Sets the current index for multi-index Help 
   163    Define OLExtpHelpSetIndex for 5
   164
   165Define OLECommonDialogBrowseFolderConstants for Integer
   166    // Do not include the New Folder button in the browse dialog box.
   167    Define OLExtpBFNoNewFolderButton for 512
   168    // Only return computers. If the user selects anything other than a computer, the OK button is grayed.
   169    Define OLExtpBFBrowseForComputer for 4096
   170    // Include an edit control in the browse dialog box that allows the user to type the name of an item
   171    Define OLExtpBFEditBox for 16
   172
   173Define OLECommonDialogPrintDialogConstants for Integer
   174    // Returns or sets the state of the All Pagesoption button
   175    Define OLExtpPDAllPages for 0
   176    // Returns or sets the state of the Collatecheck box. 
   177    Define OLExtpPDCollate for 16
   178    // Disables the Print To File check box. 
   179    Define OLExtpPDDisablePrintToFile for 524288
   180    // Causes the dialog box to display the Help button. 
   181    Define OLExtpPDHelpButton for 2048
   182    // Hides the Print To File check box. 
   183    Define OLExtpPDHidePrintToFile for 1048576
   184    // Disables the Pages option button and the associated edit control. 
   185    Define OLExtpPDNoPageNums for 8
   186    // Disables the Selection option button. 
   187    Define OLExtpPDNoSelection for 4
   188    // Prevents a warning message from being displayed when there is no default printer. 
   189    Define OLExtpPDNoWarning for 128
   190    // Returns or sets the state of the Pages option button. 
   191    Define OLExtpPDPageNums for 2
   192    // Causes the system to display the Print Setup dialog box rather than the Print dialog box. 
   193    Define OLExtpPDPrintSetup for 64
   194    // Returns or sets the state of the Print To File check box. 
   195    Define OLExtpPDPrintToFile for 32
   196    // Returns adevice context for the printer selection made in the dialog box. The device context is returned in the dialog box's hDC property. 
   197    Define OLExtpPDReturnDC for 256
   198    // Returns default printer name. 
   199    Define OLExtpPDReturnDefault for 1024
   200    // Returns an information context for the printer selection made in the dialog box. An information context provides a fast way to get information about the device without creating a device context. 
   201    Define OLExtpPDReturnIC for 512
   202    // Returns or sets the state of the Selection option button. If neither xtpPDPageNums nor xtpPDSelection is specified, the All option button is in the selected state. 
   203    Define OLExtpPDSelection for 1
   204    // If a printer driver doesn't support multiple copies, setting this flag disables the Number of copies spinner control in the Print dialog.
   205    Define OLExtpPDUseDevModeCopies for 262144
   206
   207Define OLEXTPTabNavigateButton for Integer
   208    Define OLExtpTabNavigateButtonLeft for 0
   209    Define OLExtpTabNavigateButtonRight for 1
   210    Define OLExtpTabNavigateButtonClose for 2
   211
   212Define OLEXTPTabNavigateButtonFlags for Integer
   213    Define OLExtpTabNavigateButtonNone for 0
   214    Define OLExtpTabNavigateButtonAutomatic for 1
   215    Define OLExtpTabNavigateButtonAlways for 2
   216
   217Define OLEXTPTabItemButtonFlags for Integer
   218    Define OLExtpTabItemButtonNone for 0
   219    Define OLExtpTabItemButtonSelected for 1
   220    Define OLExtpTabItemButtonAlways for 2
   221
   222Define OLEXTPPopupPaintTheme for Integer
   223    // The theme like to a Office2000
   224    Define OLExtpPopupThemeOffice2000 for 0
   225    // The theme like to a OfficeXP
   226    Define OLExtpPopupThemeOfficeXP for 1
   227    // The theme like to a Office2003
   228    Define OLExtpPopupThemeOffice2003 for 2
   229    // The theme like to a MSN Messenger
   230    Define OLExtpPopupThemeMSN for 3
   231    // The theme like to a Office2007
   232    Define OLExtpPopupThemeOffice2007 for 4
   233    // The custom theme
   234    Define OLExtpPopupThemeCustom for 5
   235
   236Define OLEXTPPopupLocation for Integer
   237    Define OLExtpPopupLocationNearTaskBar for 0
   238    Define OLExtpPopupLocationBottomRight for 1
   239    Define OLExtpPopupLocationCenter for 2
   240
   241Define OLEXTPItemAlignment for Integer
   242    Define OLEDT_TOP for 0
   243    Define OLEDT_LEFT for 0
   244    Define OLEDT_CENTER for 1
   245    Define OLEDT_RIGHT for 2
   246    Define OLEDT_VCENTER for 4
   247    Define OLEDT_BOTTOM for 8
   248    Define OLEDT_WORDBREAK for 16
   249    Define OLEDT_SINGLELINE for 32
   250    Define OLEDT_END_ELLIPSIS for 32768
   251
   252Define OLEXTPPopupItemIcon for Integer
   253    // normal icon handler
   254    Define OLExtpPopupItemIconNormal for 1
   255    // selected icon handler
   256    Define OLExtpPopupItemIconSelected for 2
   257    // pressed icon handler
   258    Define OLExtpPopupItemIconPressed for 4
   259
   260Define OLEXTPPopupAnimation for Integer
   261    // Animation is not used
   262    Define OLExtpPopupAnimationNone for 0
   263    // Fade method animation
   264    Define OLExtpPopupAnimationFade for 1
   265    // Slide method animation
   266    Define OLExtpPopupAnimationSlide for 2
   267    // Unfold method animation
   268    Define OLExtpPopupAnimationUnfold for 3
   269
   270Define OLEXTPPopupState for Integer
   271    // The popup window is closed
   272    Define OLExtpPopupStateClosed for 0
   273    // The popup window is expanding
   274    Define OLExtpPopupStateExpanding for 1
   275    // The popup window is shown
   276    Define OLExtpPopupStateShow for 2
   277    // The popup window is collapsing
   278    Define OLExtpPopupStateCollapsing for 3
   279
   280Define OLEAppearanceStyle for Integer
   281    Define OLExtpAppearanceStandard for 0
   282    Define OLExtpAppearanceFlat for 1
   283    Define OLExtpAppearanceUltraFlat for 2
   284    Define OLExtpAppearanceOffice2000 for 3
   285    Define OLExtpAppearanceOfficeXP for 4
   286    Define OLExtpAppearanceOffice2003 for 5
   287    Define OLExtpAppearanceOffice2007 for 6
   288
   289Define OLEAlignmentStyle for Integer
   290    Define OLExtpAlignLeft for 0
   291    Define OLExtpAlignRight for 1
   292    Define OLExtpAlignCenter for 2
   293    Define OLExtpAlignMiddle for 0
   294    Define OLExtpAlignTop for 4
   295    Define OLExtpAlignBottom for 8
   296
   297Define OLEPictureAlignmentStyle for Integer
   298    Define OLExtpPictureLeft for 0
   299    Define OLExtpPictureRight for 1
   300    Define OLExtpPictureCenter for 2
   301    Define OLExtpPictureTop for 0
   302    Define OLExtpPictureBottom for 4
   303    Define OLExtpPictureMiddle for 8
   304    Define OLExtpPictureStretch for 16
   305    Define OLExtpPictureTile for 32
   306
   307Define OLECheckAlignment for Integer
   308    Define OLExtpCheckAlignLeft for 0
   309    Define OLExtpCheckAlignRight for 1
   310
   311Define OLETextImageRelationStyle for Integer
   312    Define OLExtpOverlay for 0
   313    Define OLExtpImageAboveText for 1
   314    Define OLExtpTextAboveImage for 2
   315    Define OLExtpImageBeforeText for 3
   316    Define OLExtpTextBeforeImage for 4
   317
   318Define OLEGroupBoxBorderStyle for Integer
   319    Define OLExtpFrameBorder for 0
   320    Define OLExtpFrameSingleLine for 1
   321    Define OLExtpFrameNone for 2
   322
   323Define OLECheckBoxValue for Integer
   324    Define OLExtpUnchecked for 0
   325    Define OLExtpChecked for 1
   326    Define OLExtpGrayed for 2
   327
   328Define OLEEditScrollBars for Integer
   329    Define OLExtpEditScrollBarsNone for 0
   330    Define OLExtpEditScrollBarsHorizontal for 1
   331    Define OLExtpEditScrollBarsVertical for 2
   332    Define OLExtpEditScrollBarsBoth for 3
   333
   334Define OLESliderTickStyle for Integer
   335    Define OLExtpSliderBottomRight for 0
   336    Define OLExtpSliderTopLeft for 1
   337    Define OLExtpSliderBoth for 2
   338    Define OLExtpSliderNoTicks for 3
   339
   340Define OLEEditAlignment for Integer
   341    Define OLExtpEditAlignLeft for 0
   342    Define OLExtpEditAlignRight for 1
   343    Define OLExtpEditAlignCenter for 2
   344
   345Define OLEListBoxMultiSelectStyle for Integer
   346    Define OLExtpListMultiSelectNone for 0
   347    Define OLExtpListMultiSelectSimple for 1
   348    Define OLExtpListMultiSelectExtended for 2
   349
   350Define OLEPushButtonStyle for Integer
   351    Define OLExtpButtonNormal for 0
   352    Define OLExtpButtonDropDown for 1
   353    Define OLExtpButtonDropDownRight for 2
   354    Define OLExtpButtonSplitDropDown for 3
   355
   356Define OLEResizerBorderStyle for Integer
   357    Define OLExtpBorderNone for 0
   358    Define OLExtpBorderFlat for 1
   359    Define OLExtpBorderStaticEdge for 2
   360    Define OLExtpBorderClientEdge for 3
   361    Define OLExtpBorderFrame for 4
   362
   363Define OLEComboBoxStyle for Integer
   364    Define OLExtpComboDropDown for 0
   365    Define OLExtpComboSimple for 1
   366    Define OLExtpComboDropDownList for 2
   367
   368Define OLEListBoxStyle for Integer
   369    Define OLExtpListStandard for 0
   370    Define OLExtpListCheckbox for 1
   371
   372// Common Buttons
   373Define OLETaskDialogCommonButtons for Integer
   374    Define OLExtpTaskButtonOk for 1
   375    Define OLExtpTaskButtonYes for 2
   376    Define OLExtpTaskButtonNo for 4
   377    Define OLExtpTaskButtonCancel for 8
   378    Define OLExtpTaskButtonRetry for 16
   379    Define OLExtpTaskButtonClose for 32
   380
   381// Icons
   382Define OLETaskDialogIcon for Integer
   383    Define OLExtpTaskIconNone for 0
   384    Define OLExtpTaskIconWarning for 1
   385    Define OLExtpTaskIconError for 2
   386    Define OLExtpTaskIconInformation for 3
   387    Define OLExtpTaskIconShield for 4
   388    Define OLExtpTaskIconQuestion for 5
   389    Define OLExtpTaskIconCustom for 6
   390
   391// Style
   392Define OLETaskDialogProgressBarStyle for Integer
   393    Define OLExtpTaskProgressBarNone for 0
   394    Define OLExtpTaskProgressBarNormal for 1
   395    Define OLExtpTaskProgressBarMarquee for 2
   396
   397// ListViewStyle
   398Define OLEListViewStyle for Integer
   399    // xtpListViewIcon
   400    Define OLExtpListViewIcon for 0
   401    // xtpListViewSmallIcon
   402    Define OLExtpListViewSmallIcon for 1
   403    // xtpListViewList
   404    Define OLExtpListViewList for 2
   405    // xtpListViewReport
   406    Define OLExtpListViewReport for 3
   407
   408// ListViewFindItemWhere
   409Define OLEListViewFindItemWhere for Integer
   410    // xtpListViewText
   411    Define OLExtpListViewText for 0
   412    // xtpListViewSubItem
   413    Define OLExtpListViewSubItem for 1
   414    // xtpListViewTag
   415    Define OLExtpListViewTag for 2
   416
   417// ListViewStyle
   418Define OLEListViewColumnAlignment for Integer
   419    // xtpListViewColumnLeft
   420    Define OLExtpListViewColumnLeft for 0
   421    // xtpListViewColumnRight
   422    Define OLExtpListViewColumnRight for 1
   423    // xtpListViewColumnCenter
   424    Define OLExtpListViewColumnCenter for 2
   425
   426// ListViewLabelEdit
   427Define OLEListViewLabelEdit for Integer
   428    // xtpListLabelEditAutomatic
   429    Define OLExtpListViewLabelAutomatic for 0
   430    // xtpListLabelEditManual
   431    Define OLExtpListViewLabelManual for 1
   432
   433// ListViewArrange
   434Define OLEListViewArrange for Integer
   435    // xtpListViewArrangeNone
   436    Define OLExtpListViewArrangeNone for 0
   437    // xtpListViewArrangeAutoLeft
   438    Define OLExtpListViewArrangeAutoLeft for 1
   439    // xtpListViewArrangeAutoTop
   440    Define OLExtpListViewArrangeAutoTop for 2
   441
   442Define OLETreeViewRelationship for Integer
   443    Define OLExtpTreeViewFirst for 0
   444    Define OLExtpTreeViewLast for 1
   445    Define OLExtpTreeViewNext for 2
   446    Define OLExtpTreeViewPrevious for 3
   447    Define OLExtpTreeViewChild for 4
   448
   449Define OLETreeViewLinesStyle for Integer
   450    Define OLExtpTreeViewHideLines for 0
   451    Define OLExtpTreeViewShowLines for 1
   452    Define OLExtpTreeViewShowLinesAtRoot for 2
   453
   454Define OLEDateTimeFormat for Integer
   455    Define OLExtpPickerLongDate for 0
   456    Define OLExtpPickerShortDate for 1
   457    Define OLExtpPickerTime for 2
   458    Define OLExtpPickerCustom for 3
   459
   460// TreeViewLabelEdit
   461Define OLETreeViewLabelEdit for Integer
   462    // xtpListLabelEditAutomatic
   463    Define OLExtpTreeViewLabelAutomatic for 0
   464    // xtpListLabelEditManual
   465    Define OLExtpTreeViewLabelManual for 1
   466
   467// ProgressBarScrolling
   468Define OLEProgressBarScrolling for Integer
   469    // xtpProgressBarStandard
   470    Define OLExtpProgressBarStandard for 0
   471    // xtpProgressBarSmooth
   472    Define OLExtpProgressBarSmooth for 1
   473    // xtpProgressBarMarquee
   474    Define OLExtpProgressBarMarquee for 2
   475
   476// ProgressBarOrientation
   477Define OLEProgressBarOrientation for Integer
   478    // xtpProgressBarHorizontal
   479    Define OLExtpProgressBarHorizontal for 0
   480    // xtpProgressBarVertical
   481    Define OLExtpProgressBarVertical for 1
   482
   483// UpDownOrientation
   484Define OLEUpDownOrientation for Integer
   485    // xtpUpDownVertical
   486    Define OLExtpUpDownVertical for 0
   487    // xtpUpDownHorizontal
   488    Define OLExtpUpDownHorizontal for 1
   489
   490// UpDownAlignment
   491Define OLEUpDownAlignment for Integer
   492    // xtpUpDownVertical
   493    Define OLExtpUpDownLeft for 0
   494    // xtpUpDownHorizontal
   495    Define OLExtpUpDownRight for 1
   496
   497// ScrollBarOrientation
   498Define OLEScrollBarOrientation for Integer
   499    // xtpScrollBarHorizontal
   500    Define OLExtpScrollBarHorizontal for 0
   501    // xtpScrollBarVertical
   502    Define OLExtpScrollBarVertical for 1
   503
   504// SliderOrientation
   505Define OLESliderOrientation for Integer
   506    // xtpSliderHorizontal
   507    Define OLExtpSliderHorizontal for 0
   508    // xtpSliderVertical
   509    Define OLExtpSliderVertical for 1
   510
   511// WebBrowserScrollBar
   512Define OLEWebBrowserScrollBar for Integer
   513    Define OLExtpScrollBarStandard for 0
   514    Define OLExtpScrollBarFlat for 1
   515    Define OLExtpScrollBarNone for 2
   516
   517// Dispatch interface for PushButton Control
   518Class cSigCjCom_DPushButton is a Mixin
   519
   520    { MethodType=Property DesignTime=False }
   521    Function ComValue Returns Boolean
   522        Boolean retVal
   523        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BOOL to retVal
   524        Function_Return retVal
   525    End_Function
   526
   527    { MethodType=Property DesignTime=False }
   528    Procedure Set ComValue Boolean value
   529        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BOOL to value
   530    End_Procedure
   531
   532    { MethodType=Property DesignTime=False }
   533    Function ComCaption Returns String
   534        String retVal
   535        Get ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to retVal
   536        Function_Return retVal
   537    End_Function
   538
   539    { MethodType=Property DesignTime=False }
   540    Procedure Set ComCaption String value
   541        Set ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to value
   542    End_Procedure
   543
   544    { MethodType=Property DesignTime=False }
   545    Function ComFont Returns Variant
   546        Variant retVal
   547        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
   548        Function_Return retVal
   549    End_Function
   550
   551    { MethodType=Property DesignTime=False }
   552    Procedure Set ComFont Variant value
   553        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
   554    End_Procedure
   555
   556    { MethodType=Property DesignTime=False }
   557    Function ComBackColor Returns OLE_COLOR
   558        OLE_COLOR retVal
   559        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
   560        Function_Return retVal
   561    End_Function
   562
   563    { MethodType=Property DesignTime=False }
   564    Procedure Set ComBackColor OLE_COLOR value
   565        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
   566    End_Procedure
   567
   568    { MethodType=Property DesignTime=False }
   569    Function ComForeColor Returns OLE_COLOR
   570        OLE_COLOR retVal
   571        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
   572        Function_Return retVal
   573    End_Function
   574
   575    { MethodType=Property DesignTime=False }
   576    Procedure Set ComForeColor OLE_COLOR value
   577        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
   578    End_Procedure
   579
   580    { MethodType=Property DesignTime=False }
   581    Function ComHWnd Returns OLE_HANDLE
   582        OLE_HANDLE retVal
   583        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
   584        Function_Return retVal
   585    End_Function
   586
   587    { MethodType=Property DesignTime=False }
   588    Procedure Set ComHWnd OLE_HANDLE value
   589        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
   590    End_Procedure
   591
   592    { MethodType=Property DesignTime=False }
   593    Function ComEnabled Returns Boolean
   594        Boolean retVal
   595        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
   596        Function_Return retVal
   597    End_Function
   598
   599    { MethodType=Property DesignTime=False }
   600    Procedure Set ComEnabled Boolean value
   601        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
   602    End_Procedure
   603
   604    { MethodType=Property DesignTime=False }
   605    Function ComDefault Returns Boolean
   606        Boolean retVal
   607        Get ComProperty of (phDispatchDriver(Self)) 1745027088 OLE_VT_BOOL to retVal
   608        Function_Return retVal
   609    End_Function
   610
   611    { MethodType=Property DesignTime=False }
   612    Procedure Set ComDefault Boolean value
   613        Set ComProperty of (phDispatchDriver(Self)) 1745027088 OLE_VT_BOOL to value
   614    End_Procedure
   615
   616    { MethodType=Property DesignTime=False }
   617    Function ComTransparent Returns Boolean
   618        Boolean retVal
   619        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
   620        Function_Return retVal
   621    End_Function
   622
   623    { MethodType=Property DesignTime=False }
   624    Procedure Set ComTransparent Boolean value
   625        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
   626    End_Procedure
   627
   628    { MethodType=Property DesignTime=False }
   629    Function ComFlatStyle Returns Boolean
   630        Boolean retVal
   631        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
   632        Function_Return retVal
   633    End_Function
   634
   635    { MethodType=Property DesignTime=False }
   636    Procedure Set ComFlatStyle Boolean value
   637        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
   638    End_Procedure
   639
   640    { MethodType=Property DesignTime=False }
   641    Function ComUseVisualStyle Returns Boolean
   642        Boolean retVal
   643        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
   644        Function_Return retVal
   645    End_Function
   646
   647    { MethodType=Property DesignTime=False }
   648    Procedure Set ComUseVisualStyle Boolean value
   649        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
   650    End_Procedure
   651
   652    { MethodType=Property DesignTime=False }
   653    Function ComAppearance Returns OLEAppearanceStyle
   654        OLEAppearanceStyle retVal
   655        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
   656        Function_Return retVal
   657    End_Function
   658
   659    { MethodType=Property DesignTime=False }
   660    Procedure Set ComAppearance OLEAppearanceStyle value
   661        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
   662    End_Procedure
   663
   664    { MethodType=Property DesignTime=False }
   665    Function ComTextAlignment Returns OLEAlignmentStyle
   666        OLEAlignmentStyle retVal
   667        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
   668        Function_Return retVal
   669    End_Function
   670
   671    { MethodType=Property DesignTime=False }
   672    Procedure Set ComTextAlignment OLEAlignmentStyle value
   673        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
   674    End_Procedure
   675
   676    { MethodType=Property DesignTime=False }
   677    Function ComMultiLine Returns Boolean
   678        Boolean retVal
   679        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
   680        Function_Return retVal
   681    End_Function
   682
   683    { MethodType=Property DesignTime=False }
   684    Procedure Set ComMultiLine Boolean value
   685        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
   686    End_Procedure
   687
   688    { MethodType=Property DesignTime=False }
   689    Function ComChecked Returns Boolean
   690        Boolean retVal
   691        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
   692        Function_Return retVal
   693    End_Function
   694
   695    { MethodType=Property DesignTime=False }
   696    Procedure Set ComChecked Boolean value
   697        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
   698    End_Procedure
   699
   700    { MethodType=Property DesignTime=False }
   701    Function ComPicture Returns Variant
   702        Variant retVal
   703        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to retVal
   704        Function_Return retVal
   705    End_Function
   706
   707    { MethodType=Property DesignTime=False }
   708    Procedure Set ComPicture Variant value
   709        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to value
   710    End_Procedure
   711
   712    { MethodType=Property DesignTime=False }
   713    Function ComIcon Returns Variant
   714        Variant retVal
   715        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_DISPATCH to retVal
   716        Function_Return retVal
   717    End_Function
   718
   719    { MethodType=Property DesignTime=False }
   720    Procedure Set ComIcon Variant value
   721        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_DISPATCH to value
   722    End_Procedure
   723
   724    { MethodType=Property DesignTime=False }
   725    Function ComRightToLeft Returns Boolean
   726        Boolean retVal
   727        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
   728        Function_Return retVal
   729    End_Function
   730
   731    { MethodType=Property DesignTime=False }
   732    Procedure Set ComRightToLeft Boolean value
   733        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
   734    End_Procedure
   735
   736    { MethodType=Property DesignTime=False }
   737    Function ComImageAlignment Returns OLEAlignmentStyle
   738        OLEAlignmentStyle retVal
   739        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to retVal
   740        Function_Return retVal
   741    End_Function
   742
   743    { MethodType=Property DesignTime=False }
   744    Procedure Set ComImageAlignment OLEAlignmentStyle value
   745        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to value
   746    End_Procedure
   747
   748    { MethodType=Property DesignTime=False }
   749    Function ComTextImageRelation Returns OLETextImageRelationStyle
   750        OLETextImageRelationStyle retVal
   751        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to retVal
   752        Function_Return retVal
   753    End_Function
   754
   755    { MethodType=Property DesignTime=False }
   756    Procedure Set ComTextImageRelation OLETextImageRelationStyle value
   757        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to value
   758    End_Procedure
   759
   760    { MethodType=Property DesignTime=False }
   761    Function ComImageGap Returns Integer
   762        Integer retVal
   763        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
   764        Function_Return retVal
   765    End_Function
   766
   767    { MethodType=Property DesignTime=False }
   768    Procedure Set ComImageGap Integer value
   769        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
   770    End_Procedure
   771
   772    { MethodType=Property DesignTime=False }
   773    Function ComBorderGap Returns Integer
   774        Integer retVal
   775        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to retVal
   776        Function_Return retVal
   777    End_Function
   778
   779    { MethodType=Property DesignTime=False }
   780    Procedure Set ComBorderGap Integer value
   781        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to value
   782    End_Procedure
   783
   784    { MethodType=Property DesignTime=False }
   785    Function ComStyle Returns OLEPushButtonStyle
   786        OLEPushButtonStyle retVal
   787        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to retVal
   788        Function_Return retVal
   789    End_Function
   790
   791    { MethodType=Property DesignTime=False }
   792    Procedure Set ComStyle OLEPushButtonStyle value
   793        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to value
   794    End_Procedure
   795
   796    { MethodType=Property DesignTime=False }
   797    Function ComEnableMarkup Returns Boolean
   798        Boolean retVal
   799        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
   800        Function_Return retVal
   801    End_Function
   802
   803    { MethodType=Property DesignTime=False }
   804    Procedure Set ComEnableMarkup Boolean value
   805        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
   806    End_Procedure
   807
   808    // Returns/Sets whether this control can act as an OLE drop target.
   809    { MethodType=Property DesignTime=False }
   810    Function ComOLEDropMode Returns OLEOLEDropConstants
   811        OLEOLEDropConstants retVal
   812        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
   813        Function_Return retVal
   814    End_Function
   815
   816    // Returns/Sets whether this control can act as an OLE drop target.
   817    { MethodType=Property DesignTime=False }
   818    Procedure Set ComOLEDropMode OLEOLEDropConstants value
   819        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
   820    End_Procedure
   821
   822    { MethodType=Property DesignTime=False }
   823    Function ComDrawFocusRect Returns Boolean
   824        Boolean retVal
   825        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to retVal
   826        Function_Return retVal
   827    End_Function
   828
   829    { MethodType=Property DesignTime=False }
   830    Procedure Set ComDrawFocusRect Boolean value
   831        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to value
   832    End_Procedure
   833
   834    { MethodType=Property DesignTime=False }
   835    Function ComBuddyControl Returns String
   836        String retVal
   837        Get ComProperty of (phDispatchDriver(Self)) 33 OLE_VT_BSTR to retVal
   838        Function_Return retVal
   839    End_Function
   840
   841    { MethodType=Property DesignTime=False }
   842    Procedure Set ComBuddyControl String value
   843        Set ComProperty of (phDispatchDriver(Self)) 33 OLE_VT_BSTR to value
   844    End_Procedure
   845
   846    { MethodType=Property DesignTime=False }
   847    Function ComControlToolTip Returns String
   848        String retVal
   849        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
   850        Function_Return retVal
   851    End_Function
   852
   853    { MethodType=Property DesignTime=False }
   854    Procedure Set ComControlToolTip String value
   855        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
   856    End_Procedure
   857
   858    { MethodType=Property DesignTime=False }
   859    Function ComMousePointer Returns Integer
   860        Integer retVal
   861        Get ComProperty of (phDispatchDriver(Self)) -521 OLE_VT_I4 to retVal
   862        Function_Return retVal
   863    End_Function
   864
   865    { MethodType=Property DesignTime=False }
   866    Procedure Set ComMousePointer Integer value
   867        Set ComProperty of (phDispatchDriver(Self)) -521 OLE_VT_I4 to value
   868    End_Procedure
   869
   870    { MethodType=Property DesignTime=False }
   871    Function ComMarkupContext Returns Variant
   872        Handle hDispatchDriver
   873        Variant retVal
   874        Get phDispatchDriver to hDispatchDriver
   875        Get InvokeComMethod of hDispatchDriver 40 OLE_VT_DISPATCH to retVal
   876        Function_Return retVal
   877    End_Function
   878
   879    Procedure ComAboutBox
   880        Handle hDispatchDriver
   881        Get phDispatchDriver to hDispatchDriver
   882        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
   883    End_Procedure
   884
   885    { MethodType=Property DesignTime=False }
   886    Function ComToolTipContext Returns Variant
   887        Handle hDispatchDriver
   888        Variant retVal
   889        Get phDispatchDriver to hDispatchDriver
   890        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
   891        Function_Return retVal
   892    End_Function
   893End_Class
   894
   895// Event interface for PushButton Control
   896Class cSigCjCom_DPushButtonEvents is a Mixin
   897
   898    { MethodType=Event }
   899    Procedure OnComClick
   900    End_Procedure
   901
   902    { MethodType=Event }
   903    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
   904    End_Procedure
   905
   906    { MethodType=Event }
   907    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
   908    End_Procedure
   909
   910    { MethodType=Event }
   911    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
   912    End_Procedure
   913
   914    { MethodType=Event }
   915    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
   916    End_Procedure
   917
   918    { MethodType=Event }
   919    Procedure OnComKeyPress Short ByRef llKeyAscii
   920    End_Procedure
   921
   922    { MethodType=Event }
   923    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
   924    End_Procedure
   925
   926    { MethodType=Event }
   927    Procedure OnComDropDown
   928    End_Procedure
   929
   930    { MethodType=Event }
   931    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
   932    End_Procedure
   933
   934    { MethodType=Event }
   935    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
   936    End_Procedure
   937
   938    { Visibility=Private }
   939    Procedure RegisterComEvents
   940        Send RegisterComEvent -600 msg_OnComClick
   941        Send RegisterComEvent -605 msg_OnComMouseDown
   942        Send RegisterComEvent -606 msg_OnComMouseMove
   943        Send RegisterComEvent -607 msg_OnComMouseUp
   944        Send RegisterComEvent -602 msg_OnComKeyDown
   945        Send RegisterComEvent -603 msg_OnComKeyPress
   946        Send RegisterComEvent -604 msg_OnComKeyUp
   947        Send RegisterComEvent 1 msg_OnComDropDown
   948        Send RegisterComEvent 300 msg_OnComOLEDragOver
   949        Send RegisterComEvent 301 msg_OnComOLEDragDrop
   950    End_Procedure
   951End_Class
   952
   953// CoClass
   954// PushButton Control
   955{ CLSID=L_cSigCjComPushButton }
   956Class cSigCjComPushButton is a cComActiveXControl
   957    Import_Class_Protocol cSigCjCom_DPushButton
   958    Import_Class_Protocol cSigCjCom_DPushButtonEvents
   959
   960    Procedure Construct_Object
   961        Forward Send Construct_Object
   962        Set psProgID to L_cSigCjComPushButton
   963        Set psEventId to "{FF87BE9B-8784-4B18-976D-F889C1F8B1E9}"
   964        Set psLicenseKey to L_cSigCjKeyControls
   965        Set peAutoCreate to acDeferredAutoCreate
   966    End_Procedure
   967End_Class
   968
   969// Dispatch interface for RadioButton Control
   970Class cSigCjCom_DRadioButton is a Mixin
   971
   972    { MethodType=Property DesignTime=False }
   973    Function ComCaption Returns String
   974        String retVal
   975        Get ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to retVal
   976        Function_Return retVal
   977    End_Function
   978
   979    { MethodType=Property DesignTime=False }
   980    Procedure Set ComCaption String value
   981        Set ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to value
   982    End_Procedure
   983
   984    { MethodType=Property DesignTime=False }
   985    Function ComFont Returns Variant
   986        Variant retVal
   987        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
   988        Function_Return retVal
   989    End_Function
   990
   991    { MethodType=Property DesignTime=False }
   992    Procedure Set ComFont Variant value
   993        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
   994    End_Procedure
   995
   996    { MethodType=Property DesignTime=False }
   997    Function ComBackColor Returns OLE_COLOR
   998        OLE_COLOR retVal
   999        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  1000        Function_Return retVal
  1001    End_Function
  1002
  1003    { MethodType=Property DesignTime=False }
  1004    Procedure Set ComBackColor OLE_COLOR value
  1005        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  1006    End_Procedure
  1007
  1008    { MethodType=Property DesignTime=False }
  1009    Function ComForeColor Returns OLE_COLOR
  1010        OLE_COLOR retVal
  1011        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  1012        Function_Return retVal
  1013    End_Function
  1014
  1015    { MethodType=Property DesignTime=False }
  1016    Procedure Set ComForeColor OLE_COLOR value
  1017        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  1018    End_Procedure
  1019
  1020    { MethodType=Property DesignTime=False }
  1021    Function ComHWnd Returns OLE_HANDLE
  1022        OLE_HANDLE retVal
  1023        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  1024        Function_Return retVal
  1025    End_Function
  1026
  1027    { MethodType=Property DesignTime=False }
  1028    Procedure Set ComHWnd OLE_HANDLE value
  1029        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  1030    End_Procedure
  1031
  1032    { MethodType=Property DesignTime=False }
  1033    Function ComEnabled Returns Boolean
  1034        Boolean retVal
  1035        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  1036        Function_Return retVal
  1037    End_Function
  1038
  1039    { MethodType=Property DesignTime=False }
  1040    Procedure Set ComEnabled Boolean value
  1041        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  1042    End_Procedure
  1043
  1044    { MethodType=Property DesignTime=False }
  1045    Function ComTransparent Returns Boolean
  1046        Boolean retVal
  1047        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  1048        Function_Return retVal
  1049    End_Function
  1050
  1051    { MethodType=Property DesignTime=False }
  1052    Procedure Set ComTransparent Boolean value
  1053        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  1054    End_Procedure
  1055
  1056    { MethodType=Property DesignTime=False }
  1057    Function ComUseVisualStyle Returns Boolean
  1058        Boolean retVal
  1059        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  1060        Function_Return retVal
  1061    End_Function
  1062
  1063    { MethodType=Property DesignTime=False }
  1064    Procedure Set ComUseVisualStyle Boolean value
  1065        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  1066    End_Procedure
  1067
  1068    { MethodType=Property DesignTime=False }
  1069    Function ComAppearance Returns OLEAppearanceStyle
  1070        OLEAppearanceStyle retVal
  1071        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  1072        Function_Return retVal
  1073    End_Function
  1074
  1075    { MethodType=Property DesignTime=False }
  1076    Procedure Set ComAppearance OLEAppearanceStyle value
  1077        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  1078    End_Procedure
  1079
  1080    { MethodType=Property DesignTime=False }
  1081    Function ComTextAlignment Returns OLEAlignmentStyle
  1082        OLEAlignmentStyle retVal
  1083        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  1084        Function_Return retVal
  1085    End_Function
  1086
  1087    { MethodType=Property DesignTime=False }
  1088    Procedure Set ComTextAlignment OLEAlignmentStyle value
  1089        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  1090    End_Procedure
  1091
  1092    { MethodType=Property DesignTime=False }
  1093    Function ComMultiLine Returns Boolean
  1094        Boolean retVal
  1095        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  1096        Function_Return retVal
  1097    End_Function
  1098
  1099    { MethodType=Property DesignTime=False }
  1100    Procedure Set ComMultiLine Boolean value
  1101        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  1102    End_Procedure
  1103
  1104    { MethodType=Property DesignTime=False }
  1105    Function ComValue Returns OLE_OPTEXCLUSIVE
  1106        OLE_OPTEXCLUSIVE retVal
  1107        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BOOL to retVal
  1108        Function_Return retVal
  1109    End_Function
  1110
  1111    { MethodType=Property DesignTime=False }
  1112    Procedure Set ComValue OLE_OPTEXCLUSIVE value
  1113        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BOOL to value
  1114    End_Procedure
  1115
  1116    { MethodType=Property DesignTime=False }
  1117    Function ComRightToLeft Returns Boolean
  1118        Boolean retVal
  1119        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  1120        Function_Return retVal
  1121    End_Function
  1122
  1123    { MethodType=Property DesignTime=False }
  1124    Procedure Set ComRightToLeft Boolean value
  1125        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  1126    End_Procedure
  1127
  1128    { MethodType=Property DesignTime=False }
  1129    Function ComEnableMarkup Returns Boolean
  1130        Boolean retVal
  1131        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  1132        Function_Return retVal
  1133    End_Function
  1134
  1135    { MethodType=Property DesignTime=False }
  1136    Procedure Set ComEnableMarkup Boolean value
  1137        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  1138    End_Procedure
  1139
  1140    { MethodType=Property DesignTime=False }
  1141    Function ComDrawFocusRect Returns Boolean
  1142        Boolean retVal
  1143        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to retVal
  1144        Function_Return retVal
  1145    End_Function
  1146
  1147    { MethodType=Property DesignTime=False }
  1148    Procedure Set ComDrawFocusRect Boolean value
  1149        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to value
  1150    End_Procedure
  1151
  1152    { MethodType=Property DesignTime=False }
  1153    Function ComAlignment Returns OLECheckAlignment
  1154        OLECheckAlignment retVal
  1155        Get ComProperty of (phDispatchDriver(Self)) 37 OLE_VT_I4 to retVal
  1156        Function_Return retVal
  1157    End_Function
  1158
  1159    { MethodType=Property DesignTime=False }
  1160    Procedure Set ComAlignment OLECheckAlignment value
  1161        Set ComProperty of (phDispatchDriver(Self)) 37 OLE_VT_I4 to value
  1162    End_Procedure
  1163
  1164    // Returns/Sets whether this control can act as an OLE drop target.
  1165    { MethodType=Property DesignTime=False }
  1166    Function ComOLEDropMode Returns OLEOLEDropConstants
  1167        OLEOLEDropConstants retVal
  1168        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
  1169        Function_Return retVal
  1170    End_Function
  1171
  1172    // Returns/Sets whether this control can act as an OLE drop target.
  1173    { MethodType=Property DesignTime=False }
  1174    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  1175        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
  1176    End_Procedure
  1177
  1178    { MethodType=Property DesignTime=False }
  1179    Function ComControlToolTip Returns String
  1180        String retVal
  1181        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  1182        Function_Return retVal
  1183    End_Function
  1184
  1185    { MethodType=Property DesignTime=False }
  1186    Procedure Set ComControlToolTip String value
  1187        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  1188    End_Procedure
  1189
  1190    { MethodType=Property DesignTime=False }
  1191    Function ComMarkupContext Returns Variant
  1192        Handle hDispatchDriver
  1193        Variant retVal
  1194        Get phDispatchDriver to hDispatchDriver
  1195        Get InvokeComMethod of hDispatchDriver 40 OLE_VT_DISPATCH to retVal
  1196        Function_Return retVal
  1197    End_Function
  1198
  1199    { MethodType=Property DesignTime=False }
  1200    Function ComToolTipContext Returns Variant
  1201        Handle hDispatchDriver
  1202        Variant retVal
  1203        Get phDispatchDriver to hDispatchDriver
  1204        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  1205        Function_Return retVal
  1206    End_Function
  1207
  1208    Procedure ComAboutBox
  1209        Handle hDispatchDriver
  1210        Get phDispatchDriver to hDispatchDriver
  1211        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  1212    End_Procedure
  1213End_Class
  1214
  1215// Event interface for RadioButton Control
  1216Class cSigCjCom_DRadioButtonEvents is a Mixin
  1217
  1218    { MethodType=Event }
  1219    Procedure OnComClick
  1220    End_Procedure
  1221
  1222    { MethodType=Event }
  1223    Procedure OnComDblClick
  1224    End_Procedure
  1225
  1226    { MethodType=Event }
  1227    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1228    End_Procedure
  1229
  1230    { MethodType=Event }
  1231    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1232    End_Procedure
  1233
  1234    { MethodType=Event }
  1235    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1236    End_Procedure
  1237
  1238    { MethodType=Event }
  1239    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  1240    End_Procedure
  1241
  1242    { MethodType=Event }
  1243    Procedure OnComKeyPress Short ByRef llKeyAscii
  1244    End_Procedure
  1245
  1246    { MethodType=Event }
  1247    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  1248    End_Procedure
  1249
  1250    { MethodType=Event }
  1251    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  1252    End_Procedure
  1253
  1254    { MethodType=Event }
  1255    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1256    End_Procedure
  1257
  1258    { Visibility=Private }
  1259    Procedure RegisterComEvents
  1260        Send RegisterComEvent -600 msg_OnComClick
  1261        Send RegisterComEvent -601 msg_OnComDblClick
  1262        Send RegisterComEvent -605 msg_OnComMouseDown
  1263        Send RegisterComEvent -606 msg_OnComMouseMove
  1264        Send RegisterComEvent -607 msg_OnComMouseUp
  1265        Send RegisterComEvent -602 msg_OnComKeyDown
  1266        Send RegisterComEvent -603 msg_OnComKeyPress
  1267        Send RegisterComEvent -604 msg_OnComKeyUp
  1268        Send RegisterComEvent 300 msg_OnComOLEDragOver
  1269        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  1270    End_Procedure
  1271End_Class
  1272
  1273// CoClass
  1274// RadioButton Control
  1275{ CLSID=L_cSigCjComRadioButton }
  1276Class cSigCjComRadioButton is a cComActiveXControl
  1277    Import_Class_Protocol cSigCjCom_DRadioButton
  1278    Import_Class_Protocol cSigCjCom_DRadioButtonEvents
  1279
  1280    Procedure Construct_Object
  1281        Forward Send Construct_Object
  1282        Set psProgID to L_cSigCjComRadioButton
  1283        Set psEventId to "{5F87BE9B-8784-4B18-976D-F889C1F8B1E9}"
  1284        Set psLicenseKey to L_cSigCjKeyControls
  1285        Set peAutoCreate to acDeferredAutoCreate
  1286    End_Procedure
  1287End_Class
  1288
  1289// Dispatch interface for GroupBox Control
  1290Class cSigCjCom_DGroupBox is a Mixin
  1291
  1292    { MethodType=Property DesignTime=False }
  1293    Function ComCaption Returns String
  1294        String retVal
  1295        Get ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to retVal
  1296        Function_Return retVal
  1297    End_Function
  1298
  1299    { MethodType=Property DesignTime=False }
  1300    Procedure Set ComCaption String value
  1301        Set ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to value
  1302    End_Procedure
  1303
  1304    { MethodType=Property DesignTime=False }
  1305    Function ComFont Returns Variant
  1306        Variant retVal
  1307        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  1308        Function_Return retVal
  1309    End_Function
  1310
  1311    { MethodType=Property DesignTime=False }
  1312    Procedure Set ComFont Variant value
  1313        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  1314    End_Procedure
  1315
  1316    { MethodType=Property DesignTime=False }
  1317    Function ComBackColor Returns OLE_COLOR
  1318        OLE_COLOR retVal
  1319        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  1320        Function_Return retVal
  1321    End_Function
  1322
  1323    { MethodType=Property DesignTime=False }
  1324    Procedure Set ComBackColor OLE_COLOR value
  1325        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  1326    End_Procedure
  1327
  1328    { MethodType=Property DesignTime=False }
  1329    Function ComForeColor Returns OLE_COLOR
  1330        OLE_COLOR retVal
  1331        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  1332        Function_Return retVal
  1333    End_Function
  1334
  1335    { MethodType=Property DesignTime=False }
  1336    Procedure Set ComForeColor OLE_COLOR value
  1337        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  1338    End_Procedure
  1339
  1340    { MethodType=Property DesignTime=False }
  1341    Function ComHWnd Returns OLE_HANDLE
  1342        OLE_HANDLE retVal
  1343        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  1344        Function_Return retVal
  1345    End_Function
  1346
  1347    { MethodType=Property DesignTime=False }
  1348    Procedure Set ComHWnd OLE_HANDLE value
  1349        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  1350    End_Procedure
  1351
  1352    { MethodType=Property DesignTime=False }
  1353    Function ComEnabled Returns Boolean
  1354        Boolean retVal
  1355        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  1356        Function_Return retVal
  1357    End_Function
  1358
  1359    { MethodType=Property DesignTime=False }
  1360    Procedure Set ComEnabled Boolean value
  1361        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  1362    End_Procedure
  1363
  1364    { MethodType=Property DesignTime=False }
  1365    Function ComTransparent Returns Boolean
  1366        Boolean retVal
  1367        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  1368        Function_Return retVal
  1369    End_Function
  1370
  1371    { MethodType=Property DesignTime=False }
  1372    Procedure Set ComTransparent Boolean value
  1373        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  1374    End_Procedure
  1375
  1376    { MethodType=Property DesignTime=False }
  1377    Function ComUseVisualStyle Returns Boolean
  1378        Boolean retVal
  1379        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  1380        Function_Return retVal
  1381    End_Function
  1382
  1383    { MethodType=Property DesignTime=False }
  1384    Procedure Set ComUseVisualStyle Boolean value
  1385        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  1386    End_Procedure
  1387
  1388    { MethodType=Property DesignTime=False }
  1389    Function ComAppearance Returns OLEAppearanceStyle
  1390        OLEAppearanceStyle retVal
  1391        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  1392        Function_Return retVal
  1393    End_Function
  1394
  1395    { MethodType=Property DesignTime=False }
  1396    Procedure Set ComAppearance OLEAppearanceStyle value
  1397        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  1398    End_Procedure
  1399
  1400    { MethodType=Property DesignTime=False }
  1401    Function ComBorderStyle Returns OLEGroupBoxBorderStyle
  1402        OLEGroupBoxBorderStyle retVal
  1403        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  1404        Function_Return retVal
  1405    End_Function
  1406
  1407    { MethodType=Property DesignTime=False }
  1408    Procedure Set ComBorderStyle OLEGroupBoxBorderStyle value
  1409        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  1410    End_Procedure
  1411
  1412    { MethodType=Property DesignTime=False }
  1413    Function ComRightToLeft Returns Boolean
  1414        Boolean retVal
  1415        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  1416        Function_Return retVal
  1417    End_Function
  1418
  1419    { MethodType=Property DesignTime=False }
  1420    Procedure Set ComRightToLeft Boolean value
  1421        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  1422    End_Procedure
  1423
  1424    Procedure ComAboutBox
  1425        Handle hDispatchDriver
  1426        Get phDispatchDriver to hDispatchDriver
  1427        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  1428    End_Procedure
  1429End_Class
  1430
  1431// Event interface for GroupBox Control
  1432Class cSigCjCom_DGroupBoxEvents is a Mixin
  1433
  1434    { MethodType=Event }
  1435    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1436    End_Procedure
  1437
  1438    { MethodType=Event }
  1439    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1440    End_Procedure
  1441
  1442    { MethodType=Event }
  1443    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1444    End_Procedure
  1445
  1446    { MethodType=Event }
  1447    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  1448    End_Procedure
  1449
  1450    { MethodType=Event }
  1451    Procedure OnComKeyPress Short ByRef llKeyAscii
  1452    End_Procedure
  1453
  1454    { MethodType=Event }
  1455    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  1456    End_Procedure
  1457
  1458    { Visibility=Private }
  1459    Procedure RegisterComEvents
  1460        Send RegisterComEvent -605 msg_OnComMouseDown
  1461        Send RegisterComEvent -606 msg_OnComMouseMove
  1462        Send RegisterComEvent -607 msg_OnComMouseUp
  1463        Send RegisterComEvent -602 msg_OnComKeyDown
  1464        Send RegisterComEvent -603 msg_OnComKeyPress
  1465        Send RegisterComEvent -604 msg_OnComKeyUp
  1466    End_Procedure
  1467End_Class
  1468
  1469// CoClass
  1470// GroupBox Control
  1471{ CLSID=L_cSigCjComGroupBox }
  1472Class cSigCjComGroupBox is a cComActiveXControl
  1473    Import_Class_Protocol cSigCjCom_DGroupBox
  1474    Import_Class_Protocol cSigCjCom_DGroupBoxEvents
  1475
  1476    Procedure Construct_Object
  1477        Forward Send Construct_Object
  1478        Set psProgID to L_cSigCjComGroupBox
  1479        Set psEventId to "{AF87BE9B-8784-4B18-976D-F889C1F8B1E9}"
  1480        Set psLicenseKey to L_cSigCjKeyControls
  1481        Set peAutoCreate to acDeferredAutoCreate
  1482    End_Procedure
  1483End_Class
  1484
  1485// Dispatch interface for ColorPicker Control
  1486Class cSigCjCom_DColorPicker is a Mixin
  1487
  1488    { MethodType=Property DesignTime=False }
  1489    Function ComCaption Returns String
  1490        String retVal
  1491        Get ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to retVal
  1492        Function_Return retVal
  1493    End_Function
  1494
  1495    { MethodType=Property DesignTime=False }
  1496    Procedure Set ComCaption String value
  1497        Set ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to value
  1498    End_Procedure
  1499
  1500    { MethodType=Property DesignTime=False }
  1501    Function ComFont Returns Variant
  1502        Variant retVal
  1503        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  1504        Function_Return retVal
  1505    End_Function
  1506
  1507    { MethodType=Property DesignTime=False }
  1508    Procedure Set ComFont Variant value
  1509        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  1510    End_Procedure
  1511
  1512    { MethodType=Property DesignTime=False }
  1513    Function ComBackColor Returns OLE_COLOR
  1514        OLE_COLOR retVal
  1515        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  1516        Function_Return retVal
  1517    End_Function
  1518
  1519    { MethodType=Property DesignTime=False }
  1520    Procedure Set ComBackColor OLE_COLOR value
  1521        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  1522    End_Procedure
  1523
  1524    { MethodType=Property DesignTime=False }
  1525    Function ComHWnd Returns OLE_HANDLE
  1526        OLE_HANDLE retVal
  1527        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  1528        Function_Return retVal
  1529    End_Function
  1530
  1531    { MethodType=Property DesignTime=False }
  1532    Procedure Set ComHWnd OLE_HANDLE value
  1533        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  1534    End_Procedure
  1535
  1536    { MethodType=Property DesignTime=False }
  1537    Function ComEnabled Returns Boolean
  1538        Boolean retVal
  1539        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  1540        Function_Return retVal
  1541    End_Function
  1542
  1543    { MethodType=Property DesignTime=False }
  1544    Procedure Set ComEnabled Boolean value
  1545        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  1546    End_Procedure
  1547
  1548    { MethodType=Property DesignTime=False }
  1549    Function ComTransparent Returns Boolean
  1550        Boolean retVal
  1551        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  1552        Function_Return retVal
  1553    End_Function
  1554
  1555    { MethodType=Property DesignTime=False }
  1556    Procedure Set ComTransparent Boolean value
  1557        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  1558    End_Procedure
  1559
  1560    { MethodType=Property DesignTime=False }
  1561    Function ComFlatStyle Returns Boolean
  1562        Boolean retVal
  1563        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  1564        Function_Return retVal
  1565    End_Function
  1566
  1567    { MethodType=Property DesignTime=False }
  1568    Procedure Set ComFlatStyle Boolean value
  1569        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  1570    End_Procedure
  1571
  1572    { MethodType=Property DesignTime=False }
  1573    Function ComUseVisualStyle Returns Boolean
  1574        Boolean retVal
  1575        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  1576        Function_Return retVal
  1577    End_Function
  1578
  1579    { MethodType=Property DesignTime=False }
  1580    Procedure Set ComUseVisualStyle Boolean value
  1581        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  1582    End_Procedure
  1583
  1584    { MethodType=Property DesignTime=False }
  1585    Function ComAppearance Returns OLEAppearanceStyle
  1586        OLEAppearanceStyle retVal
  1587        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  1588        Function_Return retVal
  1589    End_Function
  1590
  1591    { MethodType=Property DesignTime=False }
  1592    Procedure Set ComAppearance OLEAppearanceStyle value
  1593        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  1594    End_Procedure
  1595
  1596    { MethodType=Property DesignTime=False }
  1597    Function ComSelectedColor Returns OLE_COLOR
  1598        OLE_COLOR retVal
  1599        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
  1600        Function_Return retVal
  1601    End_Function
  1602
  1603    { MethodType=Property DesignTime=False }
  1604    Procedure Set ComSelectedColor OLE_COLOR value
  1605        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
  1606    End_Procedure
  1607
  1608    { MethodType=Property DesignTime=False }
  1609    Function ComDefaultColor Returns OLE_COLOR
  1610        OLE_COLOR retVal
  1611        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
  1612        Function_Return retVal
  1613    End_Function
  1614
  1615    { MethodType=Property DesignTime=False }
  1616    Procedure Set ComDefaultColor OLE_COLOR value
  1617        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
  1618    End_Procedure
  1619
  1620    { MethodType=Property DesignTime=False }
  1621    Function ComShowAutomaticColor Returns Boolean
  1622        Boolean retVal
  1623        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  1624        Function_Return retVal
  1625    End_Function
  1626
  1627    { MethodType=Property DesignTime=False }
  1628    Procedure Set ComShowAutomaticColor Boolean value
  1629        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  1630    End_Procedure
  1631
  1632    { MethodType=Property DesignTime=False }
  1633    Function ComShowMoreColors Returns Boolean
  1634        Boolean retVal
  1635        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to retVal
  1636        Function_Return retVal
  1637    End_Function
  1638
  1639    { MethodType=Property DesignTime=False }
  1640    Procedure Set ComShowMoreColors Boolean value
  1641        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to value
  1642    End_Procedure
  1643
  1644    { MethodType=Property DesignTime=False }
  1645    Function ComControlToolTip Returns String
  1646        String retVal
  1647        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  1648        Function_Return retVal
  1649    End_Function
  1650
  1651    { MethodType=Property DesignTime=False }
  1652    Procedure Set ComControlToolTip String value
  1653        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  1654    End_Procedure
  1655
  1656    Procedure ComAboutBox
  1657        Handle hDispatchDriver
  1658        Get phDispatchDriver to hDispatchDriver
  1659        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  1660    End_Procedure
  1661
  1662    { MethodType=Property DesignTime=False }
  1663    Function ComToolTipContext Returns Variant
  1664        Handle hDispatchDriver
  1665        Variant retVal
  1666        Get phDispatchDriver to hDispatchDriver
  1667        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  1668        Function_Return retVal
  1669    End_Function
  1670End_Class
  1671
  1672// Event interface for PushButton Control
  1673Class cSigCjCom_DColorPickerEvents is a Mixin
  1674
  1675    { MethodType=Event }
  1676    Procedure OnComClick
  1677    End_Procedure
  1678
  1679    { MethodType=Event }
  1680    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1681    End_Procedure
  1682
  1683    { MethodType=Event }
  1684    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1685    End_Procedure
  1686
  1687    { MethodType=Event }
  1688    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  1689    End_Procedure
  1690
  1691    { MethodType=Event }
  1692    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  1693    End_Procedure
  1694
  1695    { MethodType=Event }
  1696    Procedure OnComKeyPress Short ByRef llKeyAscii
  1697    End_Procedure
  1698
  1699    { MethodType=Event }
  1700    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  1701    End_Procedure
  1702
  1703    { Visibility=Private }
  1704    Procedure RegisterComEvents
  1705        Send RegisterComEvent -600 msg_OnComClick
  1706        Send RegisterComEvent -605 msg_OnComMouseDown
  1707        Send RegisterComEvent -606 msg_OnComMouseMove
  1708        Send RegisterComEvent -607 msg_OnComMouseUp
  1709        Send RegisterComEvent -602 msg_OnComKeyDown
  1710        Send RegisterComEvent -603 msg_OnComKeyPress
  1711        Send RegisterComEvent -604 msg_OnComKeyUp
  1712    End_Procedure
  1713End_Class
  1714
  1715// CoClass
  1716// ColorPicker Control
  1717{ CLSID=L_cSigCjComColorPicker }
  1718Class cSigCjComColorPicker is a cComActiveXControl
  1719    Import_Class_Protocol cSigCjCom_DColorPicker
  1720    Import_Class_Protocol cSigCjCom_DColorPickerEvents
  1721
  1722    Procedure Construct_Object
  1723        Forward Send Construct_Object
  1724        Set psProgID to L_cSigCjComColorPicker
  1725        Set psEventId to "{5557BE9B-8784-4B18-976D-F889C1F8B1E9}"
  1726        Set psLicenseKey to L_cSigCjKeyControls
  1727        Set peAutoCreate to acDeferredAutoCreate
  1728    End_Procedure
  1729End_Class
  1730
  1731// Dispatch interface for FlatEdit Control
  1732Class cSigCjCom_DFlatEdit is a Mixin
  1733
  1734    { MethodType=Property DesignTime=False }
  1735    Function ComBackColor Returns OLE_COLOR
  1736        OLE_COLOR retVal
  1737        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  1738        Function_Return retVal
  1739    End_Function
  1740
  1741    { MethodType=Property DesignTime=False }
  1742    Procedure Set ComBackColor OLE_COLOR value
  1743        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  1744    End_Procedure
  1745
  1746    { MethodType=Property DesignTime=False }
  1747    Function ComForeColor Returns OLE_COLOR
  1748        OLE_COLOR retVal
  1749        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  1750        Function_Return retVal
  1751    End_Function
  1752
  1753    { MethodType=Property DesignTime=False }
  1754    Procedure Set ComForeColor OLE_COLOR value
  1755        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  1756    End_Procedure
  1757
  1758    // (Member is Bindable)
  1759    // (Member is DefaultBind)
  1760    { MethodType=Property DesignTime=False }
  1761    Function ComText Returns String
  1762        String retVal
  1763        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
  1764        Function_Return retVal
  1765    End_Function
  1766
  1767    // (Member is Bindable)
  1768    // (Member is DefaultBind)
  1769    { MethodType=Property DesignTime=False }
  1770    Procedure Set ComText String value
  1771        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
  1772    End_Procedure
  1773
  1774    { MethodType=Property DesignTime=False }
  1775    Function ComEnabled Returns Boolean
  1776        Boolean retVal
  1777        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  1778        Function_Return retVal
  1779    End_Function
  1780
  1781    { MethodType=Property DesignTime=False }
  1782    Procedure Set ComEnabled Boolean value
  1783        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  1784    End_Procedure
  1785
  1786    { MethodType=Property DesignTime=False }
  1787    Function ComHWnd Returns OLE_HANDLE
  1788        OLE_HANDLE retVal
  1789        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  1790        Function_Return retVal
  1791    End_Function
  1792
  1793    { MethodType=Property DesignTime=False }
  1794    Procedure Set ComHWnd OLE_HANDLE value
  1795        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  1796    End_Procedure
  1797
  1798    { MethodType=Property DesignTime=False }
  1799    Function ComFont Returns Variant
  1800        Variant retVal
  1801        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  1802        Function_Return retVal
  1803    End_Function
  1804
  1805    { MethodType=Property DesignTime=False }
  1806    Procedure Set ComFont Variant value
  1807        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  1808    End_Procedure
  1809
  1810    { MethodType=Property DesignTime=False }
  1811    Function ComTransparent Returns Boolean
  1812        Boolean retVal
  1813        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  1814        Function_Return retVal
  1815    End_Function
  1816
  1817    { MethodType=Property DesignTime=False }
  1818    Procedure Set ComTransparent Boolean value
  1819        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  1820    End_Procedure
  1821
  1822    { MethodType=Property DesignTime=False }
  1823    Function ComFlatStyle Returns Boolean
  1824        Boolean retVal
  1825        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  1826        Function_Return retVal
  1827    End_Function
  1828
  1829    { MethodType=Property DesignTime=False }
  1830    Procedure Set ComFlatStyle Boolean value
  1831        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  1832    End_Procedure
  1833
  1834    { MethodType=Property DesignTime=False }
  1835    Function ComUseVisualStyle Returns Boolean
  1836        Boolean retVal
  1837        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  1838        Function_Return retVal
  1839    End_Function
  1840
  1841    { MethodType=Property DesignTime=False }
  1842    Procedure Set ComUseVisualStyle Boolean value
  1843        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  1844    End_Procedure
  1845
  1846    { MethodType=Property DesignTime=False }
  1847    Function ComAlignment Returns OLEEditAlignment
  1848        OLEEditAlignment retVal
  1849        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  1850        Function_Return retVal
  1851    End_Function
  1852
  1853    { MethodType=Property DesignTime=False }
  1854    Procedure Set ComAlignment OLEEditAlignment value
  1855        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  1856    End_Procedure
  1857
  1858    { MethodType=Property DesignTime=False }
  1859    Function ComHideSelection Returns Boolean
  1860        Boolean retVal
  1861        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  1862        Function_Return retVal
  1863    End_Function
  1864
  1865    { MethodType=Property DesignTime=False }
  1866    Procedure Set ComHideSelection Boolean value
  1867        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  1868    End_Procedure
  1869
  1870    { MethodType=Property DesignTime=False }
  1871    Function ComLocked Returns Boolean
  1872        Boolean retVal
  1873        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  1874        Function_Return retVal
  1875    End_Function
  1876
  1877    { MethodType=Property DesignTime=False }
  1878    Procedure Set ComLocked Boolean value
  1879        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  1880    End_Procedure
  1881
  1882    { MethodType=Property DesignTime=False }
  1883    Function ComMaxLength Returns Integer
  1884        Integer retVal
  1885        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  1886        Function_Return retVal
  1887    End_Function
  1888
  1889    { MethodType=Property DesignTime=False }
  1890    Procedure Set ComMaxLength Integer value
  1891        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  1892    End_Procedure
  1893
  1894    { MethodType=Property DesignTime=False }
  1895    Function ComMultiLine Returns Boolean
  1896        Boolean retVal
  1897        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  1898        Function_Return retVal
  1899    End_Function
  1900
  1901    { MethodType=Property DesignTime=False }
  1902    Procedure Set ComMultiLine Boolean value
  1903        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  1904    End_Procedure
  1905
  1906    { MethodType=Property DesignTime=False }
  1907    Function ComPasswordChar Returns String
  1908        String retVal
  1909        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BSTR to retVal
  1910        Function_Return retVal
  1911    End_Function
  1912
  1913    { MethodType=Property DesignTime=False }
  1914    Procedure Set ComPasswordChar String value
  1915        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BSTR to value
  1916    End_Procedure
  1917
  1918    { MethodType=Property DesignTime=False }
  1919    Function ComScrollBars Returns OLEEditScrollBars
  1920        OLEEditScrollBars retVal
  1921        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  1922        Function_Return retVal
  1923    End_Function
  1924
  1925    { MethodType=Property DesignTime=False }
  1926    Procedure Set ComScrollBars OLEEditScrollBars value
  1927        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  1928    End_Procedure
  1929
  1930    { MethodType=Property DesignTime=False }
  1931    Function ComAppearance Returns OLEAppearanceStyle
  1932        OLEAppearanceStyle retVal
  1933        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  1934        Function_Return retVal
  1935    End_Function
  1936
  1937    { MethodType=Property DesignTime=False }
  1938    Procedure Set ComAppearance OLEAppearanceStyle value
  1939        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  1940    End_Procedure
  1941
  1942    { MethodType=Property DesignTime=False }
  1943    Function ComSelLength Returns Integer
  1944        Integer retVal
  1945        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
  1946        Function_Return retVal
  1947    End_Function
  1948
  1949    { MethodType=Property DesignTime=False }
  1950    Procedure Set ComSelLength Integer value
  1951        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
  1952    End_Procedure
  1953
  1954    { MethodType=Property DesignTime=False }
  1955    Function ComSelStart Returns Integer
  1956        Integer retVal
  1957        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
  1958        Function_Return retVal
  1959    End_Function
  1960
  1961    { MethodType=Property DesignTime=False }
  1962    Procedure Set ComSelStart Integer value
  1963        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
  1964    End_Procedure
  1965
  1966    { MethodType=Property DesignTime=False }
  1967    Function ComSelText Returns String
  1968        String retVal
  1969        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BSTR to retVal
  1970        Function_Return retVal
  1971    End_Function
  1972
  1973    { MethodType=Property DesignTime=False }
  1974    Procedure Set ComSelText String value
  1975        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BSTR to value
  1976    End_Procedure
  1977
  1978    { MethodType=Property DesignTime=False }
  1979    Function ComPattern Returns String
  1980        String retVal
  1981        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BSTR to retVal
  1982        Function_Return retVal
  1983    End_Function
  1984
  1985    { MethodType=Property DesignTime=False }
  1986    Procedure Set ComPattern String value
  1987        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BSTR to value
  1988    End_Procedure
  1989
  1990    { MethodType=Property DesignTime=False }
  1991    Function ComRightToLeft Returns Boolean
  1992        Boolean retVal
  1993        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  1994        Function_Return retVal
  1995    End_Function
  1996
  1997    { MethodType=Property DesignTime=False }
  1998    Procedure Set ComRightToLeft Boolean value
  1999        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  2000    End_Procedure
  2001
  2002    { MethodType=Property DesignTime=False }
  2003    Function ComShowBorder Returns Boolean
  2004        Boolean retVal
  2005        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to retVal
  2006        Function_Return retVal
  2007    End_Function
  2008
  2009    { MethodType=Property DesignTime=False }
  2010    Procedure Set ComShowBorder Boolean value
  2011        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to value
  2012    End_Procedure
  2013
  2014    { MethodType=Property DesignTime=False }
  2015    Function ComMaskedText Returns String
  2016        String retVal
  2017        Get ComProperty of (phDispatchDriver(Self)) 104 OLE_VT_BSTR to retVal
  2018        Function_Return retVal
  2019    End_Function
  2020
  2021    { MethodType=Property DesignTime=False }
  2022    Procedure Set ComMaskedText String value
  2023        Set ComProperty of (phDispatchDriver(Self)) 104 OLE_VT_BSTR to value
  2024    End_Procedure
  2025
  2026    // Returns/Sets whether this control can act as an OLE drop target.
  2027    { MethodType=Property DesignTime=False }
  2028    Function ComOLEDropMode Returns OLEOLEDropConstants
  2029        OLEOLEDropConstants retVal
  2030        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
  2031        Function_Return retVal
  2032    End_Function
  2033
  2034    // Returns/Sets whether this control can act as an OLE drop target.
  2035    { MethodType=Property DesignTime=False }
  2036    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  2037        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
  2038    End_Procedure
  2039
  2040    { MethodType=Property DesignTime=False }
  2041    Function ComOLEDragMode Returns OLEOLEDragConstants
  2042        OLEOLEDragConstants retVal
  2043        Get ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to retVal
  2044        Function_Return retVal
  2045    End_Function
  2046
  2047    { MethodType=Property DesignTime=False }
  2048    Procedure Set ComOLEDragMode OLEOLEDragConstants value
  2049        Set ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to value
  2050    End_Procedure
  2051
  2052    { MethodType=Property DesignTime=False }
  2053    Function ComControlToolTip Returns String
  2054        String retVal
  2055        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  2056        Function_Return retVal
  2057    End_Function
  2058
  2059    { MethodType=Property DesignTime=False }
  2060    Procedure Set ComControlToolTip String value
  2061        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  2062    End_Procedure
  2063
  2064    { MethodType=Property DesignTime=False }
  2065    Function ComIsValid Returns Boolean
  2066        Handle hDispatchDriver
  2067        Boolean retVal
  2068        Get phDispatchDriver to hDispatchDriver
  2069        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_BOOL to retVal
  2070        Function_Return retVal
  2071    End_Function
  2072
  2073    Procedure ComSetMask String llMask String llLiteral Variant llPrompt
  2074        Handle hDispatchDriver
  2075        Get phDispatchDriver to hDispatchDriver
  2076        Send PrepareParams to hDispatchDriver 3
  2077        Send DefineParam to hDispatchDriver OLE_VT_BSTR llMask
  2078        Send DefineParam to hDispatchDriver OLE_VT_BSTR llLiteral
  2079        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llPrompt
  2080        Send InvokeComMethod to hDispatchDriver 103 OLE_VT_VOID
  2081    End_Procedure
  2082
  2083    Procedure ComAboutBox
  2084        Handle hDispatchDriver
  2085        Get phDispatchDriver to hDispatchDriver
  2086        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  2087    End_Procedure
  2088
  2089    Procedure ComOLEDrag
  2090        Handle hDispatchDriver
  2091        Get phDispatchDriver to hDispatchDriver
  2092        Send InvokeComMethod to hDispatchDriver 62 OLE_VT_VOID
  2093    End_Procedure
  2094
  2095    { MethodType=Property DesignTime=False }
  2096    Function ComToolTipContext Returns Variant
  2097        Handle hDispatchDriver
  2098        Variant retVal
  2099        Get phDispatchDriver to hDispatchDriver
  2100        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  2101        Function_Return retVal
  2102    End_Function
  2103End_Class
  2104
  2105// Event interface for FlatEdit Control
  2106Class cSigCjCom_DFlatEditEvents is a Mixin
  2107
  2108    { MethodType=Event }
  2109    Procedure OnComChange
  2110    End_Procedure
  2111
  2112    { MethodType=Event }
  2113    Procedure OnComClick
  2114    End_Procedure
  2115
  2116    { MethodType=Event }
  2117    Procedure OnComDblClick
  2118    End_Procedure
  2119
  2120    { MethodType=Event }
  2121    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2122    End_Procedure
  2123
  2124    { MethodType=Event }
  2125    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2126    End_Procedure
  2127
  2128    { MethodType=Event }
  2129    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2130    End_Procedure
  2131
  2132    { MethodType=Event }
  2133    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  2134    End_Procedure
  2135
  2136    { MethodType=Event }
  2137    Procedure OnComKeyPress Short ByRef llKeyAscii
  2138    End_Procedure
  2139
  2140    { MethodType=Event }
  2141    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  2142    End_Procedure
  2143
  2144    { MethodType=Event }
  2145    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  2146    End_Procedure
  2147
  2148    { MethodType=Event }
  2149    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2150    End_Procedure
  2151
  2152    { MethodType=Event }
  2153    Procedure OnComOLEStartDrag Variant llData Integer ByRef llAllowedEffects
  2154    End_Procedure
  2155
  2156    { MethodType=Event }
  2157    Procedure OnComOLECompleteDrag Integer ByRef llEffect
  2158    End_Procedure
  2159
  2160    { MethodType=Event }
  2161    Procedure OnComOLEGiveFeedback Integer ByRef llEffect Boolean ByRef llDefaultCursors
  2162    End_Procedure
  2163
  2164    { MethodType=Event }
  2165    Procedure OnComOLESetData Variant llData Short ByRef llDataFormat
  2166    End_Procedure
  2167
  2168    { Visibility=Private }
  2169    Procedure RegisterComEvents
  2170        Send RegisterComEvent 1 msg_OnComChange
  2171        Send RegisterComEvent -600 msg_OnComClick
  2172        Send RegisterComEvent -601 msg_OnComDblClick
  2173        Send RegisterComEvent -605 msg_OnComMouseDown
  2174        Send RegisterComEvent -606 msg_OnComMouseMove
  2175        Send RegisterComEvent -607 msg_OnComMouseUp
  2176        Send RegisterComEvent -602 msg_OnComKeyDown
  2177        Send RegisterComEvent -603 msg_OnComKeyPress
  2178        Send RegisterComEvent -604 msg_OnComKeyUp
  2179        Send RegisterComEvent 300 msg_OnComOLEDragOver
  2180        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  2181        Send RegisterComEvent 303 msg_OnComOLEStartDrag
  2182        Send RegisterComEvent 304 msg_OnComOLECompleteDrag
  2183        Send RegisterComEvent 305 msg_OnComOLEGiveFeedback
  2184        Send RegisterComEvent 306 msg_OnComOLESetData
  2185    End_Procedure
  2186End_Class
  2187
  2188// CoClass
  2189// FlatEdit Control
  2190{ CLSID=L_cSigCjComFlatEdit }
  2191Class cSigCjComFlatEdit is a cComActiveXControl
  2192    Import_Class_Protocol cSigCjCom_DFlatEdit
  2193    Import_Class_Protocol cSigCjCom_DFlatEditEvents
  2194
  2195    Procedure Construct_Object
  2196        Forward Send Construct_Object
  2197        Set psProgID to L_cSigCjComFlatEdit
  2198        Set psEventId to "{B99E3549-B654-4763-A103-A3830E7E3B2D}"
  2199        Set psLicenseKey to L_cSigCjKeyControls
  2200        Set peAutoCreate to acDeferredAutoCreate
  2201        //Connect the default bindable property
  2202        Send RegisterPropertyChangeEvent 0 msg_OnControlValueChanged
  2203    End_Procedure
  2204
  2205    Function ControlValue Returns String
  2206        //Associate the default bindable property with Get Value
  2207        String retVal
  2208        Get ComText to retVal
  2209        Function_Return retVal
  2210    End_Function
  2211
  2212    Procedure Set ControlValue String sVal
  2213        //Associate the default bindable property with Set Value
  2214        Set ComText to sVal
  2215    End_Procedure
  2216End_Class
  2217
  2218// Dispatch interface for Label Control
  2219Class cSigCjCom_DLabel is a Mixin
  2220
  2221    { MethodType=Property DesignTime=False }
  2222    Function ComBackColor Returns OLE_COLOR
  2223        OLE_COLOR retVal
  2224        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  2225        Function_Return retVal
  2226    End_Function
  2227
  2228    { MethodType=Property DesignTime=False }
  2229    Procedure Set ComBackColor OLE_COLOR value
  2230        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  2231    End_Procedure
  2232
  2233    { MethodType=Property DesignTime=False }
  2234    Function ComCaption Returns String
  2235        String retVal
  2236        Get ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to retVal
  2237        Function_Return retVal
  2238    End_Function
  2239
  2240    { MethodType=Property DesignTime=False }
  2241    Procedure Set ComCaption String value
  2242        Set ComProperty of (phDispatchDriver(Self)) -518 OLE_VT_BSTR to value
  2243    End_Procedure
  2244
  2245    { MethodType=Property DesignTime=False }
  2246    Function ComEnabled Returns Boolean
  2247        Boolean retVal
  2248        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  2249        Function_Return retVal
  2250    End_Function
  2251
  2252    { MethodType=Property DesignTime=False }
  2253    Procedure Set ComEnabled Boolean value
  2254        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  2255    End_Procedure
  2256
  2257    { MethodType=Property DesignTime=False }
  2258    Function ComFont Returns Variant
  2259        Variant retVal
  2260        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  2261        Function_Return retVal
  2262    End_Function
  2263
  2264    { MethodType=Property DesignTime=False }
  2265    Procedure Set ComFont Variant value
  2266        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  2267    End_Procedure
  2268
  2269    { MethodType=Property DesignTime=False }
  2270    Function ComForeColor Returns OLE_COLOR
  2271        OLE_COLOR retVal
  2272        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  2273        Function_Return retVal
  2274    End_Function
  2275
  2276    { MethodType=Property DesignTime=False }
  2277    Procedure Set ComForeColor OLE_COLOR value
  2278        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  2279    End_Procedure
  2280
  2281    { MethodType=Property DesignTime=False }
  2282    Function ComAlignment Returns OLEAlignmentStyle
  2283        OLEAlignmentStyle retVal
  2284        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  2285        Function_Return retVal
  2286    End_Function
  2287
  2288    { MethodType=Property DesignTime=False }
  2289    Procedure Set ComAlignment OLEAlignmentStyle value
  2290        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  2291    End_Procedure
  2292
  2293    { MethodType=Property DesignTime=False }
  2294    Function ComTransparent Returns Boolean
  2295        Boolean retVal
  2296        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  2297        Function_Return retVal
  2298    End_Function
  2299
  2300    { MethodType=Property DesignTime=False }
  2301    Procedure Set ComTransparent Boolean value
  2302        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  2303    End_Procedure
  2304
  2305    { MethodType=Property DesignTime=False }
  2306    Function ComUseMnemonic Returns Boolean
  2307        Boolean retVal
  2308        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  2309        Function_Return retVal
  2310    End_Function
  2311
  2312    { MethodType=Property DesignTime=False }
  2313    Procedure Set ComUseMnemonic Boolean value
  2314        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  2315    End_Procedure
  2316
  2317    { MethodType=Property DesignTime=False }
  2318    Function ComWordWrap Returns Boolean
  2319        Boolean retVal
  2320        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  2321        Function_Return retVal
  2322    End_Function
  2323
  2324    { MethodType=Property DesignTime=False }
  2325    Procedure Set ComWordWrap Boolean value
  2326        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  2327    End_Procedure
  2328
  2329    { MethodType=Property DesignTime=False }
  2330    Function ComRightToLeft Returns Boolean
  2331        Boolean retVal
  2332        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  2333        Function_Return retVal
  2334    End_Function
  2335
  2336    { MethodType=Property DesignTime=False }
  2337    Procedure Set ComRightToLeft Boolean value
  2338        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  2339    End_Procedure
  2340
  2341    { MethodType=Property DesignTime=False }
  2342    Function ComAutoEllipsis Returns Boolean
  2343        Boolean retVal
  2344        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  2345        Function_Return retVal
  2346    End_Function
  2347
  2348    { MethodType=Property DesignTime=False }
  2349    Procedure Set ComAutoEllipsis Boolean value
  2350        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  2351    End_Procedure
  2352
  2353    { MethodType=Property DesignTime=False }
  2354    Function ComAutoSize Returns Boolean
  2355        Boolean retVal
  2356        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  2357        Function_Return retVal
  2358    End_Function
  2359
  2360    { MethodType=Property DesignTime=False }
  2361    Procedure Set ComAutoSize Boolean value
  2362        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  2363    End_Procedure
  2364
  2365    { MethodType=Property DesignTime=False }
  2366    Function ComIcon Returns Variant
  2367        Variant retVal
  2368        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_DISPATCH to retVal
  2369        Function_Return retVal
  2370    End_Function
  2371
  2372    { MethodType=Property DesignTime=False }
  2373    Procedure Set ComIcon Variant value
  2374        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_DISPATCH to value
  2375    End_Procedure
  2376
  2377    { MethodType=Property DesignTime=False }
  2378    Function ComEnableMarkup Returns Boolean
  2379        Boolean retVal
  2380        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to retVal
  2381        Function_Return retVal
  2382    End_Function
  2383
  2384    { MethodType=Property DesignTime=False }
  2385    Procedure Set ComEnableMarkup Boolean value
  2386        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to value
  2387    End_Procedure
  2388
  2389    { MethodType=Property DesignTime=False }
  2390    Function ComMarkupContext Returns Variant
  2391        Handle hDispatchDriver
  2392        Variant retVal
  2393        Get phDispatchDriver to hDispatchDriver
  2394        Get InvokeComMethod of hDispatchDriver 25 OLE_VT_DISPATCH to retVal
  2395        Function_Return retVal
  2396    End_Function
  2397
  2398    Procedure ComAboutBox
  2399        Handle hDispatchDriver
  2400        Get phDispatchDriver to hDispatchDriver
  2401        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  2402    End_Procedure
  2403End_Class
  2404
  2405// Event interface for Label Control
  2406Class cSigCjCom_DLabelEvents is a Mixin
  2407
  2408    { MethodType=Event }
  2409    Procedure OnComClick
  2410    End_Procedure
  2411
  2412    { MethodType=Event }
  2413    Procedure OnComDblClick
  2414    End_Procedure
  2415
  2416    { MethodType=Event }
  2417    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2418    End_Procedure
  2419
  2420    { MethodType=Event }
  2421    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2422    End_Procedure
  2423
  2424    { MethodType=Event }
  2425    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2426    End_Procedure
  2427
  2428    { Visibility=Private }
  2429    Procedure RegisterComEvents
  2430        Send RegisterComEvent -600 msg_OnComClick
  2431        Send RegisterComEvent -601 msg_OnComDblClick
  2432        Send RegisterComEvent -605 msg_OnComMouseDown
  2433        Send RegisterComEvent -606 msg_OnComMouseMove
  2434        Send RegisterComEvent -607 msg_OnComMouseUp
  2435    End_Procedure
  2436End_Class
  2437
  2438// CoClass
  2439// Label Control
  2440{ CLSID=L_cSigCjComLabel }
  2441Class cSigCjComLabel is a cComActiveXControl
  2442    Import_Class_Protocol cSigCjCom_DLabel
  2443    Import_Class_Protocol cSigCjCom_DLabelEvents
  2444
  2445    Procedure Construct_Object
  2446        Forward Send Construct_Object
  2447        Set psProgID to L_cSigCjComLabel
  2448        Set psEventId to "{27F28E94-FC32-47BE-AC0C-B5F7E9D9FFCF}"
  2449        Set psLicenseKey to L_cSigCjKeyControls
  2450        Set peAutoCreate to acDeferredAutoCreate
  2451    End_Procedure
  2452End_Class
  2453
  2454// Dispatch interface for ListBox Control
  2455Class cSigCjCom_DListBox is a Mixin
  2456
  2457    { MethodType=Property DesignTime=False }
  2458    Function ComBackColor Returns OLE_COLOR
  2459        OLE_COLOR retVal
  2460        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  2461        Function_Return retVal
  2462    End_Function
  2463
  2464    { MethodType=Property DesignTime=False }
  2465    Procedure Set ComBackColor OLE_COLOR value
  2466        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  2467    End_Procedure
  2468
  2469    { MethodType=Property DesignTime=False }
  2470    Function ComForeColor Returns OLE_COLOR
  2471        OLE_COLOR retVal
  2472        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  2473        Function_Return retVal
  2474    End_Function
  2475
  2476    { MethodType=Property DesignTime=False }
  2477    Procedure Set ComForeColor OLE_COLOR value
  2478        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  2479    End_Procedure
  2480
  2481    { MethodType=Property DesignTime=False }
  2482    Function ComEnabled Returns Boolean
  2483        Boolean retVal
  2484        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  2485        Function_Return retVal
  2486    End_Function
  2487
  2488    { MethodType=Property DesignTime=False }
  2489    Procedure Set ComEnabled Boolean value
  2490        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  2491    End_Procedure
  2492
  2493    { MethodType=Property DesignTime=False }
  2494    Function ComHWnd Returns OLE_HANDLE
  2495        OLE_HANDLE retVal
  2496        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  2497        Function_Return retVal
  2498    End_Function
  2499
  2500    { MethodType=Property DesignTime=False }
  2501    Procedure Set ComHWnd OLE_HANDLE value
  2502        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  2503    End_Procedure
  2504
  2505    { MethodType=Property DesignTime=False }
  2506    Function ComFont Returns Variant
  2507        Variant retVal
  2508        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  2509        Function_Return retVal
  2510    End_Function
  2511
  2512    { MethodType=Property DesignTime=False }
  2513    Procedure Set ComFont Variant value
  2514        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  2515    End_Procedure
  2516
  2517    { MethodType=Property DesignTime=False }
  2518    Function ComFlatStyle Returns Boolean
  2519        Boolean retVal
  2520        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  2521        Function_Return retVal
  2522    End_Function
  2523
  2524    { MethodType=Property DesignTime=False }
  2525    Procedure Set ComFlatStyle Boolean value
  2526        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  2527    End_Procedure
  2528
  2529    { MethodType=Property DesignTime=False }
  2530    Function ComUseVisualStyle Returns Boolean
  2531        Boolean retVal
  2532        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  2533        Function_Return retVal
  2534    End_Function
  2535
  2536    { MethodType=Property DesignTime=False }
  2537    Procedure Set ComUseVisualStyle Boolean value
  2538        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  2539    End_Procedure
  2540
  2541    { MethodType=Property DesignTime=False }
  2542    Function ComSorted Returns Boolean
  2543        Boolean retVal
  2544        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  2545        Function_Return retVal
  2546    End_Function
  2547
  2548    { MethodType=Property DesignTime=False }
  2549    Procedure Set ComSorted Boolean value
  2550        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  2551    End_Procedure
  2552
  2553    { MethodType=Property DesignTime=False }
  2554    Function ComColumnWidth Returns Integer
  2555        Integer retVal
  2556        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  2557        Function_Return retVal
  2558    End_Function
  2559
  2560    { MethodType=Property DesignTime=False }
  2561    Procedure Set ComColumnWidth Integer value
  2562        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  2563    End_Procedure
  2564
  2565    { MethodType=Property DesignTime=False }
  2566    Function ComMultiSelect Returns OLEListBoxMultiSelectStyle
  2567        OLEListBoxMultiSelectStyle retVal
  2568        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  2569        Function_Return retVal
  2570    End_Function
  2571
  2572    { MethodType=Property DesignTime=False }
  2573    Procedure Set ComMultiSelect OLEListBoxMultiSelectStyle value
  2574        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  2575    End_Procedure
  2576
  2577    { MethodType=Property DesignTime=False }
  2578    Function ComAppearance Returns OLEAppearanceStyle
  2579        OLEAppearanceStyle retVal
  2580        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  2581        Function_Return retVal
  2582    End_Function
  2583
  2584    { MethodType=Property DesignTime=False }
  2585    Procedure Set ComAppearance OLEAppearanceStyle value
  2586        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  2587    End_Procedure
  2588
  2589    { MethodType=Property DesignTime=False }
  2590    Function ComListIndex Returns Integer
  2591        Integer retVal
  2592        Get ComProperty of (phDispatchDriver(Self)) -526 OLE_VT_I4 to retVal
  2593        Function_Return retVal
  2594    End_Function
  2595
  2596    { MethodType=Property DesignTime=False }
  2597    Procedure Set ComListIndex Integer value
  2598        Set ComProperty of (phDispatchDriver(Self)) -526 OLE_VT_I4 to value
  2599    End_Procedure
  2600
  2601    { MethodType=Property DesignTime=False }
  2602    Function ComTopIndex Returns Integer
  2603        Integer retVal
  2604        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
  2605        Function_Return retVal
  2606    End_Function
  2607
  2608    { MethodType=Property DesignTime=False }
  2609    Procedure Set ComTopIndex Integer value
  2610        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
  2611    End_Procedure
  2612
  2613    { MethodType=Property DesignTime=False }
  2614    Function ComStyle Returns OLEListBoxStyle
  2615        OLEListBoxStyle retVal
  2616        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
  2617        Function_Return retVal
  2618    End_Function
  2619
  2620    { MethodType=Property DesignTime=False }
  2621    Procedure Set ComStyle OLEListBoxStyle value
  2622        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
  2623    End_Procedure
  2624
  2625    { MethodType=Property DesignTime=False }
  2626    Function ComRightToLeft Returns Boolean
  2627        Boolean retVal
  2628        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  2629        Function_Return retVal
  2630    End_Function
  2631
  2632    { MethodType=Property DesignTime=False }
  2633    Procedure Set ComRightToLeft Boolean value
  2634        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  2635    End_Procedure
  2636
  2637    { MethodType=Property DesignTime=False }
  2638    Function ComShowBorder Returns Boolean
  2639        Boolean retVal
  2640        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to retVal
  2641        Function_Return retVal
  2642    End_Function
  2643
  2644    { MethodType=Property DesignTime=False }
  2645    Procedure Set ComShowBorder Boolean value
  2646        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to value
  2647    End_Procedure
  2648
  2649    { MethodType=Property DesignTime=False }
  2650    Function ComSelectionBackColor Returns OLE_COLOR
  2651        OLE_COLOR retVal
  2652        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
  2653        Function_Return retVal
  2654    End_Function
  2655
  2656    { MethodType=Property DesignTime=False }
  2657    Procedure Set ComSelectionBackColor OLE_COLOR value
  2658        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
  2659    End_Procedure
  2660
  2661    { MethodType=Property DesignTime=False }
  2662    Function ComSelectionForeColor Returns OLE_COLOR
  2663        OLE_COLOR retVal
  2664        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
  2665        Function_Return retVal
  2666    End_Function
  2667
  2668    { MethodType=Property DesignTime=False }
  2669    Procedure Set ComSelectionForeColor OLE_COLOR value
  2670        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
  2671    End_Procedure
  2672
  2673    { MethodType=Property DesignTime=False }
  2674    Function ComEnableMarkup Returns Boolean
  2675        Boolean retVal
  2676        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  2677        Function_Return retVal
  2678    End_Function
  2679
  2680    { MethodType=Property DesignTime=False }
  2681    Procedure Set ComEnableMarkup Boolean value
  2682        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  2683    End_Procedure
  2684
  2685    // Returns/Sets whether this control can act as an OLE drop target.
  2686    { MethodType=Property DesignTime=False }
  2687    Function ComOLEDropMode Returns OLEOLEDropConstants
  2688        OLEOLEDropConstants retVal
  2689        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
  2690        Function_Return retVal
  2691    End_Function
  2692
  2693    // Returns/Sets whether this control can act as an OLE drop target.
  2694    { MethodType=Property DesignTime=False }
  2695    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  2696        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
  2697    End_Procedure
  2698
  2699    { MethodType=Property DesignTime=False }
  2700    Function ComOLEDragMode Returns OLEOLEDragConstants
  2701        OLEOLEDragConstants retVal
  2702        Get ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to retVal
  2703        Function_Return retVal
  2704    End_Function
  2705
  2706    { MethodType=Property DesignTime=False }
  2707    Procedure Set ComOLEDragMode OLEOLEDragConstants value
  2708        Set ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to value
  2709    End_Procedure
  2710
  2711    { MethodType=Property DesignTime=False }
  2712    Function ComDrawFocusRect Returns Boolean
  2713        Boolean retVal
  2714        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to retVal
  2715        Function_Return retVal
  2716    End_Function
  2717
  2718    { MethodType=Property DesignTime=False }
  2719    Procedure Set ComDrawFocusRect Boolean value
  2720        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to value
  2721    End_Procedure
  2722
  2723    Function ComText Returns String
  2724        String retVal
  2725        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
  2726        Function_Return retVal
  2727    End_Function
  2728
  2729    { MethodType=Property DesignTime=False }
  2730    Procedure Set ComText String value
  2731        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
  2732    End_Procedure
  2733
  2734    { MethodType=Property DesignTime=False }
  2735    Function ComControlToolTip Returns String
  2736        String retVal
  2737        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  2738        Function_Return retVal
  2739    End_Function
  2740
  2741    { MethodType=Property DesignTime=False }
  2742    Procedure Set ComControlToolTip String value
  2743        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  2744    End_Procedure
  2745
  2746    { MethodType=Property DesignTime=False }
  2747    Function ComList Integer llIndex Returns String
  2748        Handle hDispatchDriver
  2749        String retVal
  2750        Get phDispatchDriver to hDispatchDriver
  2751        Send PrepareParams to hDispatchDriver 1
  2752        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2753        Get InvokeComMethod of hDispatchDriver 5 OLE_VT_BSTR to retVal
  2754        Function_Return retVal
  2755    End_Function
  2756
  2757    { MethodType=Property DesignTime=False }
  2758    Procedure Set ComList Integer llIndex String value
  2759        Handle hDispatchDriver
  2760        Get phDispatchDriver to hDispatchDriver
  2761        Send PrepareParams to hDispatchDriver 2
  2762        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2763        Set ComProperty of hDispatchDriver 5 OLE_VT_BSTR to value
  2764    End_Procedure
  2765
  2766    { MethodType=Property DesignTime=False }
  2767    Function ComListCount Returns Integer
  2768        Handle hDispatchDriver
  2769        Integer retVal
  2770        Get phDispatchDriver to hDispatchDriver
  2771        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_I4 to retVal
  2772        Function_Return retVal
  2773    End_Function
  2774
  2775    Procedure ComAddItem String llItem Variant llIndex Variant llData
  2776        Handle hDispatchDriver
  2777        Get phDispatchDriver to hDispatchDriver
  2778        Send PrepareParams to hDispatchDriver 3
  2779        Send DefineParam to hDispatchDriver OLE_VT_BSTR llItem
  2780        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
  2781        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llData
  2782        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  2783    End_Procedure
  2784
  2785    Procedure ComClear
  2786        Handle hDispatchDriver
  2787        Get phDispatchDriver to hDispatchDriver
  2788        Send InvokeComMethod to hDispatchDriver 14 OLE_VT_VOID
  2789    End_Procedure
  2790
  2791    Procedure ComRemoveItem Integer llIndex
  2792        Handle hDispatchDriver
  2793        Get phDispatchDriver to hDispatchDriver
  2794        Send PrepareParams to hDispatchDriver 1
  2795        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2796        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
  2797    End_Procedure
  2798
  2799    { MethodType=Property DesignTime=False }
  2800    Function ComSelected Integer llIndex Returns Boolean
  2801        Handle hDispatchDriver
  2802        Boolean retVal
  2803        Get phDispatchDriver to hDispatchDriver
  2804        Send PrepareParams to hDispatchDriver 1
  2805        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2806        Get InvokeComMethod of hDispatchDriver 17 OLE_VT_BOOL to retVal
  2807        Function_Return retVal
  2808    End_Function
  2809
  2810    { MethodType=Property DesignTime=False }
  2811    Procedure Set ComSelected Integer llIndex Boolean value
  2812        Handle hDispatchDriver
  2813        Get phDispatchDriver to hDispatchDriver
  2814        Send PrepareParams to hDispatchDriver 2
  2815        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2816        Set ComProperty of hDispatchDriver 17 OLE_VT_BOOL to value
  2817    End_Procedure
  2818
  2819    { MethodType=Property DesignTime=False }
  2820    Function ComSelCount Returns Integer
  2821        Handle hDispatchDriver
  2822        Integer retVal
  2823        Get phDispatchDriver to hDispatchDriver
  2824        Get InvokeComMethod of hDispatchDriver 18 OLE_VT_I4 to retVal
  2825        Function_Return retVal
  2826    End_Function
  2827
  2828    { MethodType=Property DesignTime=False }
  2829    Function ComChecked Integer llIndex Returns Boolean
  2830        Handle hDispatchDriver
  2831        Boolean retVal
  2832        Get phDispatchDriver to hDispatchDriver
  2833        Send PrepareParams to hDispatchDriver 1
  2834        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2835        Get InvokeComMethod of hDispatchDriver 25 OLE_VT_BOOL to retVal
  2836        Function_Return retVal
  2837    End_Function
  2838
  2839    { MethodType=Property DesignTime=False }
  2840    Procedure Set ComChecked Integer llIndex Boolean value
  2841        Handle hDispatchDriver
  2842        Get phDispatchDriver to hDispatchDriver
  2843        Send PrepareParams to hDispatchDriver 2
  2844        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2845        Set ComProperty of hDispatchDriver 25 OLE_VT_BOOL to value
  2846    End_Procedure
  2847
  2848    { MethodType=Property DesignTime=False }
  2849    Function ComMarkupList Integer llIndex Returns String
  2850        Handle hDispatchDriver
  2851        String retVal
  2852        Get phDispatchDriver to hDispatchDriver
  2853        Send PrepareParams to hDispatchDriver 1
  2854        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2855        Get InvokeComMethod of hDispatchDriver 28 OLE_VT_BSTR to retVal
  2856        Function_Return retVal
  2857    End_Function
  2858
  2859    { MethodType=Property DesignTime=False }
  2860    Procedure Set ComMarkupList Integer llIndex String value
  2861        Handle hDispatchDriver
  2862        Get phDispatchDriver to hDispatchDriver
  2863        Send PrepareParams to hDispatchDriver 2
  2864        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2865        Set ComProperty of hDispatchDriver 28 OLE_VT_BSTR to value
  2866    End_Procedure
  2867
  2868    { MethodType=Property DesignTime=False }
  2869    Function ComItemData Integer llIndex Returns Variant
  2870        Handle hDispatchDriver
  2871        Variant retVal
  2872        Get phDispatchDriver to hDispatchDriver
  2873        Send PrepareParams to hDispatchDriver 1
  2874        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2875        Get InvokeComMethod of hDispatchDriver 20 OLE_VT_VARIANT to retVal
  2876        Function_Return retVal
  2877    End_Function
  2878
  2879    { MethodType=Property DesignTime=False }
  2880    Procedure Set ComItemData Integer llIndex Variant value
  2881        Handle hDispatchDriver
  2882        Get phDispatchDriver to hDispatchDriver
  2883        Send PrepareParams to hDispatchDriver 2
  2884        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  2885        Set ComProperty of hDispatchDriver 20 OLE_VT_VARIANT to value
  2886    End_Procedure
  2887
  2888    Function ComFindItem Integer llIndexStart String llString Boolean llExact Returns Integer
  2889        Handle hDispatchDriver
  2890        Integer retVal
  2891        Get phDispatchDriver to hDispatchDriver
  2892        Send PrepareParams to hDispatchDriver 3
  2893        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndexStart
  2894        Send DefineParam to hDispatchDriver OLE_VT_BSTR llString
  2895        Send DefineParam to hDispatchDriver OLE_VT_BOOL llExact
  2896        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
  2897        Function_Return retVal
  2898    End_Function
  2899
  2900    { MethodType=Property DesignTime=False }
  2901    Function ComNewIndex Returns Integer
  2902        Handle hDispatchDriver
  2903        Integer retVal
  2904        Get phDispatchDriver to hDispatchDriver
  2905        Get InvokeComMethod of hDispatchDriver 24 OLE_VT_I4 to retVal
  2906        Function_Return retVal
  2907    End_Function
  2908
  2909    Procedure ComOLEDrag
  2910        Handle hDispatchDriver
  2911        Get phDispatchDriver to hDispatchDriver
  2912        Send InvokeComMethod to hDispatchDriver 62 OLE_VT_VOID
  2913    End_Procedure
  2914
  2915    Function ComHitTest Float llx Float lly Returns Integer
  2916        Handle hDispatchDriver
  2917        Integer retVal
  2918        Get phDispatchDriver to hDispatchDriver
  2919        Send PrepareParams to hDispatchDriver 2
  2920        Send DefineParam to hDispatchDriver OLE_VT_R4 llx
  2921        Send DefineParam to hDispatchDriver OLE_VT_R4 lly
  2922        Get InvokeComMethod of hDispatchDriver 63 OLE_VT_I4 to retVal
  2923        Function_Return retVal
  2924    End_Function
  2925
  2926    Procedure ComAboutBox
  2927        Handle hDispatchDriver
  2928        Get phDispatchDriver to hDispatchDriver
  2929        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  2930    End_Procedure
  2931
  2932    { MethodType=Property DesignTime=False }
  2933    Function ComToolTipContext Returns Variant
  2934        Handle hDispatchDriver
  2935        Variant retVal
  2936        Get phDispatchDriver to hDispatchDriver
  2937        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  2938        Function_Return retVal
  2939    End_Function
  2940End_Class
  2941
  2942// Event interface for ListBox Control
  2943Class cSigCjCom_DListBoxEvents is a Mixin
  2944
  2945    { MethodType=Event }
  2946    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2947    End_Procedure
  2948
  2949    { MethodType=Event }
  2950    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2951    End_Procedure
  2952
  2953    { MethodType=Event }
  2954    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2955    End_Procedure
  2956
  2957    { MethodType=Event }
  2958    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  2959    End_Procedure
  2960
  2961    { MethodType=Event }
  2962    Procedure OnComKeyPress Short ByRef llKeyAscii
  2963    End_Procedure
  2964
  2965    { MethodType=Event }
  2966    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  2967    End_Procedure
  2968
  2969    { MethodType=Event }
  2970    Procedure OnComClick
  2971    End_Procedure
  2972
  2973    { MethodType=Event }
  2974    Procedure OnComDblClick
  2975    End_Procedure
  2976
  2977    { MethodType=Event }
  2978    Procedure OnComItemCheck Integer llItem
  2979    End_Procedure
  2980
  2981    { MethodType=Event }
  2982    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  2983    End_Procedure
  2984
  2985    { MethodType=Event }
  2986    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  2987    End_Procedure
  2988
  2989    { MethodType=Event }
  2990    Procedure OnComOLEStartDrag Variant llData Integer ByRef llAllowedEffects
  2991    End_Procedure
  2992
  2993    { MethodType=Event }
  2994    Procedure OnComOLECompleteDrag Integer ByRef llEffect
  2995    End_Procedure
  2996
  2997    { MethodType=Event }
  2998    Procedure OnComOLEGiveFeedback Integer ByRef llEffect Boolean ByRef llDefaultCursors
  2999    End_Procedure
  3000
  3001    { MethodType=Event }
  3002    Procedure OnComOLESetData Variant llData Short ByRef llDataFormat
  3003    End_Procedure
  3004
  3005    { Visibility=Private }
  3006    Procedure RegisterComEvents
  3007        Send RegisterComEvent -605 msg_OnComMouseDown
  3008        Send RegisterComEvent -606 msg_OnComMouseMove
  3009        Send RegisterComEvent -607 msg_OnComMouseUp
  3010        Send RegisterComEvent -602 msg_OnComKeyDown
  3011        Send RegisterComEvent -603 msg_OnComKeyPress
  3012        Send RegisterComEvent -604 msg_OnComKeyUp
  3013        Send RegisterComEvent -600 msg_OnComClick
  3014        Send RegisterComEvent -601 msg_OnComDblClick
  3015        Send RegisterComEvent 1 msg_OnComItemCheck
  3016        Send RegisterComEvent 300 msg_OnComOLEDragOver
  3017        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  3018        Send RegisterComEvent 303 msg_OnComOLEStartDrag
  3019        Send RegisterComEvent 304 msg_OnComOLECompleteDrag
  3020        Send RegisterComEvent 305 msg_OnComOLEGiveFeedback
  3021        Send RegisterComEvent 306 msg_OnComOLESetData
  3022    End_Procedure
  3023End_Class
  3024
  3025// CoClass
  3026// ListBox Control
  3027{ CLSID=L_cSigCjComListBox }
  3028Class cSigCjComListBox is a cComActiveXControl
  3029    Import_Class_Protocol cSigCjCom_DListBox
  3030    Import_Class_Protocol cSigCjCom_DListBoxEvents
  3031
  3032    Procedure Construct_Object
  3033        Forward Send Construct_Object
  3034        Set psProgID to L_cSigCjComListBox
  3035        Set psEventId to "{28A1CBE6-4B44-4BEE-A7A8-8F5954390D95}"
  3036        Set psLicenseKey to L_cSigCjKeyControls
  3037        Set peAutoCreate to acDeferredAutoCreate
  3038    End_Procedure
  3039End_Class
  3040
  3041// Dispatch interface for ComboBox Control
  3042Class cSigCjCom_DComboBox is a Mixin
  3043
  3044    { MethodType=Property DesignTime=False }
  3045    Function ComBackColor Returns OLE_COLOR
  3046        OLE_COLOR retVal
  3047        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  3048        Function_Return retVal
  3049    End_Function
  3050
  3051    { MethodType=Property DesignTime=False }
  3052    Procedure Set ComBackColor OLE_COLOR value
  3053        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  3054    End_Procedure
  3055
  3056    { MethodType=Property DesignTime=False }
  3057    Function ComForeColor Returns OLE_COLOR
  3058        OLE_COLOR retVal
  3059        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  3060        Function_Return retVal
  3061    End_Function
  3062
  3063    { MethodType=Property DesignTime=False }
  3064    Procedure Set ComForeColor OLE_COLOR value
  3065        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  3066    End_Procedure
  3067
  3068    { MethodType=Property DesignTime=False }
  3069    Function ComEnabled Returns Boolean
  3070        Boolean retVal
  3071        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  3072        Function_Return retVal
  3073    End_Function
  3074
  3075    { MethodType=Property DesignTime=False }
  3076    Procedure Set ComEnabled Boolean value
  3077        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  3078    End_Procedure
  3079
  3080    { MethodType=Property DesignTime=False }
  3081    Function ComHWnd Returns OLE_HANDLE
  3082        OLE_HANDLE retVal
  3083        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  3084        Function_Return retVal
  3085    End_Function
  3086
  3087    { MethodType=Property DesignTime=False }
  3088    Procedure Set ComHWnd OLE_HANDLE value
  3089        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  3090    End_Procedure
  3091
  3092    { MethodType=Property DesignTime=False }
  3093    Function ComFont Returns Variant
  3094        Variant retVal
  3095        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  3096        Function_Return retVal
  3097    End_Function
  3098
  3099    { MethodType=Property DesignTime=False }
  3100    Procedure Set ComFont Variant value
  3101        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  3102    End_Procedure
  3103
  3104    { MethodType=Property DesignTime=False }
  3105    Function ComFlatStyle Returns Boolean
  3106        Boolean retVal
  3107        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  3108        Function_Return retVal
  3109    End_Function
  3110
  3111    { MethodType=Property DesignTime=False }
  3112    Procedure Set ComFlatStyle Boolean value
  3113        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  3114    End_Procedure
  3115
  3116    { MethodType=Property DesignTime=False }
  3117    Function ComUseVisualStyle Returns Boolean
  3118        Boolean retVal
  3119        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  3120        Function_Return retVal
  3121    End_Function
  3122
  3123    { MethodType=Property DesignTime=False }
  3124    Procedure Set ComUseVisualStyle Boolean value
  3125        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  3126    End_Procedure
  3127
  3128    { MethodType=Property DesignTime=False }
  3129    Function ComSorted Returns Boolean
  3130        Boolean retVal
  3131        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  3132        Function_Return retVal
  3133    End_Function
  3134
  3135    { MethodType=Property DesignTime=False }
  3136    Procedure Set ComSorted Boolean value
  3137        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  3138    End_Procedure
  3139
  3140    { MethodType=Property DesignTime=False }
  3141    Function ComLocked Returns Boolean
  3142        Boolean retVal
  3143        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  3144        Function_Return retVal
  3145    End_Function
  3146
  3147    { MethodType=Property DesignTime=False }
  3148    Procedure Set ComLocked Boolean value
  3149        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  3150    End_Procedure
  3151
  3152    { MethodType=Property DesignTime=False }
  3153    Function ComAppearance Returns OLEAppearanceStyle
  3154        OLEAppearanceStyle retVal
  3155        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  3156        Function_Return retVal
  3157    End_Function
  3158
  3159    { MethodType=Property DesignTime=False }
  3160    Procedure Set ComAppearance OLEAppearanceStyle value
  3161        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  3162    End_Procedure
  3163
  3164    { MethodType=Property DesignTime=False }
  3165    Function ComListIndex Returns Integer
  3166        Integer retVal
  3167        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  3168        Function_Return retVal
  3169    End_Function
  3170
  3171    { MethodType=Property DesignTime=False }
  3172    Procedure Set ComListIndex Integer value
  3173        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  3174    End_Procedure
  3175
  3176    { MethodType=Property DesignTime=False }
  3177    Function ComTopIndex Returns Integer
  3178        Integer retVal
  3179        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
  3180        Function_Return retVal
  3181    End_Function
  3182
  3183    { MethodType=Property DesignTime=False }
  3184    Procedure Set ComTopIndex Integer value
  3185        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
  3186    End_Procedure
  3187
  3188    { MethodType=Property DesignTime=False }
  3189    Function ComStyle Returns OLEComboBoxStyle
  3190        OLEComboBoxStyle retVal
  3191        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  3192        Function_Return retVal
  3193    End_Function
  3194
  3195    { MethodType=Property DesignTime=False }
  3196    Procedure Set ComStyle OLEComboBoxStyle value
  3197        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  3198    End_Procedure
  3199
  3200    // (Member is Bindable)
  3201    // (Member is DefaultBind)
  3202    { MethodType=Property DesignTime=False }
  3203    Function ComText Returns String
  3204        String retVal
  3205        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
  3206        Function_Return retVal
  3207    End_Function
  3208
  3209    // (Member is Bindable)
  3210    // (Member is DefaultBind)
  3211    { MethodType=Property DesignTime=False }
  3212    Procedure Set ComText String value
  3213        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
  3214    End_Procedure
  3215
  3216    { MethodType=Property DesignTime=False }
  3217    Function ComRightToLeft Returns Boolean
  3218        Boolean retVal
  3219        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  3220        Function_Return retVal
  3221    End_Function
  3222
  3223    { MethodType=Property DesignTime=False }
  3224    Procedure Set ComRightToLeft Boolean value
  3225        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  3226    End_Procedure
  3227
  3228    { MethodType=Property DesignTime=False }
  3229    Function ComDrawFocusRect Returns Boolean
  3230        Boolean retVal
  3231        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to retVal
  3232        Function_Return retVal
  3233    End_Function
  3234
  3235    { MethodType=Property DesignTime=False }
  3236    Procedure Set ComDrawFocusRect Boolean value
  3237        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BOOL to value
  3238    End_Procedure
  3239
  3240    { MethodType=Property DesignTime=False }
  3241    Function ComSelLength Returns Integer
  3242        Integer retVal
  3243        Get ComProperty of (phDispatchDriver(Self)) -548 OLE_VT_I4 to retVal
  3244        Function_Return retVal
  3245    End_Function
  3246
  3247    { MethodType=Property DesignTime=False }
  3248    Procedure Set ComSelLength Integer value
  3249        Set ComProperty of (phDispatchDriver(Self)) -548 OLE_VT_I4 to value
  3250    End_Procedure
  3251
  3252    { MethodType=Property DesignTime=False }
  3253    Function ComSelStart Returns Integer
  3254        Integer retVal
  3255        Get ComProperty of (phDispatchDriver(Self)) -547 OLE_VT_I4 to retVal
  3256        Function_Return retVal
  3257    End_Function
  3258
  3259    { MethodType=Property DesignTime=False }
  3260    Procedure Set ComSelStart Integer value
  3261        Set ComProperty of (phDispatchDriver(Self)) -547 OLE_VT_I4 to value
  3262    End_Procedure
  3263
  3264    { MethodType=Property DesignTime=False }
  3265    Function ComSelText Returns String
  3266        String retVal
  3267        Get ComProperty of (phDispatchDriver(Self)) -546 OLE_VT_BSTR to retVal
  3268        Function_Return retVal
  3269    End_Function
  3270
  3271    { MethodType=Property DesignTime=False }
  3272    Procedure Set ComSelText String value
  3273        Set ComProperty of (phDispatchDriver(Self)) -546 OLE_VT_BSTR to value
  3274    End_Procedure
  3275
  3276    { MethodType=Property DesignTime=False }
  3277    Function ComAutoComplete Returns Boolean
  3278        Boolean retVal
  3279        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_BOOL to retVal
  3280        Function_Return retVal
  3281    End_Function
  3282
  3283    { MethodType=Property DesignTime=False }
  3284    Procedure Set ComAutoComplete Boolean value
  3285        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_BOOL to value
  3286    End_Procedure
  3287
  3288    { MethodType=Property DesignTime=False }
  3289    Function ComDropDownItemCount Returns Integer
  3290        Integer retVal
  3291        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
  3292        Function_Return retVal
  3293    End_Function
  3294
  3295    { MethodType=Property DesignTime=False }
  3296    Procedure Set ComDropDownItemCount Integer value
  3297        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
  3298    End_Procedure
  3299
  3300    { MethodType=Property DesignTime=False }
  3301    Function ComDropDownWidth Returns Integer
  3302        Integer retVal
  3303        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
  3304        Function_Return retVal
  3305    End_Function
  3306
  3307    { MethodType=Property DesignTime=False }
  3308    Procedure Set ComDropDownWidth Integer value
  3309        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
  3310    End_Procedure
  3311
  3312    { MethodType=Property DesignTime=False }
  3313    Function ComMaxLength Returns Integer
  3314        Integer retVal
  3315        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_I4 to retVal
  3316        Function_Return retVal
  3317    End_Function
  3318
  3319    { MethodType=Property DesignTime=False }
  3320    Procedure Set ComMaxLength Integer value
  3321        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_I4 to value
  3322    End_Procedure
  3323
  3324    { MethodType=Property DesignTime=False }
  3325    Function ComEnableMarkup Returns Boolean
  3326        Boolean retVal
  3327        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  3328        Function_Return retVal
  3329    End_Function
  3330
  3331    { MethodType=Property DesignTime=False }
  3332    Procedure Set ComEnableMarkup Boolean value
  3333        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  3334    End_Procedure
  3335
  3336    { MethodType=Property DesignTime=False }
  3337    Function ComDroppedState Returns Boolean
  3338        Boolean retVal
  3339        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to retVal
  3340        Function_Return retVal
  3341    End_Function
  3342
  3343    { MethodType=Property DesignTime=False }
  3344    Procedure Set ComDroppedState Boolean value
  3345        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_BOOL to value
  3346    End_Procedure
  3347
  3348    { MethodType=Property DesignTime=False }
  3349    Function ComControlToolTip Returns String
  3350        String retVal
  3351        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  3352        Function_Return retVal
  3353    End_Function
  3354
  3355    { MethodType=Property DesignTime=False }
  3356    Procedure Set ComControlToolTip String value
  3357        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  3358    End_Procedure
  3359
  3360    { MethodType=Property DesignTime=False }
  3361    Function ComList Integer llIndex Returns String
  3362        Handle hDispatchDriver
  3363        String retVal
  3364        Get phDispatchDriver to hDispatchDriver
  3365        Send PrepareParams to hDispatchDriver 1
  3366        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3367        Get InvokeComMethod of hDispatchDriver 5 OLE_VT_BSTR to retVal
  3368        Function_Return retVal
  3369    End_Function
  3370
  3371    { MethodType=Property DesignTime=False }
  3372    Procedure Set ComList Integer llIndex String value
  3373        Handle hDispatchDriver
  3374        Get phDispatchDriver to hDispatchDriver
  3375        Send PrepareParams to hDispatchDriver 2
  3376        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3377        Set ComProperty of hDispatchDriver 5 OLE_VT_BSTR to value
  3378    End_Procedure
  3379
  3380    { MethodType=Property DesignTime=False }
  3381    Function ComListCount Returns Integer
  3382        Handle hDispatchDriver
  3383        Integer retVal
  3384        Get phDispatchDriver to hDispatchDriver
  3385        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_I4 to retVal
  3386        Function_Return retVal
  3387    End_Function
  3388
  3389    Procedure ComAddItem String llItem Variant llIndex Variant llData
  3390        Handle hDispatchDriver
  3391        Get phDispatchDriver to hDispatchDriver
  3392        Send PrepareParams to hDispatchDriver 3
  3393        Send DefineParam to hDispatchDriver OLE_VT_BSTR llItem
  3394        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
  3395        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llData
  3396        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  3397    End_Procedure
  3398
  3399    Procedure ComClear
  3400        Handle hDispatchDriver
  3401        Get phDispatchDriver to hDispatchDriver
  3402        Send InvokeComMethod to hDispatchDriver 14 OLE_VT_VOID
  3403    End_Procedure
  3404
  3405    Procedure ComRemoveItem Integer llIndex
  3406        Handle hDispatchDriver
  3407        Get phDispatchDriver to hDispatchDriver
  3408        Send PrepareParams to hDispatchDriver 1
  3409        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3410        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
  3411    End_Procedure
  3412
  3413    { MethodType=Property DesignTime=False }
  3414    Function ComItemData Integer llIndex Returns Variant
  3415        Handle hDispatchDriver
  3416        Variant retVal
  3417        Get phDispatchDriver to hDispatchDriver
  3418        Send PrepareParams to hDispatchDriver 1
  3419        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3420        Get InvokeComMethod of hDispatchDriver 20 OLE_VT_VARIANT to retVal
  3421        Function_Return retVal
  3422    End_Function
  3423
  3424    { MethodType=Property DesignTime=False }
  3425    Procedure Set ComItemData Integer llIndex Variant value
  3426        Handle hDispatchDriver
  3427        Get phDispatchDriver to hDispatchDriver
  3428        Send PrepareParams to hDispatchDriver 2
  3429        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3430        Set ComProperty of hDispatchDriver 20 OLE_VT_VARIANT to value
  3431    End_Procedure
  3432
  3433    Function ComFindItem Integer llIndexStart String llString Boolean llExact Returns Integer
  3434        Handle hDispatchDriver
  3435        Integer retVal
  3436        Get phDispatchDriver to hDispatchDriver
  3437        Send PrepareParams to hDispatchDriver 3
  3438        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndexStart
  3439        Send DefineParam to hDispatchDriver OLE_VT_BSTR llString
  3440        Send DefineParam to hDispatchDriver OLE_VT_BOOL llExact
  3441        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
  3442        Function_Return retVal
  3443    End_Function
  3444
  3445    { MethodType=Property DesignTime=False }
  3446    Function ComNewIndex Returns Integer
  3447        Handle hDispatchDriver
  3448        Integer retVal
  3449        Get phDispatchDriver to hDispatchDriver
  3450        Get InvokeComMethod of hDispatchDriver 24 OLE_VT_I4 to retVal
  3451        Function_Return retVal
  3452    End_Function
  3453
  3454    { MethodType=Property DesignTime=False }
  3455    Function ComMarkupList Integer llIndex Returns String
  3456        Handle hDispatchDriver
  3457        String retVal
  3458        Get phDispatchDriver to hDispatchDriver
  3459        Send PrepareParams to hDispatchDriver 1
  3460        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3461        Get InvokeComMethod of hDispatchDriver 28 OLE_VT_BSTR to retVal
  3462        Function_Return retVal
  3463    End_Function
  3464
  3465    { MethodType=Property DesignTime=False }
  3466    Procedure Set ComMarkupList Integer llIndex String value
  3467        Handle hDispatchDriver
  3468        Get phDispatchDriver to hDispatchDriver
  3469        Send PrepareParams to hDispatchDriver 2
  3470        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  3471        Set ComProperty of hDispatchDriver 28 OLE_VT_BSTR to value
  3472    End_Procedure
  3473
  3474    Procedure ComAboutBox
  3475        Handle hDispatchDriver
  3476        Get phDispatchDriver to hDispatchDriver
  3477        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  3478    End_Procedure
  3479
  3480    { MethodType=Property DesignTime=False }
  3481    Function ComToolTipContext Returns Variant
  3482        Handle hDispatchDriver
  3483        Variant retVal
  3484        Get phDispatchDriver to hDispatchDriver
  3485        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  3486        Function_Return retVal
  3487    End_Function
  3488End_Class
  3489
  3490// Event interface for ComboBox Control
  3491Class cSigCjCom_DComboBoxEvents is a Mixin
  3492
  3493    { MethodType=Event }
  3494    Procedure OnComClick
  3495    End_Procedure
  3496
  3497    { MethodType=Event }
  3498    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  3499    End_Procedure
  3500
  3501    { MethodType=Event }
  3502    Procedure OnComKeyPress Short ByRef llKeyAscii
  3503    End_Procedure
  3504
  3505    { MethodType=Event }
  3506    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  3507    End_Procedure
  3508
  3509    { MethodType=Event }
  3510    Procedure OnComChange
  3511    End_Procedure
  3512
  3513    { MethodType=Event }
  3514    Procedure OnComDblClick
  3515    End_Procedure
  3516
  3517    { MethodType=Event }
  3518    Procedure OnComDropDown
  3519    End_Procedure
  3520
  3521    { Visibility=Private }
  3522    Procedure RegisterComEvents
  3523        Send RegisterComEvent -601 msg_OnComDblClick
  3524        Send RegisterComEvent -602 msg_OnComKeyDown
  3525        Send RegisterComEvent -603 msg_OnComKeyPress
  3526        Send RegisterComEvent -604 msg_OnComKeyUp
  3527        Send RegisterComEvent -600 msg_OnComClick
  3528        Send RegisterComEvent 1 msg_OnComChange
  3529        Send RegisterComEvent 2 msg_OnComDropDown
  3530    End_Procedure
  3531End_Class
  3532
  3533// CoClass
  3534// ComboBox Control
  3535{ CLSID=L_cSigCjComComboBox }
  3536Class cSigCjComComboBox is a cComActiveXControl
  3537    Import_Class_Protocol cSigCjCom_DComboBox
  3538    Import_Class_Protocol cSigCjCom_DComboBoxEvents
  3539
  3540    Procedure Construct_Object
  3541        Forward Send Construct_Object
  3542        Set psProgID to L_cSigCjComComboBox
  3543        Set psEventId to "{FFA1CBE6-4B44-4BEE-A7A8-8F5954390D95}"
  3544        Set psLicenseKey to L_cSigCjKeyControls
  3545        Set peAutoCreate to acDeferredAutoCreate
  3546        //Connect the default bindable property
  3547        Send RegisterPropertyChangeEvent 0 msg_OnControlValueChanged
  3548    End_Procedure
  3549
  3550    Function ControlValue Returns String
  3551        //Associate the default bindable property with Get Value
  3552        String retVal
  3553        Get ComText to retVal
  3554        Function_Return retVal
  3555    End_Function
  3556
  3557    Procedure Set ControlValue String sVal
  3558        //Associate the default bindable property with Set Value
  3559        Set ComText to sVal
  3560    End_Procedure
  3561End_Class
  3562
  3563// Dispatch interface for Resizer Control
  3564Class cSigCjCom_DResizer is a Mixin
  3565
  3566    { MethodType=Property DesignTime=False }
  3567    Function ComBackColor Returns OLE_COLOR
  3568        OLE_COLOR retVal
  3569        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  3570        Function_Return retVal
  3571    End_Function
  3572
  3573    { MethodType=Property DesignTime=False }
  3574    Procedure Set ComBackColor OLE_COLOR value
  3575        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  3576    End_Procedure
  3577
  3578    { MethodType=Property DesignTime=False }
  3579    Function ComHWnd Returns OLE_HANDLE
  3580        OLE_HANDLE retVal
  3581        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  3582        Function_Return retVal
  3583    End_Function
  3584
  3585    { MethodType=Property DesignTime=False }
  3586    Procedure Set ComHWnd OLE_HANDLE value
  3587        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  3588    End_Procedure
  3589
  3590    { MethodType=Property DesignTime=False }
  3591    Function ComVScrollLargeChange Returns Integer
  3592        Integer retVal
  3593        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  3594        Function_Return retVal
  3595    End_Function
  3596
  3597    { MethodType=Property DesignTime=False }
  3598    Procedure Set ComVScrollLargeChange Integer value
  3599        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  3600    End_Procedure
  3601
  3602    { MethodType=Property DesignTime=False }
  3603    Function ComVScrollSmallChange Returns Integer
  3604        Integer retVal
  3605        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  3606        Function_Return retVal
  3607    End_Function
  3608
  3609    { MethodType=Property DesignTime=False }
  3610    Procedure Set ComVScrollSmallChange Integer value
  3611        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  3612    End_Procedure
  3613
  3614    { MethodType=Property DesignTime=False }
  3615    Function ComVScrollPosition Returns Integer
  3616        Integer retVal
  3617        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  3618        Function_Return retVal
  3619    End_Function
  3620
  3621    { MethodType=Property DesignTime=False }
  3622    Procedure Set ComVScrollPosition Integer value
  3623        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  3624    End_Procedure
  3625
  3626    { MethodType=Property DesignTime=False }
  3627    Function ComVScrollMaximum Returns Integer
  3628        Integer retVal
  3629        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  3630        Function_Return retVal
  3631    End_Function
  3632
  3633    { MethodType=Property DesignTime=False }
  3634    Procedure Set ComVScrollMaximum Integer value
  3635        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  3636    End_Procedure
  3637
  3638    { MethodType=Property DesignTime=False }
  3639    Function ComHScrollLargeChange Returns Integer
  3640        Integer retVal
  3641        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  3642        Function_Return retVal
  3643    End_Function
  3644
  3645    { MethodType=Property DesignTime=False }
  3646    Procedure Set ComHScrollLargeChange Integer value
  3647        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  3648    End_Procedure
  3649
  3650    { MethodType=Property DesignTime=False }
  3651    Function ComHScrollSmallChange Returns Integer
  3652        Integer retVal
  3653        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  3654        Function_Return retVal
  3655    End_Function
  3656
  3657    { MethodType=Property DesignTime=False }
  3658    Procedure Set ComHScrollSmallChange Integer value
  3659        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  3660    End_Procedure
  3661
  3662    { MethodType=Property DesignTime=False }
  3663    Function ComHScrollPosition Returns Integer
  3664        Integer retVal
  3665        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  3666        Function_Return retVal
  3667    End_Function
  3668
  3669    { MethodType=Property DesignTime=False }
  3670    Procedure Set ComHScrollPosition Integer value
  3671        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  3672    End_Procedure
  3673
  3674    { MethodType=Property DesignTime=False }
  3675    Function ComHScrollMaximum Returns Integer
  3676        Integer retVal
  3677        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  3678        Function_Return retVal
  3679    End_Function
  3680
  3681    { MethodType=Property DesignTime=False }
  3682    Procedure Set ComHScrollMaximum Integer value
  3683        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  3684    End_Procedure
  3685
  3686    { MethodType=Property DesignTime=False }
  3687    Function ComMouseIcon Returns Variant
  3688        Variant retVal
  3689        Get ComProperty of (phDispatchDriver(Self)) -522 OLE_VT_DISPATCH to retVal
  3690        Function_Return retVal
  3691    End_Function
  3692
  3693    { MethodType=Property DesignTime=False }
  3694    Procedure Set ComMouseIcon Variant value
  3695        Set ComProperty of (phDispatchDriver(Self)) -522 OLE_VT_DISPATCH to value
  3696    End_Procedure
  3697
  3698    { MethodType=Property DesignTime=False }
  3699    Function ComBorderStyle Returns OLEResizerBorderStyle
  3700        OLEResizerBorderStyle retVal
  3701        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  3702        Function_Return retVal
  3703    End_Function
  3704
  3705    { MethodType=Property DesignTime=False }
  3706    Procedure Set ComBorderStyle OLEResizerBorderStyle value
  3707        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  3708    End_Procedure
  3709
  3710    { MethodType=Property DesignTime=False }
  3711    Function ComAutoSize Returns Boolean
  3712        Boolean retVal
  3713        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
  3714        Function_Return retVal
  3715    End_Function
  3716
  3717    { MethodType=Property DesignTime=False }
  3718    Procedure Set ComAutoSize Boolean value
  3719        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
  3720    End_Procedure
  3721
  3722    { MethodType=Property DesignTime=False }
  3723    Function ComShowSizeIcon Returns Boolean
  3724        Boolean retVal
  3725        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to retVal
  3726        Function_Return retVal
  3727    End_Function
  3728
  3729    { MethodType=Property DesignTime=False }
  3730    Procedure Set ComShowSizeIcon Boolean value
  3731        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to value
  3732    End_Procedure
  3733
  3734    { MethodType=Property DesignTime=False }
  3735    Function ComClientMinWidth Returns Integer
  3736        Integer retVal
  3737        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
  3738        Function_Return retVal
  3739    End_Function
  3740
  3741    { MethodType=Property DesignTime=False }
  3742    Procedure Set ComClientMinWidth Integer value
  3743        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
  3744    End_Procedure
  3745
  3746    { MethodType=Property DesignTime=False }
  3747    Function ComClientMinHeight Returns Integer
  3748        Integer retVal
  3749        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
  3750        Function_Return retVal
  3751    End_Function
  3752
  3753    { MethodType=Property DesignTime=False }
  3754    Procedure Set ComClientMinHeight Integer value
  3755        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
  3756    End_Procedure
  3757
  3758    { MethodType=Property DesignTime=False }
  3759    Function ComClientMaxWidth Returns Integer
  3760        Integer retVal
  3761        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
  3762        Function_Return retVal
  3763    End_Function
  3764
  3765    { MethodType=Property DesignTime=False }
  3766    Procedure Set ComClientMaxWidth Integer value
  3767        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
  3768    End_Procedure
  3769
  3770    { MethodType=Property DesignTime=False }
  3771    Function ComClientMaxHeight Returns Integer
  3772        Integer retVal
  3773        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  3774        Function_Return retVal
  3775    End_Function
  3776
  3777    { MethodType=Property DesignTime=False }
  3778    Procedure Set ComClientMaxHeight Integer value
  3779        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  3780    End_Procedure
  3781
  3782    Procedure ComAddControl String llName Integer llx Integer lly Integer llWidth Integer llHeight
  3783        Handle hDispatchDriver
  3784        Get phDispatchDriver to hDispatchDriver
  3785        Send PrepareParams to hDispatchDriver 5
  3786        Send DefineParam to hDispatchDriver OLE_VT_BSTR llName
  3787        Send DefineParam to hDispatchDriver OLE_VT_I4 llx
  3788        Send DefineParam to hDispatchDriver OLE_VT_I4 lly
  3789        Send DefineParam to hDispatchDriver OLE_VT_I4 llWidth
  3790        Send DefineParam to hDispatchDriver OLE_VT_I4 llHeight
  3791        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
  3792    End_Procedure
  3793
  3794    Procedure ComAboutBox
  3795        Handle hDispatchDriver
  3796        Get phDispatchDriver to hDispatchDriver
  3797        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  3798    End_Procedure
  3799End_Class
  3800
  3801// Event interface for Resizer Control
  3802Class cSigCjCom_DResizerEvents is a Mixin
  3803
  3804    { MethodType=Event }
  3805    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  3806    End_Procedure
  3807
  3808    { MethodType=Event }
  3809    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  3810    End_Procedure
  3811
  3812    { MethodType=Event }
  3813    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  3814    End_Procedure
  3815
  3816    { MethodType=Event }
  3817    Procedure OnComDblClick
  3818    End_Procedure
  3819
  3820    { MethodType=Event }
  3821    Procedure OnComVScroll
  3822    End_Procedure
  3823
  3824    { MethodType=Event }
  3825    Procedure OnComHScroll
  3826    End_Procedure
  3827
  3828    { MethodType=Event }
  3829    Procedure OnComMouseWheel Short llzDelta
  3830    End_Procedure
  3831
  3832    { Visibility=Private }
  3833    Procedure RegisterComEvents
  3834        Send RegisterComEvent -605 msg_OnComMouseDown
  3835        Send RegisterComEvent -606 msg_OnComMouseMove
  3836        Send RegisterComEvent -607 msg_OnComMouseUp
  3837        Send RegisterComEvent -601 msg_OnComDblClick
  3838        Send RegisterComEvent 1 msg_OnComVScroll
  3839        Send RegisterComEvent 2 msg_OnComHScroll
  3840        Send RegisterComEvent 3 msg_OnComMouseWheel
  3841    End_Procedure
  3842End_Class
  3843
  3844// CoClass
  3845// Resizer Control
  3846{ CLSID=L_cSigCjComResizer }
  3847Class cSigCjComResizer is a cComActiveXControl
  3848    Import_Class_Protocol cSigCjCom_DResizer
  3849    Import_Class_Protocol cSigCjCom_DResizerEvents
  3850
  3851    Procedure Construct_Object
  3852        Forward Send Construct_Object
  3853        Set psProgID to L_cSigCjComResizer
  3854        Set psEventId to "{5CCF5EAE-9731-436F-8D92-C949D200ADA1}"
  3855        Set psLicenseKey to L_cSigCjKeyControls
  3856        Set peAutoCreate to acDeferredAutoCreate
  3857    End_Procedure
  3858End_Class
  3859
  3860// Dispatch interface for TabControl Control
  3861Class cSigCjCom_DTabControl is a Mixin
  3862
  3863    { MethodType=Property DesignTime=False }
  3864    Function ComHWnd Returns OLE_HANDLE
  3865        OLE_HANDLE retVal
  3866        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  3867        Function_Return retVal
  3868    End_Function
  3869
  3870    { MethodType=Property DesignTime=False }
  3871    Procedure Set ComHWnd OLE_HANDLE value
  3872        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  3873    End_Procedure
  3874
  3875    { MethodType=Property DesignTime=False }
  3876    Function ComEnabled Returns Boolean
  3877        Boolean retVal
  3878        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  3879        Function_Return retVal
  3880    End_Function
  3881
  3882    { MethodType=Property DesignTime=False }
  3883    Procedure Set ComEnabled Boolean value
  3884        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  3885    End_Procedure
  3886
  3887    { MethodType=Property DesignTime=False }
  3888    Function ComFont Returns Variant
  3889        Variant retVal
  3890        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  3891        Function_Return retVal
  3892    End_Function
  3893
  3894    { MethodType=Property DesignTime=False }
  3895    Procedure Set ComFont Variant value
  3896        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  3897    End_Procedure
  3898
  3899    { MethodType=Property DesignTime=False }
  3900    Function ComAllowReorder Returns Boolean
  3901        Boolean retVal
  3902        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  3903        Function_Return retVal
  3904    End_Function
  3905
  3906    { MethodType=Property DesignTime=False }
  3907    Procedure Set ComAllowReorder Boolean value
  3908        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  3909    End_Procedure
  3910
  3911    { MethodType=Property DesignTime=False }
  3912    Function ComIcons Returns Variant
  3913        Variant retVal
  3914        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to retVal
  3915        Function_Return retVal
  3916    End_Function
  3917
  3918    { MethodType=Property DesignTime=False }
  3919    Procedure Set ComIcons Variant value
  3920        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to value
  3921    End_Procedure
  3922
  3923    { MethodType=Property DesignTime=False }
  3924    Function ComDrawFocusRect Returns Boolean
  3925        Boolean retVal
  3926        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BOOL to retVal
  3927        Function_Return retVal
  3928    End_Function
  3929
  3930    { MethodType=Property DesignTime=False }
  3931    Procedure Set ComDrawFocusRect Boolean value
  3932        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BOOL to value
  3933    End_Procedure
  3934
  3935    { MethodType=Property DesignTime=False }
  3936    Function ComRightToLeft Returns Boolean
  3937        Boolean retVal
  3938        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  3939        Function_Return retVal
  3940    End_Function
  3941
  3942    { MethodType=Property DesignTime=False }
  3943    Procedure Set ComRightToLeft Boolean value
  3944        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  3945    End_Procedure
  3946
  3947    { MethodType=Property DesignTime=False }
  3948    Function ComAutoResizeClient Returns Boolean
  3949        Boolean retVal
  3950        Get ComProperty of (phDispatchDriver(Self)) 38 OLE_VT_BOOL to retVal
  3951        Function_Return retVal
  3952    End_Function
  3953
  3954    { MethodType=Property DesignTime=False }
  3955    Procedure Set ComAutoResizeClient Boolean value
  3956        Set ComProperty of (phDispatchDriver(Self)) 38 OLE_VT_BOOL to value
  3957    End_Procedure
  3958
  3959    { MethodType=Property DesignTime=False }
  3960    Function ComItemCount Returns Integer
  3961        Integer retVal
  3962        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  3963        Function_Return retVal
  3964    End_Function
  3965
  3966    { MethodType=Property DesignTime=False }
  3967    Procedure Set ComItemCount Integer value
  3968        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  3969    End_Procedure
  3970
  3971    { MethodType=Property DesignTime=False }
  3972    Function ComSelectedItem Returns Integer
  3973        Integer retVal
  3974        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_I4 to retVal
  3975        Function_Return retVal
  3976    End_Function
  3977
  3978    { MethodType=Property DesignTime=False }
  3979    Procedure Set ComSelectedItem Integer value
  3980        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_I4 to value
  3981    End_Procedure
  3982
  3983    { MethodType=Property DesignTime=False }
  3984    Function ComAppearance Returns OLEXTPTabAppearanceStyle
  3985        OLEXTPTabAppearanceStyle retVal
  3986        Get ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_I4 to retVal
  3987        Function_Return retVal
  3988    End_Function
  3989
  3990    { MethodType=Property DesignTime=False }
  3991    Procedure Set ComAppearance OLEXTPTabAppearanceStyle value
  3992        Set ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_I4 to value
  3993    End_Procedure
  3994
  3995    { MethodType=Property DesignTime=False }
  3996    Function ComColor Returns OLEXTPTabColorStyle
  3997        OLEXTPTabColorStyle retVal
  3998        Get ComProperty of (phDispatchDriver(Self)) 42 OLE_VT_I4 to retVal
  3999        Function_Return retVal
  4000    End_Function
  4001
  4002    { MethodType=Property DesignTime=False }
  4003    Procedure Set ComColor OLEXTPTabColorStyle value
  4004        Set ComProperty of (phDispatchDriver(Self)) 42 OLE_VT_I4 to value
  4005    End_Procedure
  4006
  4007    { MethodType=Property DesignTime=False }
  4008    Function ComHeaderScrollOffset Returns Integer
  4009        Integer retVal
  4010        Get ComProperty of (phDispatchDriver(Self)) 45 OLE_VT_I4 to retVal
  4011        Function_Return retVal
  4012    End_Function
  4013
  4014    { MethodType=Property DesignTime=False }
  4015    Procedure Set ComHeaderScrollOffset Integer value
  4016        Set ComProperty of (phDispatchDriver(Self)) 45 OLE_VT_I4 to value
  4017    End_Procedure
  4018
  4019    { MethodType=Property DesignTime=False }
  4020    Function ComEnableMarkup Returns Boolean
  4021        Boolean retVal
  4022        Get ComProperty of (phDispatchDriver(Self)) 46 OLE_VT_BOOL to retVal
  4023        Function_Return retVal
  4024    End_Function
  4025
  4026    { MethodType=Property DesignTime=False }
  4027    Procedure Set ComEnableMarkup Boolean value
  4028        Set ComProperty of (phDispatchDriver(Self)) 46 OLE_VT_BOOL to value
  4029    End_Procedure
  4030
  4031    // Returns/Sets whether this control can act as an OLE drop target.
  4032    { MethodType=Property DesignTime=False }
  4033    Function ComOLEDropMode Returns OLEOLEDropConstants
  4034        OLEOLEDropConstants retVal
  4035        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
  4036        Function_Return retVal
  4037    End_Function
  4038
  4039    // Returns/Sets whether this control can act as an OLE drop target.
  4040    { MethodType=Property DesignTime=False }
  4041    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  4042        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
  4043    End_Procedure
  4044
  4045    { MethodType=Property DesignTime=False }
  4046    Function ComShowCloseItemButton Returns OLEXTPTabItemButtonFlags
  4047        OLEXTPTabItemButtonFlags retVal
  4048        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
  4049        Function_Return retVal
  4050    End_Function
  4051
  4052    { MethodType=Property DesignTime=False }
  4053    Procedure Set ComShowCloseItemButton OLEXTPTabItemButtonFlags value
  4054        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
  4055    End_Procedure
  4056
  4057    Function ComInsertItem Integer llIndex String llCaption OLE_HANDLE llChild Integer llImage Returns Variant
  4058        Handle hDispatchDriver
  4059        Variant retVal
  4060        Get phDispatchDriver to hDispatchDriver
  4061        Send PrepareParams to hDispatchDriver 4
  4062        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  4063        Send DefineParam to hDispatchDriver OLE_VT_BSTR llCaption
  4064        Send DefineParam to hDispatchDriver OLE_VT_I4 llChild
  4065        Send DefineParam to hDispatchDriver OLE_VT_I4 llImage
  4066        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_DISPATCH to retVal
  4067        Function_Return retVal
  4068    End_Function
  4069
  4070    { MethodType=Property DesignTime=False }
  4071    Function ComPaintManager Returns Variant
  4072        Handle hDispatchDriver
  4073        Variant retVal
  4074        Get phDispatchDriver to hDispatchDriver
  4075        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_DISPATCH to retVal
  4076        Function_Return retVal
  4077    End_Function
  4078
  4079    Procedure ComSetImageList Variant llImageList
  4080        Handle hDispatchDriver
  4081        Get phDispatchDriver to hDispatchDriver
  4082        Send PrepareParams to hDispatchDriver 1
  4083        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llImageList
  4084        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
  4085    End_Procedure
  4086
  4087    Procedure ComRemoveItem Integer llIndex
  4088        Handle hDispatchDriver
  4089        Get phDispatchDriver to hDispatchDriver
  4090        Send PrepareParams to hDispatchDriver 1
  4091        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  4092        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
  4093    End_Procedure
  4094
  4095    Function ComItem Integer llIndex Returns Variant
  4096        Handle hDispatchDriver
  4097        Variant retVal
  4098        Get phDispatchDriver to hDispatchDriver
  4099        Send PrepareParams to hDispatchDriver 1
  4100        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  4101        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
  4102        Function_Return retVal
  4103    End_Function
  4104
  4105    Procedure ComRemoveAll
  4106        Handle hDispatchDriver
  4107        Get phDispatchDriver to hDispatchDriver
  4108        Send InvokeComMethod to hDispatchDriver 6 OLE_VT_VOID
  4109    End_Procedure
  4110
  4111    Function ComHitTest Integer llx Integer lly Returns Variant
  4112        Handle hDispatchDriver
  4113        Variant retVal
  4114        Get phDispatchDriver to hDispatchDriver
  4115        Send PrepareParams to hDispatchDriver 2
  4116        Send DefineParam to hDispatchDriver OLE_VT_I4 llx
  4117        Send DefineParam to hDispatchDriver OLE_VT_I4 lly
  4118        Get InvokeComMethod of hDispatchDriver 9 OLE_VT_DISPATCH to retVal
  4119        Function_Return retVal
  4120    End_Function
  4121
  4122    { MethodType=Property DesignTime=False }
  4123    Function ComSelected Returns Variant
  4124        Handle hDispatchDriver
  4125        Variant retVal
  4126        Get phDispatchDriver to hDispatchDriver
  4127        Get InvokeComMethod of hDispatchDriver 10 OLE_VT_DISPATCH to retVal
  4128        Function_Return retVal
  4129    End_Function
  4130
  4131    { MethodType=Property DesignTime=False }
  4132    Function ComToolTipContext Returns Variant
  4133        Handle hDispatchDriver
  4134        Variant retVal
  4135        Get phDispatchDriver to hDispatchDriver
  4136        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_DISPATCH to retVal
  4137        Function_Return retVal
  4138    End_Function
  4139
  4140    Procedure ComShowNavigateButton OLEXTPTabNavigateButton llButton OLEXTPTabNavigateButtonFlags llFlags
  4141        Handle hDispatchDriver
  4142        Get phDispatchDriver to hDispatchDriver
  4143        Send PrepareParams to hDispatchDriver 2
  4144        Send DefineParam to hDispatchDriver OLE_VT_I4 llButton
  4145        Send DefineParam to hDispatchDriver OLE_VT_I4 llFlags
  4146        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  4147    End_Procedure
  4148
  4149    Procedure ComGetClientRect Integer ByRef llLeft Integer ByRef llTop Integer ByRef llRight Integer ByRef llBottom
  4150        Handle hDispatchDriver
  4151        Get phDispatchDriver to hDispatchDriver
  4152        Send PrepareParams to hDispatchDriver 4
  4153        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llLeft
  4154        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llTop
  4155        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llRight
  4156        Send DefineParam to hDispatchDriver (OLE_VT_BYREF ior OLE_VT_I4) llBottom
  4157        Send InvokeComMethod to hDispatchDriver 15 OLE_VT_VOID
  4158    End_Procedure
  4159
  4160    { MethodType=Property DesignTime=False }
  4161    Function ComClientLeft Returns Float
  4162        Handle hDispatchDriver
  4163        Float retVal
  4164        Get phDispatchDriver to hDispatchDriver
  4165        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_R4 to retVal
  4166        Function_Return retVal
  4167    End_Function
  4168
  4169    { MethodType=Property DesignTime=False }
  4170    Function ComClientTop Returns Float
  4171        Handle hDispatchDriver
  4172        Float retVal
  4173        Get phDispatchDriver to hDispatchDriver
  4174        Get InvokeComMethod of hDispatchDriver 17 OLE_VT_R4 to retVal
  4175        Function_Return retVal
  4176    End_Function
  4177
  4178    { MethodType=Property DesignTime=False }
  4179    Function ComClientWidth Returns Float
  4180        Handle hDispatchDriver
  4181        Float retVal
  4182        Get phDispatchDriver to hDispatchDriver
  4183        Get InvokeComMethod of hDispatchDriver 18 OLE_VT_R4 to retVal
  4184        Function_Return retVal
  4185    End_Function
  4186
  4187    { MethodType=Property DesignTime=False }
  4188    Function ComClientHeight Returns Float
  4189        Handle hDispatchDriver
  4190        Float retVal
  4191        Get phDispatchDriver to hDispatchDriver
  4192        Get InvokeComMethod of hDispatchDriver 19 OLE_VT_R4 to retVal
  4193        Function_Return retVal
  4194    End_Function
  4195
  4196    Procedure ComAboutBox
  4197        Handle hDispatchDriver
  4198        Get phDispatchDriver to hDispatchDriver
  4199        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  4200    End_Procedure
  4201End_Class
  4202
  4203// Event interface for TabControl Control
  4204Class cSigCjCom_DTabControlEvents is a Mixin
  4205
  4206    { MethodType=Event }
  4207    Procedure OnComSelectedChanged Variant llItem
  4208    End_Procedure
  4209
  4210    { MethodType=Event }
  4211    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  4212    End_Procedure
  4213
  4214    { MethodType=Event }
  4215    Procedure OnComNavigateButtonClick Integer llId Variant llCancel
  4216    End_Procedure
  4217
  4218    { MethodType=Event }
  4219    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  4220    End_Procedure
  4221
  4222    { MethodType=Event }
  4223    Procedure OnComBeforeItemClick Variant llItem Variant llCancel
  4224    End_Procedure
  4225
  4226    { MethodType=Event }
  4227    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  4228    End_Procedure
  4229
  4230    { MethodType=Event }
  4231    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  4232    End_Procedure
  4233
  4234    { MethodType=Event }
  4235    Procedure OnComItemOrderChanged Variant llItem Integer llOldIndex Integer llNewIndex
  4236    End_Procedure
  4237
  4238    { MethodType=Event }
  4239    Procedure OnComItemDblClick Variant llItem
  4240    End_Procedure
  4241
  4242    { Visibility=Private }
  4243    Procedure RegisterComEvents
  4244        Send RegisterComEvent 1 msg_OnComSelectedChanged
  4245        Send RegisterComEvent -607 msg_OnComMouseUp
  4246        Send RegisterComEvent 2 msg_OnComNavigateButtonClick
  4247        Send RegisterComEvent -606 msg_OnComMouseMove
  4248        Send RegisterComEvent 4 msg_OnComBeforeItemClick
  4249        Send RegisterComEvent 300 msg_OnComOLEDragOver
  4250        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  4251        Send RegisterComEvent 5 msg_OnComItemOrderChanged
  4252        Send RegisterComEvent 6 msg_OnComItemDblClick
  4253    End_Procedure
  4254End_Class
  4255
  4256// CoClass
  4257// TabControl Control
  4258{ CLSID=L_cSigCjComTabControl }
  4259Class cSigCjComTabControl is a cComActiveXControl
  4260    Import_Class_Protocol cSigCjCom_DTabControl
  4261    Import_Class_Protocol cSigCjCom_DTabControlEvents
  4262
  4263    Procedure Construct_Object
  4264        Forward Send Construct_Object
  4265        Set psProgID to L_cSigCjComTabControl
  4266        Set psEventId to "{9D0D8FA7-C2DC-4C83-8840-879B3C33E6BD}"
  4267        Set psLicenseKey to L_cSigCjKeyControls
  4268        Set peAutoCreate to acDeferredAutoCreate
  4269    End_Procedure
  4270End_Class
  4271
  4272// Dispatch interface for TabControlPage Control
  4273Class cSigCjCom_DTabControlPage is a Mixin
  4274
  4275    { MethodType=Property DesignTime=False }
  4276    Function ComAutoSize Returns Boolean
  4277        Boolean retVal
  4278        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  4279        Function_Return retVal
  4280    End_Function
  4281
  4282    { MethodType=Property DesignTime=False }
  4283    Procedure Set ComAutoSize Boolean value
  4284        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  4285    End_Procedure
  4286
  4287    { MethodType=Property DesignTime=False }
  4288    Function ComHWnd Returns OLE_HANDLE
  4289        OLE_HANDLE retVal
  4290        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  4291        Function_Return retVal
  4292    End_Function
  4293
  4294    { MethodType=Property DesignTime=False }
  4295    Procedure Set ComHWnd OLE_HANDLE value
  4296        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  4297    End_Procedure
  4298
  4299    { MethodType=Property DesignTime=False }
  4300    Function ComBackColor Returns OLE_COLOR
  4301        OLE_COLOR retVal
  4302        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  4303        Function_Return retVal
  4304    End_Function
  4305
  4306    { MethodType=Property DesignTime=False }
  4307    Procedure Set ComBackColor OLE_COLOR value
  4308        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  4309    End_Procedure
  4310
  4311    // Returns/Sets whether this control can act as an OLE drop target.
  4312    { MethodType=Property DesignTime=False }
  4313    Function ComOLEDropMode Returns OLEOLEDropConstants
  4314        OLEOLEDropConstants retVal
  4315        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
  4316        Function_Return retVal
  4317    End_Function
  4318
  4319    // Returns/Sets whether this control can act as an OLE drop target.
  4320    { MethodType=Property DesignTime=False }
  4321    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  4322        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
  4323    End_Procedure
  4324
  4325    { MethodType=Property DesignTime=False }
  4326    Function ComPicture Returns Variant
  4327        Variant retVal
  4328        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to retVal
  4329        Function_Return retVal
  4330    End_Function
  4331
  4332    { MethodType=Property DesignTime=False }
  4333    Procedure Set ComPicture Variant value
  4334        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DISPATCH to value
  4335    End_Procedure
  4336
  4337    { MethodType=Property DesignTime=False }
  4338    Function ComPictureAlignment Returns OLEPictureAlignmentStyle
  4339        OLEPictureAlignmentStyle retVal
  4340        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
  4341        Function_Return retVal
  4342    End_Function
  4343
  4344    { MethodType=Property DesignTime=False }
  4345    Procedure Set ComPictureAlignment OLEPictureAlignmentStyle value
  4346        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
  4347    End_Procedure
  4348
  4349    Procedure ComAboutBox
  4350        Handle hDispatchDriver
  4351        Get phDispatchDriver to hDispatchDriver
  4352        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  4353    End_Procedure
  4354End_Class
  4355
  4356// Event interface for TabControlPage Control
  4357Class cSigCjCom_DTabControlPageEvents is a Mixin
  4358
  4359    { MethodType=Event }
  4360    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  4361    End_Procedure
  4362
  4363    { MethodType=Event }
  4364    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  4365    End_Procedure
  4366
  4367    { MethodType=Event }
  4368    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  4369    End_Procedure
  4370
  4371    { MethodType=Event }
  4372    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  4373    End_Procedure
  4374
  4375    { Visibility=Private }
  4376    Procedure RegisterComEvents
  4377        Send RegisterComEvent -605 msg_OnComMouseDown
  4378        Send RegisterComEvent -607 msg_OnComMouseUp
  4379        Send RegisterComEvent 300 msg_OnComOLEDragOver
  4380        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  4381    End_Procedure
  4382End_Class
  4383
  4384// CoClass
  4385// TabControlPage Control
  4386{ CLSID=L_cSigCjComTabControlPage }
  4387Class cSigCjComTabControlPage is a cComActiveXControl
  4388    Import_Class_Protocol cSigCjCom_DTabControlPage
  4389    Import_Class_Protocol cSigCjCom_DTabControlPageEvents
  4390
  4391    Procedure Construct_Object
  4392        Forward Send Construct_Object
  4393        Set psProgID to L_cSigCjComTabControlPage
  4394        Set psEventId to "{642C8188-4866-4C45-AF97-E4F95E2BA55A}"
  4395        Set peAutoCreate to acDeferredAutoCreate
  4396    End_Procedure
  4397End_Class
  4398
  4399Class cSigCjComIPopupControlItem is a Mixin
  4400
  4401    { MethodType=Property DesignTime=False }
  4402    Function ComCaption Returns String
  4403        String retVal
  4404        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
  4405        Function_Return retVal
  4406    End_Function
  4407
  4408    { MethodType=Property DesignTime=False }
  4409    Procedure Set ComCaption String value
  4410        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
  4411    End_Procedure
  4412
  4413    { MethodType=Property DesignTime=False }
  4414    Function ComTextAlignment Returns OLEXTPItemAlignment
  4415        OLEXTPItemAlignment retVal
  4416        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  4417        Function_Return retVal
  4418    End_Function
  4419
  4420    { MethodType=Property DesignTime=False }
  4421    Procedure Set ComTextAlignment OLEXTPItemAlignment value
  4422        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  4423    End_Procedure
  4424
  4425    { MethodType=Property DesignTime=False }
  4426    Function ComHyperLink Returns Boolean
  4427        Boolean retVal
  4428        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  4429        Function_Return retVal
  4430    End_Function
  4431
  4432    { MethodType=Property DesignTime=False }
  4433    Procedure Set ComHyperLink Boolean value
  4434        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  4435    End_Procedure
  4436
  4437    { MethodType=Property DesignTime=False }
  4438    Function ComButton Returns Boolean
  4439        Boolean retVal
  4440        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  4441        Function_Return retVal
  4442    End_Function
  4443
  4444    { MethodType=Property DesignTime=False }
  4445    Procedure Set ComButton Boolean value
  4446        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  4447    End_Procedure
  4448
  4449    { MethodType=Property DesignTime=False }
  4450    Function ComId Returns Integer
  4451        Integer retVal
  4452        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  4453        Function_Return retVal
  4454    End_Function
  4455
  4456    { MethodType=Property DesignTime=False }
  4457    Procedure Set ComId Integer value
  4458        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  4459    End_Procedure
  4460
  4461    { MethodType=Property DesignTime=False }
  4462    Function ComTextColor Returns OLE_COLOR
  4463        OLE_COLOR retVal
  4464        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  4465        Function_Return retVal
  4466    End_Function
  4467
  4468    { MethodType=Property DesignTime=False }
  4469    Procedure Set ComTextColor OLE_COLOR value
  4470        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  4471    End_Procedure
  4472
  4473    { MethodType=Property DesignTime=False }
  4474    Function ComBackgroundColor Returns OLE_COLOR
  4475        OLE_COLOR retVal
  4476        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  4477        Function_Return retVal
  4478    End_Function
  4479
  4480    { MethodType=Property DesignTime=False }
  4481    Procedure Set ComBackgroundColor OLE_COLOR value
  4482        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  4483    End_Procedure
  4484
  4485    { MethodType=Property DesignTime=False }
  4486    Function ComBorderColor Returns OLE_COLOR
  4487        OLE_COLOR retVal
  4488        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  4489        Function_Return retVal
  4490    End_Function
  4491
  4492    { MethodType=Property DesignTime=False }
  4493    Procedure Set ComBorderColor OLE_COLOR value
  4494        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  4495    End_Procedure
  4496
  4497    { MethodType=Property DesignTime=False }
  4498    Function ComBold Returns Boolean
  4499        Boolean retVal
  4500        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to retVal
  4501        Function_Return retVal
  4502    End_Function
  4503
  4504    { MethodType=Property DesignTime=False }
  4505    Procedure Set ComBold Boolean value
  4506        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to value
  4507    End_Procedure
  4508
  4509    { MethodType=Property DesignTime=False }
  4510    Function ComIconIndex Returns Integer
  4511        Integer retVal
  4512        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  4513        Function_Return retVal
  4514    End_Function
  4515
  4516    { MethodType=Property DesignTime=False }
  4517    Procedure Set ComIconIndex Integer value
  4518        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  4519    End_Procedure
  4520
  4521    { MethodType=Property DesignTime=False }
  4522    Function ComLeft Returns Integer
  4523        Integer retVal
  4524        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to retVal
  4525        Function_Return retVal
  4526    End_Function
  4527
  4528    { MethodType=Property DesignTime=False }
  4529    Procedure Set ComLeft Integer value
  4530        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to value
  4531    End_Procedure
  4532
  4533    { MethodType=Property DesignTime=False }
  4534    Function ComTop Returns Integer
  4535        Integer retVal
  4536        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to retVal
  4537        Function_Return retVal
  4538    End_Function
  4539
  4540    { MethodType=Property DesignTime=False }
  4541    Procedure Set ComTop Integer value
  4542        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to value
  4543    End_Procedure
  4544
  4545    { MethodType=Property DesignTime=False }
  4546    Function ComWidth Returns Integer
  4547        Integer retVal
  4548        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
  4549        Function_Return retVal
  4550    End_Function
  4551
  4552    { MethodType=Property DesignTime=False }
  4553    Procedure Set ComWidth Integer value
  4554        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
  4555    End_Procedure
  4556
  4557    { MethodType=Property DesignTime=False }
  4558    Function ComHeight Returns Integer
  4559        Integer retVal
  4560        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
  4561        Function_Return retVal
  4562    End_Function
  4563
  4564    { MethodType=Property DesignTime=False }
  4565    Procedure Set ComHeight Integer value
  4566        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
  4567    End_Procedure
  4568
  4569    { MethodType=Property DesignTime=False }
  4570    Function ComFont Returns Variant
  4571        Variant retVal
  4572        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  4573        Function_Return retVal
  4574    End_Function
  4575
  4576    { MethodType=Property DesignTime=False }
  4577    Procedure Set ComFont Variant value
  4578        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  4579    End_Procedure
  4580
  4581    Procedure ComSetIcon OLE_HANDLE llHandle OLEXTPPopupItemIcon llitemIcon
  4582        Handle hDispatchDriver
  4583        Get phDispatchDriver to hDispatchDriver
  4584        Send PrepareParams to hDispatchDriver 2
  4585        Send DefineParam to hDispatchDriver OLE_VT_I4 llHandle
  4586        Send DefineParam to hDispatchDriver OLE_VT_I4 llitemIcon
  4587        Send InvokeComMethod to hDispatchDriver 9 OLE_VT_VOID
  4588    End_Procedure
  4589
  4590    Procedure ComSetIcons OLE_HANDLE llHandle OLE_COLOR llTransparentColor OLEXTPPopupItemIcon llitemIcon
  4591        Handle hDispatchDriver
  4592        Get phDispatchDriver to hDispatchDriver
  4593        Send PrepareParams to hDispatchDriver 3
  4594        Send DefineParam to hDispatchDriver OLE_VT_I4 llHandle
  4595        Send DefineParam to hDispatchDriver OLE_VT_I4 llTransparentColor
  4596        Send DefineParam to hDispatchDriver OLE_VT_I4 llitemIcon
  4597        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
  4598    End_Procedure
  4599
  4600    Procedure ComCenterIcon
  4601        Handle hDispatchDriver
  4602        Get phDispatchDriver to hDispatchDriver
  4603        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
  4604    End_Procedure
  4605
  4606    Procedure ComCalculateHeight
  4607        Handle hDispatchDriver
  4608        Get phDispatchDriver to hDispatchDriver
  4609        Send InvokeComMethod to hDispatchDriver 12 OLE_VT_VOID
  4610    End_Procedure
  4611
  4612    Procedure ComCalculateWidth
  4613        Handle hDispatchDriver
  4614        Get phDispatchDriver to hDispatchDriver
  4615        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  4616    End_Procedure
  4617End_Class
  4618
  4619// CoClass
  4620Class cSigCjComPopupControlItem is a cComAutomationObject
  4621    Import_Class_Protocol cSigCjComIPopupControlItem
  4622
  4623    Procedure Construct_Object
  4624        Forward Send Construct_Object
  4625        Set peAutoCreate to acNoAutoCreate
  4626    End_Procedure
  4627End_Class
  4628
  4629// Dispatch interface for PopupControl Control
  4630Class cSigCjCom_DPopupControl is a Mixin
  4631
  4632    { MethodType=Property DesignTime=False }
  4633    Function ComFont Returns Variant
  4634        Variant retVal
  4635        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  4636        Function_Return retVal
  4637    End_Function
  4638
  4639    { MethodType=Property DesignTime=False }
  4640    Procedure Set ComFont Variant value
  4641        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  4642    End_Procedure
  4643
  4644    { MethodType=Property DesignTime=False }
  4645    Function ComVisualTheme Returns OLEXTPPopupPaintTheme
  4646        OLEXTPPopupPaintTheme retVal
  4647        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  4648        Function_Return retVal
  4649    End_Function
  4650
  4651    { MethodType=Property DesignTime=False }
  4652    Procedure Set ComVisualTheme OLEXTPPopupPaintTheme value
  4653        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  4654    End_Procedure
  4655
  4656    { MethodType=Property DesignTime=False }
  4657    Function ComWidth Returns Integer
  4658        Integer retVal
  4659        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  4660        Function_Return retVal
  4661    End_Function
  4662
  4663    { MethodType=Property DesignTime=False }
  4664    Procedure Set ComWidth Integer value
  4665        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  4666    End_Procedure
  4667
  4668    { MethodType=Property DesignTime=False }
  4669    Function ComHeight Returns Integer
  4670        Integer retVal
  4671        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  4672        Function_Return retVal
  4673    End_Function
  4674
  4675    { MethodType=Property DesignTime=False }
  4676    Procedure Set ComHeight Integer value
  4677        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  4678    End_Procedure
  4679
  4680    { MethodType=Property DesignTime=False }
  4681    Function ComAnimation Returns OLEXTPPopupAnimation
  4682        OLEXTPPopupAnimation retVal
  4683        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  4684        Function_Return retVal
  4685    End_Function
  4686
  4687    { MethodType=Property DesignTime=False }
  4688    Procedure Set ComAnimation OLEXTPPopupAnimation value
  4689        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  4690    End_Procedure
  4691
  4692    { MethodType=Property DesignTime=False }
  4693    Function ComAnimateDelay Returns Integer
  4694        Integer retVal
  4695        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  4696        Function_Return retVal
  4697    End_Function
  4698
  4699    { MethodType=Property DesignTime=False }
  4700    Procedure Set ComAnimateDelay Integer value
  4701        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  4702    End_Procedure
  4703
  4704    { MethodType=Property DesignTime=False }
  4705    Function ComShowDelay Returns Integer
  4706        Integer retVal
  4707        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  4708        Function_Return retVal
  4709    End_Function
  4710
  4711    { MethodType=Property DesignTime=False }
  4712    Procedure Set ComShowDelay Integer value
  4713        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  4714    End_Procedure
  4715
  4716    { MethodType=Property DesignTime=False }
  4717    Function ComTransparency Returns Integer
  4718        Integer retVal
  4719        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  4720        Function_Return retVal
  4721    End_Function
  4722
  4723    { MethodType=Property DesignTime=False }
  4724    Procedure Set ComTransparency Integer value
  4725        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  4726    End_Procedure
  4727
  4728    { MethodType=Property DesignTime=False }
  4729    Function ComRight Returns Integer
  4730        Integer retVal
  4731        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  4732        Function_Return retVal
  4733    End_Function
  4734
  4735    { MethodType=Property DesignTime=False }
  4736    Procedure Set ComRight Integer value
  4737        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  4738    End_Procedure
  4739
  4740    { MethodType=Property DesignTime=False }
  4741    Function ComBottom Returns Integer
  4742        Integer retVal
  4743        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  4744        Function_Return retVal
  4745    End_Function
  4746
  4747    { MethodType=Property DesignTime=False }
  4748    Procedure Set ComBottom Integer value
  4749        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  4750    End_Procedure
  4751
  4752    { MethodType=Property DesignTime=False }
  4753    Function ComAllowMove Returns Boolean
  4754        Boolean retVal
  4755        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BOOL to retVal
  4756        Function_Return retVal
  4757    End_Function
  4758
  4759    { MethodType=Property DesignTime=False }
  4760    Procedure Set ComAllowMove Boolean value
  4761        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BOOL to value
  4762    End_Procedure
  4763
  4764    { MethodType=Property DesignTime=False }
  4765    Function ComIcons Returns Variant
  4766        Variant retVal
  4767        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_DISPATCH to retVal
  4768        Function_Return retVal
  4769    End_Function
  4770
  4771    { MethodType=Property DesignTime=False }
  4772    Procedure Set ComIcons Variant value
  4773        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_DISPATCH to value
  4774    End_Procedure
  4775
  4776    { MethodType=Property DesignTime=False }
  4777    Function ComRightToLeft Returns Boolean
  4778        Boolean retVal
  4779        Get ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to retVal
  4780        Function_Return retVal
  4781    End_Function
  4782
  4783    { MethodType=Property DesignTime=False }
  4784    Procedure Set ComRightToLeft Boolean value
  4785        Set ComProperty of (phDispatchDriver(Self)) -611 OLE_VT_BOOL to value
  4786    End_Procedure
  4787
  4788    { MethodType=Property DesignTime=False }
  4789    Function ComBackgroundBitmap Returns Integer
  4790        Integer retVal
  4791        Get ComProperty of (phDispatchDriver(Self)) 38 OLE_VT_I4 to retVal
  4792        Function_Return retVal
  4793    End_Function
  4794
  4795    { MethodType=Property DesignTime=False }
  4796    Procedure Set ComBackgroundBitmap Integer value
  4797        Set ComProperty of (phDispatchDriver(Self)) 38 OLE_VT_I4 to value
  4798    End_Procedure
  4799
  4800    { MethodType=Property DesignTime=False }
  4801    Function ComEnableMarkup Returns Boolean
  4802        Boolean retVal
  4803        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  4804        Function_Return retVal
  4805    End_Function
  4806
  4807    { MethodType=Property DesignTime=False }
  4808    Procedure Set ComEnableMarkup Boolean value
  4809        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  4810    End_Procedure
  4811
  4812    { MethodType=Property DesignTime=False }
  4813    Function ComDefaultLocation Returns OLEXTPPopupLocation
  4814        OLEXTPPopupLocation retVal
  4815        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to retVal
  4816        Function_Return retVal
  4817    End_Function
  4818
  4819    { MethodType=Property DesignTime=False }
  4820    Procedure Set ComDefaultLocation OLEXTPPopupLocation value
  4821        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to value
  4822    End_Procedure
  4823
  4824    Procedure ComSetSize Integer llcx Integer llcy
  4825        Handle hDispatchDriver
  4826        Get phDispatchDriver to hDispatchDriver
  4827        Send PrepareParams to hDispatchDriver 2
  4828        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  4829        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  4830        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
  4831    End_Procedure
  4832
  4833    Procedure ComShow
  4834        Handle hDispatchDriver
  4835        Get phDispatchDriver to hDispatchDriver
  4836        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
  4837    End_Procedure
  4838
  4839    Function ComAddItem Integer llLeft Integer llTop Integer llRight Integer llBottom String llCaption Variant llBackgroundColor Variant llBorderColor Returns Variant
  4840        Handle hDispatchDriver
  4841        Variant retVal
  4842        Get phDispatchDriver to hDispatchDriver
  4843        Send PrepareParams to hDispatchDriver 7
  4844        Send DefineParam to hDispatchDriver OLE_VT_I4 llLeft
  4845        Send DefineParam to hDispatchDriver OLE_VT_I4 llTop
  4846        Send DefineParam to hDispatchDriver OLE_VT_I4 llRight
  4847        Send DefineParam to hDispatchDriver OLE_VT_I4 llBottom
  4848        Send DefineParam to hDispatchDriver OLE_VT_BSTR llCaption
  4849        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llBackgroundColor
  4850        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llBorderColor
  4851        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_DISPATCH to retVal
  4852        Function_Return retVal
  4853    End_Function
  4854
  4855    Procedure ComRemoveAllItems
  4856        Handle hDispatchDriver
  4857        Get phDispatchDriver to hDispatchDriver
  4858        Send InvokeComMethod to hDispatchDriver 13 OLE_VT_VOID
  4859    End_Procedure
  4860
  4861    { MethodType=Property DesignTime=False }
  4862    Function ComState Returns OLEXTPPopupState
  4863        Handle hDispatchDriver
  4864        OLEXTPPopupState retVal
  4865        Get phDispatchDriver to hDispatchDriver
  4866        Get InvokeComMethod of hDispatchDriver 14 OLE_VT_I4 to retVal
  4867        Function_Return retVal
  4868    End_Function
  4869
  4870    Procedure ComClose
  4871        Handle hDispatchDriver
  4872        Get phDispatchDriver to hDispatchDriver
  4873        Send InvokeComMethod to hDispatchDriver 15 OLE_VT_VOID
  4874    End_Procedure
  4875
  4876    Procedure ComHide
  4877        Handle hDispatchDriver
  4878        Get phDispatchDriver to hDispatchDriver
  4879        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
  4880    End_Procedure
  4881
  4882    Procedure ComRemoveItem Integer llIndex
  4883        Handle hDispatchDriver
  4884        Get phDispatchDriver to hDispatchDriver
  4885        Send PrepareParams to hDispatchDriver 1
  4886        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  4887        Send InvokeComMethod to hDispatchDriver 19 OLE_VT_VOID
  4888    End_Procedure
  4889
  4890    Function ComItem Integer llIndex Returns Variant
  4891        Handle hDispatchDriver
  4892        Variant retVal
  4893        Get phDispatchDriver to hDispatchDriver
  4894        Send PrepareParams to hDispatchDriver 1
  4895        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
  4896        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
  4897        Function_Return retVal
  4898    End_Function
  4899
  4900    { MethodType=Property DesignTime=False }
  4901    Function ComItemCount Returns Integer
  4902        Handle hDispatchDriver
  4903        Integer retVal
  4904        Get phDispatchDriver to hDispatchDriver
  4905        Get InvokeComMethod of hDispatchDriver 20 OLE_VT_I4 to retVal
  4906        Function_Return retVal
  4907    End_Function
  4908
  4909    Procedure ComAboutBox
  4910        Handle hDispatchDriver
  4911        Get phDispatchDriver to hDispatchDriver
  4912        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  4913    End_Procedure
  4914End_Class
  4915
  4916// Event interface for PopupControl Control
  4917Class cSigCjCom_DPopupControlEvents is a Mixin
  4918
  4919    { MethodType=Event }
  4920    Procedure OnComStateChanged
  4921    End_Procedure
  4922
  4923    { MethodType=Event }
  4924    Procedure OnComItemClick Variant llItem
  4925    End_Procedure
  4926
  4927    { Visibility=Private }
  4928    Procedure RegisterComEvents
  4929        Send RegisterComEvent 1 msg_OnComStateChanged
  4930        Send RegisterComEvent 2 msg_OnComItemClick
  4931    End_Procedure
  4932End_Class
  4933
  4934// CoClass
  4935// PopupControl Control
  4936{ CLSID=L_cSigCjComPopupControl }
  4937Class cSigCjComPopupControl is a cComActiveXControl
  4938    Import_Class_Protocol cSigCjCom_DPopupControl
  4939    Import_Class_Protocol cSigCjCom_DPopupControlEvents
  4940
  4941    Procedure Construct_Object
  4942        Forward Send Construct_Object
  4943        Set psProgID to L_cSigCjComPopupControl
  4944        Set psEventId to "{39101C08-7787-44CF-AD0F-59D3D2737E5E}"
  4945        Set psLicenseKey to L_cSigCjKeyControls
  4946        Set peAutoCreate to acAutoCreate
  4947    End_Procedure
  4948End_Class
  4949
  4950// Dispatch interface for TreeView Control
  4951Class cSigCjCom_DTreeView is a Mixin
  4952
  4953    { MethodType=Property DesignTime=False }
  4954    Function ComPathSeparator Returns String
  4955        String retVal
  4956        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
  4957        Function_Return retVal
  4958    End_Function
  4959
  4960    { MethodType=Property DesignTime=False }
  4961    Procedure Set ComPathSeparator String value
  4962        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
  4963    End_Procedure
  4964
  4965    { MethodType=Property DesignTime=False }
  4966    Function ComHideSelection Returns Boolean
  4967        Boolean retVal
  4968        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  4969        Function_Return retVal
  4970    End_Function
  4971
  4972    { MethodType=Property DesignTime=False }
  4973    Procedure Set ComHideSelection Boolean value
  4974        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  4975    End_Procedure
  4976
  4977    { MethodType=Property DesignTime=False }
  4978    Function ComFullRowSelect Returns Boolean
  4979        Boolean retVal
  4980        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  4981        Function_Return retVal
  4982    End_Function
  4983
  4984    { MethodType=Property DesignTime=False }
  4985    Procedure Set ComFullRowSelect Boolean value
  4986        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  4987    End_Procedure
  4988
  4989    { MethodType=Property DesignTime=False }
  4990    Function ComEnabled Returns Boolean
  4991        Boolean retVal
  4992        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  4993        Function_Return retVal
  4994    End_Function
  4995
  4996    { MethodType=Property DesignTime=False }
  4997    Procedure Set ComEnabled Boolean value
  4998        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  4999    End_Procedure
  5000
  5001    { MethodType=Property DesignTime=False }
  5002    Function ComHWnd Returns OLE_HANDLE
  5003        OLE_HANDLE retVal
  5004        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  5005        Function_Return retVal
  5006    End_Function
  5007
  5008    { MethodType=Property DesignTime=False }
  5009    Procedure Set ComHWnd OLE_HANDLE value
  5010        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  5011    End_Procedure
  5012
  5013    { MethodType=Property DesignTime=False }
  5014    Function ComFont Returns Variant
  5015        Variant retVal
  5016        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  5017        Function_Return retVal
  5018    End_Function
  5019
  5020    { MethodType=Property DesignTime=False }
  5021    Procedure Set ComFont Variant value
  5022        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  5023    End_Procedure
  5024
  5025    { MethodType=Property DesignTime=False }
  5026    Function ComCheckboxes Returns Boolean
  5027        Boolean retVal
  5028        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  5029        Function_Return retVal
  5030    End_Function
  5031
  5032    { MethodType=Property DesignTime=False }
  5033    Procedure Set ComCheckboxes Boolean value
  5034        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  5035    End_Procedure
  5036
  5037    { MethodType=Property DesignTime=False }
  5038    Function ComSingleSel Returns Boolean
  5039        Boolean retVal
  5040        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  5041        Function_Return retVal
  5042    End_Function
  5043
  5044    { MethodType=Property DesignTime=False }
  5045    Procedure Set ComSingleSel Boolean value
  5046        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  5047    End_Procedure
  5048
  5049    { MethodType=Property DesignTime=False }
  5050    Function ComScroll Returns Boolean
  5051        Boolean retVal
  5052        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  5053        Function_Return retVal
  5054    End_Function
  5055
  5056    { MethodType=Property DesignTime=False }
  5057    Procedure Set ComScroll Boolean value
  5058        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  5059    End_Procedure
  5060
  5061    { MethodType=Property DesignTime=False }
  5062    Function ComHotTracking Returns Boolean
  5063        Boolean retVal
  5064        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  5065        Function_Return retVal
  5066    End_Function
  5067
  5068    { MethodType=Property DesignTime=False }
  5069    Procedure Set ComHotTracking Boolean value
  5070        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  5071    End_Procedure
  5072
  5073    { MethodType=Property DesignTime=False }
  5074    Function ComShowPlusMinus Returns Boolean
  5075        Boolean retVal
  5076        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  5077        Function_Return retVal
  5078    End_Function
  5079
  5080    { MethodType=Property DesignTime=False }
  5081    Procedure Set ComShowPlusMinus Boolean value
  5082        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  5083    End_Procedure
  5084
  5085    { MethodType=Property DesignTime=False }
  5086    Function ComShowLines Returns OLETreeViewLinesStyle
  5087        OLETreeViewLinesStyle retVal
  5088        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  5089        Function_Return retVal
  5090    End_Function
  5091
  5092    { MethodType=Property DesignTime=False }
  5093    Procedure Set ComShowLines OLETreeViewLinesStyle value
  5094        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  5095    End_Procedure
  5096
  5097    { MethodType=Property DesignTime=False }
  5098    Function ComLabelEdit Returns OLETreeViewLabelEdit
  5099        OLETreeViewLabelEdit retVal
  5100        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  5101        Function_Return retVal
  5102    End_Function
  5103
  5104    { MethodType=Property DesignTime=False }
  5105    Procedure Set ComLabelEdit OLETreeViewLabelEdit value
  5106        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  5107    End_Procedure
  5108
  5109    { MethodType=Property DesignTime=False }
  5110    Function ComUseVisualStyle Returns Boolean
  5111        Boolean retVal
  5112        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to retVal
  5113        Function_Return retVal
  5114    End_Function
  5115
  5116    { MethodType=Property DesignTime=False }
  5117    Procedure Set ComUseVisualStyle Boolean value
  5118        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to value
  5119    End_Procedure
  5120
  5121    { MethodType=Property DesignTime=False }
  5122    Function ComRightToLeft Returns Boolean
  5123        Boolean retVal
  5124        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
  5125        Function_Return retVal
  5126    End_Function
  5127
  5128    { MethodType=Property DesignTime=False }
  5129    Procedure Set ComRightToLeft Boolean value
  5130        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
  5131    End_Procedure
  5132
  5133    { MethodType=Property DesignTime=False }
  5134    Function ComRightToLeftReading Returns Boolean
  5135        Boolean retVal
  5136        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to retVal
  5137        Function_Return retVal
  5138    End_Function
  5139
  5140    { MethodType=Property DesignTime=False }
  5141    Procedure Set ComRightToLeftReading Boolean value
  5142        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to value
  5143    End_Procedure
  5144
  5145    { MethodType=Property DesignTime=False }
  5146    Function ComAppearance Returns OLEAppearanceStyle
  5147        OLEAppearanceStyle retVal
  5148        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to retVal
  5149        Function_Return retVal
  5150    End_Function
  5151
  5152    { MethodType=Property DesignTime=False }
  5153    Procedure Set ComAppearance OLEAppearanceStyle value
  5154        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_I4 to value
  5155    End_Procedure
  5156
  5157    { MethodType=Property DesignTime=False }
  5158    Function ComSelectedItem Returns Variant
  5159        Variant retVal
  5160        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_DISPATCH to retVal
  5161        Function_Return retVal
  5162    End_Function
  5163
  5164    { MethodType=Property DesignTime=False }
  5165    Procedure Set ComSelectedItem Variant value
  5166        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_DISPATCH to value
  5167    End_Procedure
  5168
  5169    { MethodType=Property DesignTime=False }
  5170    Function ComIconSize Returns Integer
  5171        Integer retVal
  5172        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
  5173        Function_Return retVal
  5174    End_Function
  5175
  5176    { MethodType=Property DesignTime=False }
  5177    Procedure Set ComIconSize Integer value
  5178        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
  5179    End_Procedure
  5180
  5181    { MethodType=Property DesignTime=False }
  5182    Function ComIcons Returns Variant
  5183        Variant retVal
  5184        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_DISPATCH to retVal
  5185        Function_Return retVal
  5186    End_Function
  5187
  5188    { MethodType=Property DesignTime=False }
  5189    Procedure Set ComIcons Variant value
  5190        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_DISPATCH to value
  5191    End_Procedure
  5192
  5193    { MethodType=Property DesignTime=False }
  5194    Function ComIndentation Returns Integer
  5195        Integer retVal
  5196        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  5197        Function_Return retVal
  5198    End_Function
  5199
  5200    { MethodType=Property DesignTime=False }
  5201    Procedure Set ComIndentation Integer value
  5202        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  5203    End_Procedure
  5204
  5205    { MethodType=Property DesignTime=False }
  5206    Function ComBackColor Returns OLE_COLOR
  5207        OLE_COLOR retVal
  5208        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  5209        Function_Return retVal
  5210    End_Function
  5211
  5212    { MethodType=Property DesignTime=False }
  5213    Procedure Set ComBackColor OLE_COLOR value
  5214        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  5215    End_Procedure
  5216
  5217    { MethodType=Property DesignTime=False }
  5218    Function ComForeColor Returns OLE_COLOR
  5219        OLE_COLOR retVal
  5220        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  5221        Function_Return retVal
  5222    End_Function
  5223
  5224    { MethodType=Property DesignTime=False }
  5225    Procedure Set ComForeColor OLE_COLOR value
  5226        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  5227    End_Procedure
  5228
  5229    { MethodType=Property DesignTime=False }
  5230    Function ComShowBorder Returns Boolean
  5231        Boolean retVal
  5232        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to retVal
  5233        Function_Return retVal
  5234    End_Function
  5235
  5236    { MethodType=Property DesignTime=False }
  5237    Procedure Set ComShowBorder Boolean value
  5238        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to value
  5239    End_Procedure
  5240
  5241    { MethodType=Property DesignTime=False }
  5242    Function ComDropHighlight Returns Variant
  5243        Variant retVal
  5244        Get ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_DISPATCH to retVal
  5245        Function_Return retVal
  5246    End_Function
  5247
  5248    { MethodType=Property DesignTime=False }
  5249    Procedure Set ComDropHighlight Variant value
  5250        Set ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_DISPATCH to value
  5251    End_Procedure
  5252
  5253    // Returns/Sets whether this control can act as an OLE drop target.
  5254    { MethodType=Property DesignTime=False }
  5255    Function ComOLEDropMode Returns OLEOLEDropConstants
  5256        OLEOLEDropConstants retVal
  5257        Get ComProperty of (phDispatchDriver(Self)) 42 OLE_VT_I4 to retVal
  5258        Function_Return retVal
  5259    End_Function
  5260
  5261    // Returns/Sets whether this control can act as an OLE drop target.
  5262    { MethodType=Property DesignTime=False }
  5263    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  5264        Set ComProperty of (phDispatchDriver(Self)) 42 OLE_VT_I4 to value
  5265    End_Procedure
  5266
  5267    { MethodType=Property DesignTime=False }
  5268    Function ComOLEDragMode Returns OLEOLEDragConstants
  5269        OLEOLEDragConstants retVal
  5270        Get ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to retVal
  5271        Function_Return retVal
  5272    End_Function
  5273
  5274    { MethodType=Property DesignTime=False }
  5275    Procedure Set ComOLEDragMode OLEOLEDragConstants value
  5276        Set ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to value
  5277    End_Procedure
  5278
  5279    // Indicates whether the elements of a control are automatically sorted alphabetically.
  5280    { MethodType=Property DesignTime=False }
  5281    Function ComSorted Returns Boolean
  5282        Boolean retVal
  5283        Get ComProperty of (phDispatchDriver(Self)) 43 OLE_VT_BOOL to retVal
  5284        Function_Return retVal
  5285    End_Function
  5286
  5287    // Indicates whether the elements of a control are automatically sorted alphabetically.
  5288    { MethodType=Property DesignTime=False }
  5289    Procedure Set ComSorted Boolean value
  5290        Set ComProperty of (phDispatchDriver(Self)) 43 OLE_VT_BOOL to value
  5291    End_Procedure
  5292
  5293    { MethodType=Property DesignTime=False }
  5294    Function ComEnableMarkup Returns Boolean
  5295        Boolean retVal
  5296        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to retVal
  5297        Function_Return retVal
  5298    End_Function
  5299
  5300    { MethodType=Property DesignTime=False }
  5301    Procedure Set ComEnableMarkup Boolean value
  5302        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to value
  5303    End_Procedure
  5304
  5305    { MethodType=Property DesignTime=False }
  5306    Function ComSelectionBackColor Returns OLE_COLOR
  5307        OLE_COLOR retVal
  5308        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to retVal
  5309        Function_Return retVal
  5310    End_Function
  5311
  5312    { MethodType=Property DesignTime=False }
  5313    Procedure Set ComSelectionBackColor OLE_COLOR value
  5314        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to value
  5315    End_Procedure
  5316
  5317    { MethodType=Property DesignTime=False }
  5318    Function ComSelectionForeColor Returns OLE_COLOR
  5319        OLE_COLOR retVal
  5320        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
  5321        Function_Return retVal
  5322    End_Function
  5323
  5324    { MethodType=Property DesignTime=False }
  5325    Procedure Set ComSelectionForeColor OLE_COLOR value
  5326        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
  5327    End_Procedure
  5328
  5329    { MethodType=Property DesignTime=False }
  5330    Function ComControlToolTip Returns String
  5331        String retVal
  5332        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  5333        Function_Return retVal
  5334    End_Function
  5335
  5336    { MethodType=Property DesignTime=False }
  5337    Procedure Set ComControlToolTip String value
  5338        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  5339    End_Procedure
  5340
  5341    { MethodType=Property DesignTime=False }
  5342    Function ComNodes Returns Variant
  5343        Handle hDispatchDriver
  5344        Variant retVal
  5345        Get phDispatchDriver to hDispatchDriver
  5346        Get InvokeComMethod of hDispatchDriver 19 OLE_VT_DISPATCH to retVal
  5347        Function_Return retVal
  5348    End_Function
  5349
  5350    Procedure ComStartLabelEdit
  5351        Handle hDispatchDriver
  5352        Get phDispatchDriver to hDispatchDriver
  5353        Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
  5354    End_Procedure
  5355
  5356    Function ComGetVisibleCount Returns Integer
  5357        Handle hDispatchDriver
  5358        Integer retVal
  5359        Get phDispatchDriver to hDispatchDriver
  5360        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_I4 to retVal
  5361        Function_Return retVal
  5362    End_Function
  5363
  5364    Function ComHitTest Float llx Float lly Returns Variant
  5365        Handle hDispatchDriver
  5366        Variant retVal
  5367        Get phDispatchDriver to hDispatchDriver
  5368        Send PrepareParams to hDispatchDriver 2
  5369        Send DefineParam to hDispatchDriver OLE_VT_R4 llx
  5370        Send DefineParam to hDispatchDriver OLE_VT_R4 lly
  5371        Get InvokeComMethod of hDispatchDriver 22 OLE_VT_DISPATCH to retVal
  5372        Function_Return retVal
  5373    End_Function
  5374
  5375    Procedure ComOLEDrag
  5376        Handle hDispatchDriver
  5377        Get phDispatchDriver to hDispatchDriver
  5378        Send InvokeComMethod to hDispatchDriver 62 OLE_VT_VOID
  5379    End_Procedure
  5380
  5381    Procedure ComSetIconSize Integer llcx Integer llcy
  5382        Handle hDispatchDriver
  5383        Get phDispatchDriver to hDispatchDriver
  5384        Send PrepareParams to hDispatchDriver 2
  5385        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  5386        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  5387        Send InvokeComMethod to hDispatchDriver 31 OLE_VT_VOID
  5388    End_Procedure
  5389
  5390    Procedure ComAboutBox
  5391        Handle hDispatchDriver
  5392        Get phDispatchDriver to hDispatchDriver
  5393        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  5394    End_Procedure
  5395
  5396    { MethodType=Property DesignTime=False }
  5397    Function ComToolTipContext Returns Variant
  5398        Handle hDispatchDriver
  5399        Variant retVal
  5400        Get phDispatchDriver to hDispatchDriver
  5401        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  5402        Function_Return retVal
  5403    End_Function
  5404End_Class
  5405
  5406// Event interface for TreeView Control
  5407Class cSigCjCom_DTreeViewEvents is a Mixin
  5408
  5409    { MethodType=Event }
  5410    Procedure OnComBeforeLabelEdit Short ByRef llCancel
  5411    End_Procedure
  5412
  5413    { MethodType=Event }
  5414    Procedure OnComAfterLabelEdit Short ByRef llCancel String ByRef llNewString
  5415    End_Procedure
  5416
  5417    { MethodType=Event }
  5418    Procedure OnComNodeCheck Variant llNode
  5419    End_Procedure
  5420
  5421    { MethodType=Event }
  5422    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  5423    End_Procedure
  5424
  5425    { MethodType=Event }
  5426    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  5427    End_Procedure
  5428
  5429    { MethodType=Event }
  5430    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  5431    End_Procedure
  5432
  5433    { MethodType=Event }
  5434    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  5435    End_Procedure
  5436
  5437    { MethodType=Event }
  5438    Procedure OnComKeyPress Short ByRef llKeyAscii
  5439    End_Procedure
  5440
  5441    { MethodType=Event }
  5442    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  5443    End_Procedure
  5444
  5445    { MethodType=Event }
  5446    Procedure OnComDblClick
  5447    End_Procedure
  5448
  5449    { MethodType=Event }
  5450    Procedure OnComExpand Variant llNode
  5451    End_Procedure
  5452
  5453    { MethodType=Event }
  5454    Procedure OnComCollapse Variant llNode
  5455    End_Procedure
  5456
  5457    { MethodType=Event }
  5458    Procedure OnComNodeClick Variant llNode
  5459    End_Procedure
  5460
  5461    { MethodType=Event }
  5462    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  5463    End_Procedure
  5464
  5465    { MethodType=Event }
  5466    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  5467    End_Procedure
  5468
  5469    { MethodType=Event }
  5470    Procedure OnComOLEStartDrag Variant llData Integer ByRef llAllowedEffects
  5471    End_Procedure
  5472
  5473    { MethodType=Event }
  5474    Procedure OnComOLECompleteDrag Integer ByRef llEffect
  5475    End_Procedure
  5476
  5477    { MethodType=Event }
  5478    Procedure OnComOLEGiveFeedback Integer ByRef llEffect Boolean ByRef llDefaultCursors
  5479    End_Procedure
  5480
  5481    { MethodType=Event }
  5482    Procedure OnComOLESetData Variant llData Short ByRef llDataFormat
  5483    End_Procedure
  5484
  5485    { Visibility=Private }
  5486    Procedure RegisterComEvents
  5487        Send RegisterComEvent 1 msg_OnComBeforeLabelEdit
  5488        Send RegisterComEvent 2 msg_OnComAfterLabelEdit
  5489        Send RegisterComEvent 3 msg_OnComNodeCheck
  5490        Send RegisterComEvent -605 msg_OnComMouseDown
  5491        Send RegisterComEvent -606 msg_OnComMouseMove
  5492        Send RegisterComEvent -607 msg_OnComMouseUp
  5493        Send RegisterComEvent -602 msg_OnComKeyDown
  5494        Send RegisterComEvent -603 msg_OnComKeyPress
  5495        Send RegisterComEvent -604 msg_OnComKeyUp
  5496        Send RegisterComEvent -601 msg_OnComDblClick
  5497        Send RegisterComEvent 4 msg_OnComExpand
  5498        Send RegisterComEvent 5 msg_OnComCollapse
  5499        Send RegisterComEvent 6 msg_OnComNodeClick
  5500        Send RegisterComEvent 300 msg_OnComOLEDragOver
  5501        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  5502        Send RegisterComEvent 303 msg_OnComOLEStartDrag
  5503        Send RegisterComEvent 304 msg_OnComOLECompleteDrag
  5504        Send RegisterComEvent 305 msg_OnComOLEGiveFeedback
  5505        Send RegisterComEvent 306 msg_OnComOLESetData
  5506    End_Procedure
  5507End_Class
  5508
  5509// CoClass
  5510// TreeView Control
  5511{ CLSID=L_cSigCjComTreeView }
  5512Class cSigCjComTreeView is a cComActiveXControl
  5513    Import_Class_Protocol cSigCjCom_DTreeView
  5514    Import_Class_Protocol cSigCjCom_DTreeViewEvents
  5515
  5516    Procedure Construct_Object
  5517        Forward Send Construct_Object
  5518        Set psProgID to L_cSigCjComTreeView
  5519        Set psEventId to "{A0379F6F-AB5E-4C8E-97A7-E02F99ACDA71}"
  5520        Set psLicenseKey to L_cSigCjKeyControls
  5521        Set peAutoCreate to acDeferredAutoCreate
  5522    End_Procedure
  5523End_Class
  5524
  5525// Dispatch interface for ListView Control
  5526Class cSigCjCom_DListView is a Mixin
  5527
  5528    { MethodType=Property DesignTime=False }
  5529    Function ComCheckboxes Returns Boolean
  5530        Boolean retVal
  5531        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  5532        Function_Return retVal
  5533    End_Function
  5534
  5535    { MethodType=Property DesignTime=False }
  5536    Procedure Set ComCheckboxes Boolean value
  5537        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  5538    End_Procedure
  5539
  5540    { MethodType=Property DesignTime=False }
  5541    Function ComMultiSelect Returns Boolean
  5542        Boolean retVal
  5543        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  5544        Function_Return retVal
  5545    End_Function
  5546
  5547    { MethodType=Property DesignTime=False }
  5548    Procedure Set ComMultiSelect Boolean value
  5549        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  5550    End_Procedure
  5551
  5552    { MethodType=Property DesignTime=False }
  5553    Function ComHideSelection Returns Boolean
  5554        Boolean retVal
  5555        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  5556        Function_Return retVal
  5557    End_Function
  5558
  5559    { MethodType=Property DesignTime=False }
  5560    Procedure Set ComHideSelection Boolean value
  5561        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  5562    End_Procedure
  5563
  5564    { MethodType=Property DesignTime=False }
  5565    Function ComView Returns OLEListViewStyle
  5566        OLEListViewStyle retVal
  5567        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  5568        Function_Return retVal
  5569    End_Function
  5570
  5571    { MethodType=Property DesignTime=False }
  5572    Procedure Set ComView OLEListViewStyle value
  5573        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  5574    End_Procedure
  5575
  5576    { MethodType=Property DesignTime=False }
  5577    Function ComHideColumnHeaders Returns Boolean
  5578        Boolean retVal
  5579        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  5580        Function_Return retVal
  5581    End_Function
  5582
  5583    { MethodType=Property DesignTime=False }
  5584    Procedure Set ComHideColumnHeaders Boolean value
  5585        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  5586    End_Procedure
  5587
  5588    { MethodType=Property DesignTime=False }
  5589    Function ComGridLines Returns Boolean
  5590        Boolean retVal
  5591        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  5592        Function_Return retVal
  5593    End_Function
  5594
  5595    { MethodType=Property DesignTime=False }
  5596    Procedure Set ComGridLines Boolean value
  5597        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  5598    End_Procedure
  5599
  5600    { MethodType=Property DesignTime=False }
  5601    Function ComEnabled Returns Boolean
  5602        Boolean retVal
  5603        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  5604        Function_Return retVal
  5605    End_Function
  5606
  5607    { MethodType=Property DesignTime=False }
  5608    Procedure Set ComEnabled Boolean value
  5609        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  5610    End_Procedure
  5611
  5612    { MethodType=Property DesignTime=False }
  5613    Function ComHWnd Returns OLE_HANDLE
  5614        OLE_HANDLE retVal
  5615        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  5616        Function_Return retVal
  5617    End_Function
  5618
  5619    { MethodType=Property DesignTime=False }
  5620    Procedure Set ComHWnd OLE_HANDLE value
  5621        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  5622    End_Procedure
  5623
  5624    { MethodType=Property DesignTime=False }
  5625    Function ComLabelWrap Returns Boolean
  5626        Boolean retVal
  5627        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  5628        Function_Return retVal
  5629    End_Function
  5630
  5631    { MethodType=Property DesignTime=False }
  5632    Procedure Set ComLabelWrap Boolean value
  5633        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  5634    End_Procedure
  5635
  5636    { MethodType=Property DesignTime=False }
  5637    Function ComFullRowSelect Returns Boolean
  5638        Boolean retVal
  5639        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  5640        Function_Return retVal
  5641    End_Function
  5642
  5643    { MethodType=Property DesignTime=False }
  5644    Procedure Set ComFullRowSelect Boolean value
  5645        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  5646    End_Procedure
  5647
  5648    { MethodType=Property DesignTime=False }
  5649    Function ComHotTracking Returns Boolean
  5650        Boolean retVal
  5651        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to retVal
  5652        Function_Return retVal
  5653    End_Function
  5654
  5655    { MethodType=Property DesignTime=False }
  5656    Procedure Set ComHotTracking Boolean value
  5657        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to value
  5658    End_Procedure
  5659
  5660    { MethodType=Property DesignTime=False }
  5661    Function ComHoverSelection Returns Boolean
  5662        Boolean retVal
  5663        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
  5664        Function_Return retVal
  5665    End_Function
  5666
  5667    { MethodType=Property DesignTime=False }
  5668    Procedure Set ComHoverSelection Boolean value
  5669        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
  5670    End_Procedure
  5671
  5672    { MethodType=Property DesignTime=False }
  5673    Function ComFlatScrollBar Returns Boolean
  5674        Boolean retVal
  5675        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to retVal
  5676        Function_Return retVal
  5677    End_Function
  5678
  5679    { MethodType=Property DesignTime=False }
  5680    Procedure Set ComFlatScrollBar Boolean value
  5681        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to value
  5682    End_Procedure
  5683
  5684    { MethodType=Property DesignTime=False }
  5685    Function ComAllowColumnReorder Returns Boolean
  5686        Boolean retVal
  5687        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
  5688        Function_Return retVal
  5689    End_Function
  5690
  5691    { MethodType=Property DesignTime=False }
  5692    Procedure Set ComAllowColumnReorder Boolean value
  5693        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
  5694    End_Procedure
  5695
  5696    { MethodType=Property DesignTime=False }
  5697    Function ComUseVisualStyle Returns Boolean
  5698        Boolean retVal
  5699        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to retVal
  5700        Function_Return retVal
  5701    End_Function
  5702
  5703    { MethodType=Property DesignTime=False }
  5704    Procedure Set ComUseVisualStyle Boolean value
  5705        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to value
  5706    End_Procedure
  5707
  5708    { MethodType=Property DesignTime=False }
  5709    Function ComFont Returns Variant
  5710        Variant retVal
  5711        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  5712        Function_Return retVal
  5713    End_Function
  5714
  5715    { MethodType=Property DesignTime=False }
  5716    Procedure Set ComFont Variant value
  5717        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  5718    End_Procedure
  5719
  5720    { MethodType=Property DesignTime=False }
  5721    Function ComLabelEdit Returns OLEListViewLabelEdit
  5722        OLEListViewLabelEdit retVal
  5723        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
  5724        Function_Return retVal
  5725    End_Function
  5726
  5727    { MethodType=Property DesignTime=False }
  5728    Procedure Set ComLabelEdit OLEListViewLabelEdit value
  5729        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
  5730    End_Procedure
  5731
  5732    { MethodType=Property DesignTime=False }
  5733    Function ComIconSize Returns Integer
  5734        Integer retVal
  5735        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  5736        Function_Return retVal
  5737    End_Function
  5738
  5739    { MethodType=Property DesignTime=False }
  5740    Procedure Set ComIconSize Integer value
  5741        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  5742    End_Procedure
  5743
  5744    { MethodType=Property DesignTime=False }
  5745    Function ComRightToLeft Returns Boolean
  5746        Boolean retVal
  5747        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_BOOL to retVal
  5748        Function_Return retVal
  5749    End_Function
  5750
  5751    { MethodType=Property DesignTime=False }
  5752    Procedure Set ComRightToLeft Boolean value
  5753        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_BOOL to value
  5754    End_Procedure
  5755
  5756    { MethodType=Property DesignTime=False }
  5757    Function ComSorted Returns Boolean
  5758        Boolean retVal
  5759        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BOOL to retVal
  5760        Function_Return retVal
  5761    End_Function
  5762
  5763    { MethodType=Property DesignTime=False }
  5764    Procedure Set ComSorted Boolean value
  5765        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BOOL to value
  5766    End_Procedure
  5767
  5768    { MethodType=Property DesignTime=False }
  5769    Function ComSortKey Returns Integer
  5770        Integer retVal
  5771        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
  5772        Function_Return retVal
  5773    End_Function
  5774
  5775    { MethodType=Property DesignTime=False }
  5776    Procedure Set ComSortKey Integer value
  5777        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
  5778    End_Procedure
  5779
  5780    { MethodType=Property DesignTime=False }
  5781    Function ComSortOrder Returns Integer
  5782        Integer retVal
  5783        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
  5784        Function_Return retVal
  5785    End_Function
  5786
  5787    { MethodType=Property DesignTime=False }
  5788    Procedure Set ComSortOrder Integer value
  5789        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
  5790    End_Procedure
  5791
  5792    { MethodType=Property DesignTime=False }
  5793    Function ComAppearance Returns OLEAppearanceStyle
  5794        OLEAppearanceStyle retVal
  5795        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to retVal
  5796        Function_Return retVal
  5797    End_Function
  5798
  5799    { MethodType=Property DesignTime=False }
  5800    Procedure Set ComAppearance OLEAppearanceStyle value
  5801        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to value
  5802    End_Procedure
  5803
  5804    { MethodType=Property DesignTime=False }
  5805    Function ComColumnHeaderIcons Returns Variant
  5806        Variant retVal
  5807        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_DISPATCH to retVal
  5808        Function_Return retVal
  5809    End_Function
  5810
  5811    { MethodType=Property DesignTime=False }
  5812    Procedure Set ComColumnHeaderIcons Variant value
  5813        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_DISPATCH to value
  5814    End_Procedure
  5815
  5816    { MethodType=Property DesignTime=False }
  5817    Function ComIcons Returns Variant
  5818        Variant retVal
  5819        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_DISPATCH to retVal
  5820        Function_Return retVal
  5821    End_Function
  5822
  5823    { MethodType=Property DesignTime=False }
  5824    Procedure Set ComIcons Variant value
  5825        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_DISPATCH to value
  5826    End_Procedure
  5827
  5828    { MethodType=Property DesignTime=False }
  5829    Function ComSelectedItem Returns Variant
  5830        Variant retVal
  5831        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_DISPATCH to retVal
  5832        Function_Return retVal
  5833    End_Function
  5834
  5835    { MethodType=Property DesignTime=False }
  5836    Procedure Set ComSelectedItem Variant value
  5837        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_DISPATCH to value
  5838    End_Procedure
  5839
  5840    { MethodType=Property DesignTime=False }
  5841    Function ComBackColor Returns OLE_COLOR
  5842        OLE_COLOR retVal
  5843        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  5844        Function_Return retVal
  5845    End_Function
  5846
  5847    { MethodType=Property DesignTime=False }
  5848    Procedure Set ComBackColor OLE_COLOR value
  5849        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  5850    End_Procedure
  5851
  5852    { MethodType=Property DesignTime=False }
  5853    Function ComForeColor Returns OLE_COLOR
  5854        OLE_COLOR retVal
  5855        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  5856        Function_Return retVal
  5857    End_Function
  5858
  5859    { MethodType=Property DesignTime=False }
  5860    Procedure Set ComForeColor OLE_COLOR value
  5861        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  5862    End_Procedure
  5863
  5864    { MethodType=Property DesignTime=False }
  5865    Function ComLockRedraw Returns Boolean
  5866        Boolean retVal
  5867        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  5868        Function_Return retVal
  5869    End_Function
  5870
  5871    { MethodType=Property DesignTime=False }
  5872    Procedure Set ComLockRedraw Boolean value
  5873        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  5874    End_Procedure
  5875
  5876    { MethodType=Property DesignTime=False }
  5877    Function ComShowBorder Returns Boolean
  5878        Boolean retVal
  5879        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to retVal
  5880        Function_Return retVal
  5881    End_Function
  5882
  5883    { MethodType=Property DesignTime=False }
  5884    Procedure Set ComShowBorder Boolean value
  5885        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to value
  5886    End_Procedure
  5887
  5888    { MethodType=Property DesignTime=False }
  5889    Function ComArrange Returns OLEListViewArrange
  5890        OLEListViewArrange retVal
  5891        Get ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_I4 to retVal
  5892        Function_Return retVal
  5893    End_Function
  5894
  5895    { MethodType=Property DesignTime=False }
  5896    Procedure Set ComArrange OLEListViewArrange value
  5897        Set ComProperty of (phDispatchDriver(Self)) 41 OLE_VT_I4 to value
  5898    End_Procedure
  5899
  5900    { MethodType=Property DesignTime=False }
  5901    Function ComDropHighlight Returns Variant
  5902        Variant retVal
  5903        Get ComProperty of (phDispatchDriver(Self)) 45 OLE_VT_DISPATCH to retVal
  5904        Function_Return retVal
  5905    End_Function
  5906
  5907    { MethodType=Property DesignTime=False }
  5908    Procedure Set ComDropHighlight Variant value
  5909        Set ComProperty of (phDispatchDriver(Self)) 45 OLE_VT_DISPATCH to value
  5910    End_Procedure
  5911
  5912    // Returns/Sets whether this control can act as an OLE drop target.
  5913    { MethodType=Property DesignTime=False }
  5914    Function ComOLEDropMode Returns OLEOLEDropConstants
  5915        OLEOLEDropConstants retVal
  5916        Get ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to retVal
  5917        Function_Return retVal
  5918    End_Function
  5919
  5920    // Returns/Sets whether this control can act as an OLE drop target.
  5921    { MethodType=Property DesignTime=False }
  5922    Procedure Set ComOLEDropMode OLEOLEDropConstants value
  5923        Set ComProperty of (phDispatchDriver(Self)) 52 OLE_VT_I4 to value
  5924    End_Procedure
  5925
  5926    { MethodType=Property DesignTime=False }
  5927    Function ComOLEDragMode Returns OLEOLEDragConstants
  5928        OLEOLEDragConstants retVal
  5929        Get ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to retVal
  5930        Function_Return retVal
  5931    End_Function
  5932
  5933    { MethodType=Property DesignTime=False }
  5934    Procedure Set ComOLEDragMode OLEOLEDragConstants value
  5935        Set ComProperty of (phDispatchDriver(Self)) 53 OLE_VT_I4 to value
  5936    End_Procedure
  5937
  5938    { MethodType=Property DesignTime=False }
  5939    Function ComControlToolTip Returns String
  5940        String retVal
  5941        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  5942        Function_Return retVal
  5943    End_Function
  5944
  5945    { MethodType=Property DesignTime=False }
  5946    Procedure Set ComControlToolTip String value
  5947        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  5948    End_Procedure
  5949
  5950    { MethodType=Property DesignTime=False }
  5951    Function ComListItems Returns Variant
  5952        Handle hDispatchDriver
  5953        Variant retVal
  5954        Get phDispatchDriver to hDispatchDriver
  5955        Get InvokeComMethod of hDispatchDriver 24 OLE_VT_DISPATCH to retVal
  5956        Function_Return retVal
  5957    End_Function
  5958
  5959    { MethodType=Property DesignTime=False }
  5960    Function ComColumnHeaders Returns Variant
  5961        Handle hDispatchDriver
  5962        Variant retVal
  5963        Get phDispatchDriver to hDispatchDriver
  5964        Get InvokeComMethod of hDispatchDriver 25 OLE_VT_DISPATCH to retVal
  5965        Function_Return retVal
  5966    End_Function
  5967
  5968    Function ComGetFirstVisible Returns Variant
  5969        Handle hDispatchDriver
  5970        Variant retVal
  5971        Get phDispatchDriver to hDispatchDriver
  5972        Get InvokeComMethod of hDispatchDriver 26 OLE_VT_DISPATCH to retVal
  5973        Function_Return retVal
  5974    End_Function
  5975
  5976    Function ComHitTest Float llx Float lly Returns Variant
  5977        Handle hDispatchDriver
  5978        Variant retVal
  5979        Get phDispatchDriver to hDispatchDriver
  5980        Send PrepareParams to hDispatchDriver 2
  5981        Send DefineParam to hDispatchDriver OLE_VT_R4 llx
  5982        Send DefineParam to hDispatchDriver OLE_VT_R4 lly
  5983        Get InvokeComMethod of hDispatchDriver 27 OLE_VT_DISPATCH to retVal
  5984        Function_Return retVal
  5985    End_Function
  5986
  5987    Procedure ComStartLabelEdit
  5988        Handle hDispatchDriver
  5989        Get phDispatchDriver to hDispatchDriver
  5990        Send InvokeComMethod to hDispatchDriver 28 OLE_VT_VOID
  5991    End_Procedure
  5992
  5993    Function ComFindItem String llsz Variant llWhere Variant llIndex Variant llfPartial Returns Variant
  5994        Handle hDispatchDriver
  5995        Variant retVal
  5996        Get phDispatchDriver to hDispatchDriver
  5997        Send PrepareParams to hDispatchDriver 4
  5998        Send DefineParam to hDispatchDriver OLE_VT_BSTR llsz
  5999        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llWhere
  6000        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
  6001        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llfPartial
  6002        Get InvokeComMethod of hDispatchDriver 29 OLE_VT_DISPATCH to retVal
  6003        Function_Return retVal
  6004    End_Function
  6005
  6006    Procedure ComSetIconSize Integer llcx Integer llcy
  6007        Handle hDispatchDriver
  6008        Get phDispatchDriver to hDispatchDriver
  6009        Send PrepareParams to hDispatchDriver 2
  6010        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
  6011        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
  6012        Send InvokeComMethod to hDispatchDriver 31 OLE_VT_VOID
  6013    End_Procedure
  6014
  6015    Procedure ComOLEDrag
  6016        Handle hDispatchDriver
  6017        Get phDispatchDriver to hDispatchDriver
  6018        Send InvokeComMethod to hDispatchDriver 62 OLE_VT_VOID
  6019    End_Procedure
  6020
  6021    { MethodType=Property DesignTime=False }
  6022    Function ComSelectedCount Returns Integer
  6023        Handle hDispatchDriver
  6024        Integer retVal
  6025        Get phDispatchDriver to hDispatchDriver
  6026        Get InvokeComMethod of hDispatchDriver 42 OLE_VT_I4 to retVal
  6027        Function_Return retVal
  6028    End_Function
  6029
  6030    Function ComGetNextSelectedItem Integer llFirstItem Returns Integer
  6031        Handle hDispatchDriver
  6032        Integer retVal
  6033        Get phDispatchDriver to hDispatchDriver
  6034        Send PrepareParams to hDispatchDriver 1
  6035        Send DefineParam to hDispatchDriver OLE_VT_I4 llFirstItem
  6036        Get InvokeComMethod of hDispatchDriver 43 OLE_VT_I4 to retVal
  6037        Function_Return retVal
  6038    End_Function
  6039
  6040    Procedure ComAboutBox
  6041        Handle hDispatchDriver
  6042        Get phDispatchDriver to hDispatchDriver
  6043        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  6044    End_Procedure
  6045
  6046    { MethodType=Property DesignTime=False }
  6047    Function ComToolTipContext Returns Variant
  6048        Handle hDispatchDriver
  6049        Variant retVal
  6050        Get phDispatchDriver to hDispatchDriver
  6051        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  6052        Function_Return retVal
  6053    End_Function
  6054End_Class
  6055
  6056// Event interface for ListView Control
  6057Class cSigCjCom_DListViewEvents is a Mixin
  6058
  6059    { MethodType=Event }
  6060    Procedure OnComKeyDown Short ByRef llKeyCode Short llShift
  6061    End_Procedure
  6062
  6063    { MethodType=Event }
  6064    Procedure OnComKeyPress Short ByRef llKeyAscii
  6065    End_Procedure
  6066
  6067    { MethodType=Event }
  6068    Procedure OnComKeyUp Short ByRef llKeyCode Short llShift
  6069    End_Procedure
  6070
  6071    { MethodType=Event }
  6072    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6073    End_Procedure
  6074
  6075    { MethodType=Event }
  6076    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6077    End_Procedure
  6078
  6079    { MethodType=Event }
  6080    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6081    End_Procedure
  6082
  6083    { MethodType=Event }
  6084    Procedure OnComDblClick
  6085    End_Procedure
  6086
  6087    { MethodType=Event }
  6088    Procedure OnComBeforeLabelEdit Short ByRef llCancel
  6089    End_Procedure
  6090
  6091    { MethodType=Event }
  6092    Procedure OnComAfterLabelEdit Short ByRef llCancel String ByRef llNewString
  6093    End_Procedure
  6094
  6095    { MethodType=Event }
  6096    Procedure OnComColumnClick Variant llColumnHeader
  6097    End_Procedure
  6098
  6099    { MethodType=Event }
  6100    Procedure OnComItemCheck Variant llItem
  6101    End_Procedure
  6102
  6103    { MethodType=Event }
  6104    Procedure OnComItemClick Variant llItem
  6105    End_Procedure
  6106
  6107    { MethodType=Event }
  6108    Procedure OnComOLEDragOver Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly Short llstate
  6109    End_Procedure
  6110
  6111    { MethodType=Event }
  6112    Procedure OnComOLEDragDrop Variant llData Integer ByRef llEffect Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6113    End_Procedure
  6114
  6115    { MethodType=Event }
  6116    Procedure OnComOLEStartDrag Variant llData Integer ByRef llAllowedEffects
  6117    End_Procedure
  6118
  6119    { MethodType=Event }
  6120    Procedure OnComOLECompleteDrag Integer ByRef llEffect
  6121    End_Procedure
  6122
  6123    { MethodType=Event }
  6124    Procedure OnComOLEGiveFeedback Integer ByRef llEffect Boolean ByRef llDefaultCursors
  6125    End_Procedure
  6126
  6127    { MethodType=Event }
  6128    Procedure OnComOLESetData Variant llData Short ByRef llDataFormat
  6129    End_Procedure
  6130
  6131    { Visibility=Private }
  6132    Procedure RegisterComEvents
  6133        Send RegisterComEvent -602 msg_OnComKeyDown
  6134        Send RegisterComEvent -603 msg_OnComKeyPress
  6135        Send RegisterComEvent -604 msg_OnComKeyUp
  6136        Send RegisterComEvent -606 msg_OnComMouseMove
  6137        Send RegisterComEvent -605 msg_OnComMouseDown
  6138        Send RegisterComEvent -607 msg_OnComMouseUp
  6139        Send RegisterComEvent -601 msg_OnComDblClick
  6140        Send RegisterComEvent 1 msg_OnComBeforeLabelEdit
  6141        Send RegisterComEvent 2 msg_OnComAfterLabelEdit
  6142        Send RegisterComEvent 3 msg_OnComColumnClick
  6143        Send RegisterComEvent 4 msg_OnComItemCheck
  6144        Send RegisterComEvent 5 msg_OnComItemClick
  6145        Send RegisterComEvent 300 msg_OnComOLEDragOver
  6146        Send RegisterComEvent 301 msg_OnComOLEDragDrop
  6147        Send RegisterComEvent 303 msg_OnComOLEStartDrag
  6148        Send RegisterComEvent 304 msg_OnComOLECompleteDrag
  6149        Send RegisterComEvent 305 msg_OnComOLEGiveFeedback
  6150        Send RegisterComEvent 306 msg_OnComOLESetData
  6151    End_Procedure
  6152End_Class
  6153
  6154// CoClass
  6155// ListView Control
  6156{ CLSID=L_cSigCjComListView }
  6157Class cSigCjComListView is a cComActiveXControl
  6158    Import_Class_Protocol cSigCjCom_DListView
  6159    Import_Class_Protocol cSigCjCom_DListViewEvents
  6160
  6161    Procedure Construct_Object
  6162        Forward Send Construct_Object
  6163        Set psProgID to L_cSigCjComListView
  6164        Set psEventId to "{99A8E4BE-945A-473F-8534-1F3781DEEE7D}"
  6165        Set psLicenseKey to L_cSigCjKeyControls
  6166        Set peAutoCreate to acDeferredAutoCreate
  6167    End_Procedure
  6168End_Class
  6169
  6170// Dispatch interface for ProgressBar Control
  6171Class cSigCjCom_DProgressBar is a Mixin
  6172
  6173    { MethodType=Property DesignTime=False }
  6174    Function ComValue Returns Integer
  6175        Integer retVal
  6176        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to retVal
  6177        Function_Return retVal
  6178    End_Function
  6179
  6180    { MethodType=Property DesignTime=False }
  6181    Procedure Set ComValue Integer value
  6182        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to value
  6183    End_Procedure
  6184
  6185    { MethodType=Property DesignTime=False }
  6186    Function ComMin Returns Integer
  6187        Integer retVal
  6188        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  6189        Function_Return retVal
  6190    End_Function
  6191
  6192    { MethodType=Property DesignTime=False }
  6193    Procedure Set ComMin Integer value
  6194        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  6195    End_Procedure
  6196
  6197    { MethodType=Property DesignTime=False }
  6198    Function ComMax Returns Integer
  6199        Integer retVal
  6200        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  6201        Function_Return retVal
  6202    End_Function
  6203
  6204    { MethodType=Property DesignTime=False }
  6205    Procedure Set ComMax Integer value
  6206        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  6207    End_Procedure
  6208
  6209    { MethodType=Property DesignTime=False }
  6210    Function ComHWnd Returns OLE_HANDLE
  6211        OLE_HANDLE retVal
  6212        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  6213        Function_Return retVal
  6214    End_Function
  6215
  6216    { MethodType=Property DesignTime=False }
  6217    Procedure Set ComHWnd OLE_HANDLE value
  6218        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  6219    End_Procedure
  6220
  6221    { MethodType=Property DesignTime=False }
  6222    Function ComEnabled Returns Boolean
  6223        Boolean retVal
  6224        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  6225        Function_Return retVal
  6226    End_Function
  6227
  6228    { MethodType=Property DesignTime=False }
  6229    Procedure Set ComEnabled Boolean value
  6230        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  6231    End_Procedure
  6232
  6233    { MethodType=Property DesignTime=False }
  6234    Function ComScrolling Returns OLEProgressBarScrolling
  6235        OLEProgressBarScrolling retVal
  6236        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  6237        Function_Return retVal
  6238    End_Function
  6239
  6240    { MethodType=Property DesignTime=False }
  6241    Procedure Set ComScrolling OLEProgressBarScrolling value
  6242        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  6243    End_Procedure
  6244
  6245    { MethodType=Property DesignTime=False }
  6246    Function ComOrientation Returns OLEProgressBarOrientation
  6247        OLEProgressBarOrientation retVal
  6248        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  6249        Function_Return retVal
  6250    End_Function
  6251
  6252    { MethodType=Property DesignTime=False }
  6253    Procedure Set ComOrientation OLEProgressBarOrientation value
  6254        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  6255    End_Procedure
  6256
  6257    { MethodType=Property DesignTime=False }
  6258    Function ComAppearance Returns OLEAppearanceStyle
  6259        OLEAppearanceStyle retVal
  6260        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  6261        Function_Return retVal
  6262    End_Function
  6263
  6264    { MethodType=Property DesignTime=False }
  6265    Procedure Set ComAppearance OLEAppearanceStyle value
  6266        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  6267    End_Procedure
  6268
  6269    { MethodType=Property DesignTime=False }
  6270    Function ComBackColor Returns OLE_COLOR
  6271        OLE_COLOR retVal
  6272        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  6273        Function_Return retVal
  6274    End_Function
  6275
  6276    { MethodType=Property DesignTime=False }
  6277    Procedure Set ComBackColor OLE_COLOR value
  6278        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  6279    End_Procedure
  6280
  6281    { MethodType=Property DesignTime=False }
  6282    Function ComBarColor Returns OLE_COLOR
  6283        OLE_COLOR retVal
  6284        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  6285        Function_Return retVal
  6286    End_Function
  6287
  6288    { MethodType=Property DesignTime=False }
  6289    Procedure Set ComBarColor OLE_COLOR value
  6290        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  6291    End_Procedure
  6292
  6293    { MethodType=Property DesignTime=False }
  6294    Function ComForeColor Returns OLE_COLOR
  6295        OLE_COLOR retVal
  6296        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  6297        Function_Return retVal
  6298    End_Function
  6299
  6300    { MethodType=Property DesignTime=False }
  6301    Procedure Set ComForeColor OLE_COLOR value
  6302        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  6303    End_Procedure
  6304
  6305    { MethodType=Property DesignTime=False }
  6306    Function ComText Returns String
  6307        String retVal
  6308        Get ComProperty of (phDispatchDriver(Self)) -517 OLE_VT_BSTR to retVal
  6309        Function_Return retVal
  6310    End_Function
  6311
  6312    { MethodType=Property DesignTime=False }
  6313    Procedure Set ComText String value
  6314        Set ComProperty of (phDispatchDriver(Self)) -517 OLE_VT_BSTR to value
  6315    End_Procedure
  6316
  6317    { MethodType=Property DesignTime=False }
  6318    Function ComFont Returns Variant
  6319        Variant retVal
  6320        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  6321        Function_Return retVal
  6322    End_Function
  6323
  6324    { MethodType=Property DesignTime=False }
  6325    Procedure Set ComFont Variant value
  6326        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  6327    End_Procedure
  6328
  6329    { MethodType=Property DesignTime=False }
  6330    Function ComMarqueeDelay Returns Integer
  6331        Integer retVal
  6332        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  6333        Function_Return retVal
  6334    End_Function
  6335
  6336    { MethodType=Property DesignTime=False }
  6337    Procedure Set ComMarqueeDelay Integer value
  6338        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  6339    End_Procedure
  6340
  6341    { MethodType=Property DesignTime=False }
  6342    Function ComUseVisualStyle Returns Boolean
  6343        Boolean retVal
  6344        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  6345        Function_Return retVal
  6346    End_Function
  6347
  6348    { MethodType=Property DesignTime=False }
  6349    Procedure Set ComUseVisualStyle Boolean value
  6350        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  6351    End_Procedure
  6352
  6353    { MethodType=Property DesignTime=False }
  6354    Function ComFlatStyle Returns Boolean
  6355        Boolean retVal
  6356        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  6357        Function_Return retVal
  6358    End_Function
  6359
  6360    { MethodType=Property DesignTime=False }
  6361    Procedure Set ComFlatStyle Boolean value
  6362        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  6363    End_Procedure
  6364
  6365    { MethodType=Property DesignTime=False }
  6366    Function ComTextAlignment Returns OLEAlignmentStyle
  6367        OLEAlignmentStyle retVal
  6368        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  6369        Function_Return retVal
  6370    End_Function
  6371
  6372    { MethodType=Property DesignTime=False }
  6373    Procedure Set ComTextAlignment OLEAlignmentStyle value
  6374        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  6375    End_Procedure
  6376
  6377    { MethodType=Property DesignTime=False }
  6378    Function ComControlToolTip Returns String
  6379        String retVal
  6380        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  6381        Function_Return retVal
  6382    End_Function
  6383
  6384    { MethodType=Property DesignTime=False }
  6385    Procedure Set ComControlToolTip String value
  6386        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  6387    End_Procedure
  6388
  6389    Procedure ComAboutBox
  6390        Handle hDispatchDriver
  6391        Get phDispatchDriver to hDispatchDriver
  6392        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  6393    End_Procedure
  6394
  6395    Procedure ComRefreshBar
  6396        Handle hDispatchDriver
  6397        Get phDispatchDriver to hDispatchDriver
  6398        Send InvokeComMethod to hDispatchDriver 11 OLE_VT_VOID
  6399    End_Procedure
  6400
  6401    { MethodType=Property DesignTime=False }
  6402    Function ComToolTipContext Returns Variant
  6403        Handle hDispatchDriver
  6404        Variant retVal
  6405        Get phDispatchDriver to hDispatchDriver
  6406        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  6407        Function_Return retVal
  6408    End_Function
  6409End_Class
  6410
  6411// Event interface for ProgressBar Control
  6412Class cSigCjCom_DProgressBarEvents is a Mixin
  6413
  6414    { MethodType=Event }
  6415    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6416    End_Procedure
  6417
  6418    { MethodType=Event }
  6419    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6420    End_Procedure
  6421
  6422    { MethodType=Event }
  6423    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  6424    End_Procedure
  6425
  6426    { Visibility=Private }
  6427    Procedure RegisterComEvents
  6428        Send RegisterComEvent -605 msg_OnComMouseDown
  6429        Send RegisterComEvent -606 msg_OnComMouseMove
  6430        Send RegisterComEvent -607 msg_OnComMouseUp
  6431    End_Procedure
  6432End_Class
  6433
  6434// CoClass
  6435// ProgressBar Control
  6436{ CLSID=L_cSigCjComProgressBar }
  6437Class cSigCjComProgressBar is a cComActiveXControl
  6438    Import_Class_Protocol cSigCjCom_DProgressBar
  6439    Import_Class_Protocol cSigCjCom_DProgressBarEvents
  6440
  6441    Procedure Construct_Object
  6442        Forward Send Construct_Object
  6443        Set psProgID to L_cSigCjComProgressBar
  6444        Set psEventId to "{E5012C11-D6F7-4A60-BC80-6B4D58112A97}"
  6445        Set psLicenseKey to L_cSigCjKeyControls
  6446        Set peAutoCreate to acDeferredAutoCreate
  6447    End_Procedure
  6448End_Class
  6449
  6450// Dispatch interface for ScrollBar Control
  6451Class cSigCjCom_DScrollBar is a Mixin
  6452
  6453    { MethodType=Property DesignTime=False }
  6454    Function ComAutoSize Returns Boolean
  6455        Boolean retVal
  6456        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  6457        Function_Return retVal
  6458    End_Function
  6459
  6460    { MethodType=Property DesignTime=False }
  6461    Procedure Set ComAutoSize Boolean value
  6462        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  6463    End_Procedure
  6464
  6465    { MethodType=Property DesignTime=False }
  6466    Function ComValue Returns Integer
  6467        Integer retVal
  6468        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  6469        Function_Return retVal
  6470    End_Function
  6471
  6472    { MethodType=Property DesignTime=False }
  6473    Procedure Set ComValue Integer value
  6474        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  6475    End_Procedure
  6476
  6477    { MethodType=Property DesignTime=False }
  6478    Function Com_Value Returns Integer
  6479        Integer retVal
  6480        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to retVal
  6481        Function_Return retVal
  6482    End_Function
  6483
  6484    { MethodType=Property DesignTime=False }
  6485    Procedure Set Com_Value Integer value
  6486        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to value
  6487    End_Procedure
  6488
  6489    { MethodType=Property DesignTime=False }
  6490    Function ComMax Returns Integer
  6491        Integer retVal
  6492        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  6493        Function_Return retVal
  6494    End_Function
  6495
  6496    { MethodType=Property DesignTime=False }
  6497    Procedure Set ComMax Integer value
  6498        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  6499    End_Procedure
  6500
  6501    { MethodType=Property DesignTime=False }
  6502    Function ComMin Returns Integer
  6503        Integer retVal
  6504        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  6505        Function_Return retVal
  6506    End_Function
  6507
  6508    { MethodType=Property DesignTime=False }
  6509    Procedure Set ComMin Integer value
  6510        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  6511    End_Procedure
  6512
  6513    { MethodType=Property DesignTime=False }
  6514    Function ComSmallChange Returns Integer
  6515        Integer retVal
  6516        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  6517        Function_Return retVal
  6518    End_Function
  6519
  6520    { MethodType=Property DesignTime=False }
  6521    Procedure Set ComSmallChange Integer value
  6522        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  6523    End_Procedure
  6524
  6525    { MethodType=Property DesignTime=False }
  6526    Function ComLargeChange Returns Integer
  6527        Integer retVal
  6528        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  6529        Function_Return retVal
  6530    End_Function
  6531
  6532    { MethodType=Property DesignTime=False }
  6533    Procedure Set ComLargeChange Integer value
  6534        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  6535    End_Procedure
  6536
  6537    { MethodType=Property DesignTime=False }
  6538    Function ComOrientation Returns OLEScrollBarOrientation
  6539        OLEScrollBarOrientation retVal
  6540        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  6541        Function_Return retVal
  6542    End_Function
  6543
  6544    { MethodType=Property DesignTime=False }
  6545    Procedure Set ComOrientation OLEScrollBarOrientation value
  6546        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  6547    End_Procedure
  6548
  6549    { MethodType=Property DesignTime=False }
  6550    Function ComUseVisualStyle Returns Boolean
  6551        Boolean retVal
  6552        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  6553        Function_Return retVal
  6554    End_Function
  6555
  6556    { MethodType=Property DesignTime=False }
  6557    Procedure Set ComUseVisualStyle Boolean value
  6558        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  6559    End_Procedure
  6560
  6561    { MethodType=Property DesignTime=False }
  6562    Function ComAppearance Returns OLEAppearanceStyle
  6563        OLEAppearanceStyle retVal
  6564        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  6565        Function_Return retVal
  6566    End_Function
  6567
  6568    { MethodType=Property DesignTime=False }
  6569    Procedure Set ComAppearance OLEAppearanceStyle value
  6570        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  6571    End_Procedure
  6572
  6573    { MethodType=Property DesignTime=False }
  6574    Function ComEnabled Returns Boolean
  6575        Boolean retVal
  6576        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  6577        Function_Return retVal
  6578    End_Function
  6579
  6580    { MethodType=Property DesignTime=False }
  6581    Procedure Set ComEnabled Boolean value
  6582        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  6583    End_Procedure
  6584
  6585    { MethodType=Property DesignTime=False }
  6586    Function ComHWnd Returns OLE_HANDLE
  6587        OLE_HANDLE retVal
  6588        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  6589        Function_Return retVal
  6590    End_Function
  6591
  6592    { MethodType=Property DesignTime=False }
  6593    Procedure Set ComHWnd OLE_HANDLE value
  6594        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  6595    End_Procedure
  6596
  6597    { MethodType=Property DesignTime=False }
  6598    Function ComControlToolTip Returns String
  6599        String retVal
  6600        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  6601        Function_Return retVal
  6602    End_Function
  6603
  6604    { MethodType=Property DesignTime=False }
  6605    Procedure Set ComControlToolTip String value
  6606        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  6607    End_Procedure
  6608
  6609    Procedure ComAboutBox
  6610        Handle hDispatchDriver
  6611        Get phDispatchDriver to hDispatchDriver
  6612        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  6613    End_Procedure
  6614
  6615    { MethodType=Property DesignTime=False }
  6616    Function ComToolTipContext Returns Variant
  6617        Handle hDispatchDriver
  6618        Variant retVal
  6619        Get phDispatchDriver to hDispatchDriver
  6620        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  6621        Function_Return retVal
  6622    End_Function
  6623End_Class
  6624
  6625// Event interface for ScrollBar Control
  6626Class cSigCjCom_DScrollBarEvents is a Mixin
  6627
  6628    { MethodType=Event }
  6629    Procedure OnComChange
  6630    End_Procedure
  6631
  6632    { MethodType=Event }
  6633    Procedure OnComScroll
  6634    End_Procedure
  6635
  6636    { Visibility=Private }
  6637    Procedure RegisterComEvents
  6638        Send RegisterComEvent 1 msg_OnComChange
  6639        Send RegisterComEvent 2 msg_OnComScroll
  6640    End_Procedure
  6641End_Class
  6642
  6643// CoClass
  6644// ScrollBar Control
  6645{ CLSID=L_cSigCjComScrollBar }
  6646Class cSigCjComScrollBar is a cComActiveXControl
  6647    Import_Class_Protocol cSigCjCom_DScrollBar
  6648    Import_Class_Protocol cSigCjCom_DScrollBarEvents
  6649
  6650    Procedure Construct_Object
  6651        Forward Send Construct_Object
  6652        Set psProgID to L_cSigCjComScrollBar
  6653        Set psEventId to "{00E032CB-FBBC-40DB-846D-05B2CE330888}"
  6654        Set psLicenseKey to L_cSigCjKeyControls
  6655        Set peAutoCreate to acDeferredAutoCreate
  6656    End_Procedure
  6657End_Class
  6658
  6659// Dispatch interface for UpDown Control
  6660Class cSigCjCom_DUpDown is a Mixin
  6661
  6662    { MethodType=Property DesignTime=False }
  6663    Function ComValue Returns Integer
  6664        Integer retVal
  6665        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to retVal
  6666        Function_Return retVal
  6667    End_Function
  6668
  6669    { MethodType=Property DesignTime=False }
  6670    Procedure Set ComValue Integer value
  6671        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to value
  6672    End_Procedure
  6673
  6674    { MethodType=Property DesignTime=False }
  6675    Function ComMin Returns Integer
  6676        Integer retVal
  6677        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  6678        Function_Return retVal
  6679    End_Function
  6680
  6681    { MethodType=Property DesignTime=False }
  6682    Procedure Set ComMin Integer value
  6683        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  6684    End_Procedure
  6685
  6686    { MethodType=Property DesignTime=False }
  6687    Function ComMax Returns Integer
  6688        Integer retVal
  6689        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  6690        Function_Return retVal
  6691    End_Function
  6692
  6693    { MethodType=Property DesignTime=False }
  6694    Procedure Set ComMax Integer value
  6695        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  6696    End_Procedure
  6697
  6698    { MethodType=Property DesignTime=False }
  6699    Function ComIncrement Returns Integer
  6700        Integer retVal
  6701        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  6702        Function_Return retVal
  6703    End_Function
  6704
  6705    { MethodType=Property DesignTime=False }
  6706    Procedure Set ComIncrement Integer value
  6707        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  6708    End_Procedure
  6709
  6710    { MethodType=Property DesignTime=False }
  6711    Function ComOrientation Returns OLEUpDownOrientation
  6712        OLEUpDownOrientation retVal
  6713        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  6714        Function_Return retVal
  6715    End_Function
  6716
  6717    { MethodType=Property DesignTime=False }
  6718    Procedure Set ComOrientation OLEUpDownOrientation value
  6719        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  6720    End_Procedure
  6721
  6722    { MethodType=Property DesignTime=False }
  6723    Function ComUseVisualStyle Returns Boolean
  6724        Boolean retVal
  6725        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  6726        Function_Return retVal
  6727    End_Function
  6728
  6729    { MethodType=Property DesignTime=False }
  6730    Procedure Set ComUseVisualStyle Boolean value
  6731        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  6732    End_Procedure
  6733
  6734    { MethodType=Property DesignTime=False }
  6735    Function ComAppearance Returns OLEAppearanceStyle
  6736        OLEAppearanceStyle retVal
  6737        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  6738        Function_Return retVal
  6739    End_Function
  6740
  6741    { MethodType=Property DesignTime=False }
  6742    Procedure Set ComAppearance OLEAppearanceStyle value
  6743        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  6744    End_Procedure
  6745
  6746    { MethodType=Property DesignTime=False }
  6747    Function ComEnabled Returns Boolean
  6748        Boolean retVal
  6749        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  6750        Function_Return retVal
  6751    End_Function
  6752
  6753    { MethodType=Property DesignTime=False }
  6754    Procedure Set ComEnabled Boolean value
  6755        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  6756    End_Procedure
  6757
  6758    { MethodType=Property DesignTime=False }
  6759    Function ComAutoBuddy Returns Boolean
  6760        Boolean retVal
  6761        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  6762        Function_Return retVal
  6763    End_Function
  6764
  6765    { MethodType=Property DesignTime=False }
  6766    Procedure Set ComAutoBuddy Boolean value
  6767        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  6768    End_Procedure
  6769
  6770    { MethodType=Property DesignTime=False }
  6771    Function ComBuddyControl Returns String
  6772        String retVal
  6773        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BSTR to retVal
  6774        Function_Return retVal
  6775    End_Function
  6776
  6777    { MethodType=Property DesignTime=False }
  6778    Procedure Set ComBuddyControl String value
  6779        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BSTR to value
  6780    End_Procedure
  6781
  6782    { MethodType=Property DesignTime=False }
  6783    Function ComBuddyProperty Returns String
  6784        String retVal
  6785        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BSTR to retVal
  6786        Function_Return retVal
  6787    End_Function
  6788
  6789    { MethodType=Property DesignTime=False }
  6790    Procedure Set ComBuddyProperty String value
  6791        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BSTR to value
  6792    End_Procedure
  6793
  6794    { MethodType=Property DesignTime=False }
  6795    Function ComSyncBuddy Returns Boolean
  6796        Boolean retVal
  6797        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  6798        Function_Return retVal
  6799    End_Function
  6800
  6801    { MethodType=Property DesignTime=False }
  6802    Procedure Set ComSyncBuddy Boolean value
  6803        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  6804    End_Procedure
  6805
  6806    { MethodType=Property DesignTime=False }
  6807    Function ComAlignment Returns OLEUpDownAlignment
  6808        OLEUpDownAlignment retVal
  6809        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  6810        Function_Return retVal
  6811    End_Function
  6812
  6813    { MethodType=Property DesignTime=False }
  6814    Procedure Set ComAlignment OLEUpDownAlignment value
  6815        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  6816    End_Procedure
  6817
  6818    { MethodType=Property DesignTime=False }
  6819    Function ComControlToolTip Returns String
  6820        String retVal
  6821        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  6822        Function_Return retVal
  6823    End_Function
  6824
  6825    { MethodType=Property DesignTime=False }
  6826    Procedure Set ComControlToolTip String value
  6827        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  6828    End_Procedure
  6829
  6830    Procedure ComAboutBox
  6831        Handle hDispatchDriver
  6832        Get phDispatchDriver to hDispatchDriver
  6833        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  6834    End_Procedure
  6835
  6836    { MethodType=Property DesignTime=False }
  6837    Function ComToolTipContext Returns Variant
  6838        Handle hDispatchDriver
  6839        Variant retVal
  6840        Get phDispatchDriver to hDispatchDriver
  6841        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  6842        Function_Return retVal
  6843    End_Function
  6844End_Class
  6845
  6846// Event interface for UpDown Control
  6847Class cSigCjCom_DUpDownEvents is a Mixin
  6848
  6849    { MethodType=Event }
  6850    Procedure OnComUpClick
  6851    End_Procedure
  6852
  6853    { MethodType=Event }
  6854    Procedure OnComDownClick
  6855    End_Procedure
  6856
  6857    { MethodType=Event }
  6858    Procedure OnComChange
  6859    End_Procedure
  6860
  6861    { Visibility=Private }
  6862    Procedure RegisterComEvents
  6863        Send RegisterComEvent 1 msg_OnComUpClick
  6864        Send RegisterComEvent 2 msg_OnComDownClick
  6865        Send RegisterComEvent 3 msg_OnComChange
  6866    End_Procedure
  6867End_Class
  6868
  6869// CoClass
  6870// UpDown Control
  6871{ CLSID=L_cSigCjComUpDown }
  6872Class cSigCjComUpDown is a cComActiveXControl
  6873    Import_Class_Protocol cSigCjCom_DUpDown
  6874    Import_Class_Protocol cSigCjCom_DUpDownEvents
  6875
  6876    Procedure Construct_Object
  6877        Forward Send Construct_Object
  6878        Set psProgID to L_cSigCjComUpDown
  6879        Set psEventId to "{7CF55A07-2981-4FB2-A62C-AC1422205590}"
  6880        Set psLicenseKey to L_cSigCjKeyControls
  6881        Set peAutoCreate to acDeferredAutoCreate
  6882    End_Procedure
  6883End_Class
  6884
  6885// Dispatch interface for Slider Control
  6886Class cSigCjCom_DSlider is a Mixin
  6887
  6888    { MethodType=Property DesignTime=False }
  6889    Function ComValue Returns Integer
  6890        Integer retVal
  6891        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to retVal
  6892        Function_Return retVal
  6893    End_Function
  6894
  6895    { MethodType=Property DesignTime=False }
  6896    Procedure Set ComValue Integer value
  6897        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_I4 to value
  6898    End_Procedure
  6899
  6900    { MethodType=Property DesignTime=False }
  6901    Function ComMin Returns Integer
  6902        Integer retVal
  6903        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  6904        Function_Return retVal
  6905    End_Function
  6906
  6907    { MethodType=Property DesignTime=False }
  6908    Procedure Set ComMin Integer value
  6909        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  6910    End_Procedure
  6911
  6912    { MethodType=Property DesignTime=False }
  6913    Function ComMax Returns Integer
  6914        Integer retVal
  6915        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  6916        Function_Return retVal
  6917    End_Function
  6918
  6919    { MethodType=Property DesignTime=False }
  6920    Procedure Set ComMax Integer value
  6921        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  6922    End_Procedure
  6923
  6924    { MethodType=Property DesignTime=False }
  6925    Function ComSmallChange Returns Integer
  6926        Integer retVal
  6927        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  6928        Function_Return retVal
  6929    End_Function
  6930
  6931    { MethodType=Property DesignTime=False }
  6932    Procedure Set ComSmallChange Integer value
  6933        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  6934    End_Procedure
  6935
  6936    { MethodType=Property DesignTime=False }
  6937    Function ComLargeChange Returns Integer
  6938        Integer retVal
  6939        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  6940        Function_Return retVal
  6941    End_Function
  6942
  6943    { MethodType=Property DesignTime=False }
  6944    Procedure Set ComLargeChange Integer value
  6945        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  6946    End_Procedure
  6947
  6948    { MethodType=Property DesignTime=False }
  6949    Function ComEnabled Returns Boolean
  6950        Boolean retVal
  6951        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  6952        Function_Return retVal
  6953    End_Function
  6954
  6955    { MethodType=Property DesignTime=False }
  6956    Procedure Set ComEnabled Boolean value
  6957        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  6958    End_Procedure
  6959
  6960    { MethodType=Property DesignTime=False }
  6961    Function ComHWnd Returns OLE_HANDLE
  6962        OLE_HANDLE retVal
  6963        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  6964        Function_Return retVal
  6965    End_Function
  6966
  6967    { MethodType=Property DesignTime=False }
  6968    Procedure Set ComHWnd OLE_HANDLE value
  6969        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  6970    End_Procedure
  6971
  6972    { MethodType=Property DesignTime=False }
  6973    Function ComOrientation Returns OLESliderOrientation
  6974        OLESliderOrientation retVal
  6975        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  6976        Function_Return retVal
  6977    End_Function
  6978
  6979    { MethodType=Property DesignTime=False }
  6980    Procedure Set ComOrientation OLESliderOrientation value
  6981        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  6982    End_Procedure
  6983
  6984    { MethodType=Property DesignTime=False }
  6985    Function ComTickStyle Returns OLESliderTickStyle
  6986        OLESliderTickStyle retVal
  6987        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  6988        Function_Return retVal
  6989    End_Function
  6990
  6991    { MethodType=Property DesignTime=False }
  6992    Procedure Set ComTickStyle OLESliderTickStyle value
  6993        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  6994    End_Procedure
  6995
  6996    { MethodType=Property DesignTime=False }
  6997    Function ComTickFrequency Returns Integer
  6998        Integer retVal
  6999        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  7000        Function_Return retVal
  7001    End_Function
  7002
  7003    { MethodType=Property DesignTime=False }
  7004    Procedure Set ComTickFrequency Integer value
  7005        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  7006    End_Procedure
  7007
  7008    { MethodType=Property DesignTime=False }
  7009    Function ComSelectRange Returns Boolean
  7010        Boolean retVal
  7011        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  7012        Function_Return retVal
  7013    End_Function
  7014
  7015    { MethodType=Property DesignTime=False }
  7016    Procedure Set ComSelectRange Boolean value
  7017        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  7018    End_Procedure
  7019
  7020    { MethodType=Property DesignTime=False }
  7021    Function ComSelStart Returns Integer
  7022        Integer retVal
  7023        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  7024        Function_Return retVal
  7025    End_Function
  7026
  7027    { MethodType=Property DesignTime=False }
  7028    Procedure Set ComSelStart Integer value
  7029        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  7030    End_Procedure
  7031
  7032    { MethodType=Property DesignTime=False }
  7033    Function ComSelLength Returns Integer
  7034        Integer retVal
  7035        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  7036        Function_Return retVal
  7037    End_Function
  7038
  7039    { MethodType=Property DesignTime=False }
  7040    Procedure Set ComSelLength Integer value
  7041        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  7042    End_Procedure
  7043
  7044    { MethodType=Property DesignTime=False }
  7045    Function ComShowTooltips Returns Boolean
  7046        Boolean retVal
  7047        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to retVal
  7048        Function_Return retVal
  7049    End_Function
  7050
  7051    { MethodType=Property DesignTime=False }
  7052    Procedure Set ComShowTooltips Boolean value
  7053        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to value
  7054    End_Procedure
  7055
  7056    { MethodType=Property DesignTime=False }
  7057    Function ComControlToolTip Returns String
  7058        String retVal
  7059        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  7060        Function_Return retVal
  7061    End_Function
  7062
  7063    { MethodType=Property DesignTime=False }
  7064    Procedure Set ComControlToolTip String value
  7065        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  7066    End_Procedure
  7067
  7068    Procedure ComAboutBox
  7069        Handle hDispatchDriver
  7070        Get phDispatchDriver to hDispatchDriver
  7071        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  7072    End_Procedure
  7073
  7074    { MethodType=Property DesignTime=False }
  7075    Function ComToolTipContext Returns Variant
  7076        Handle hDispatchDriver
  7077        Variant retVal
  7078        Get phDispatchDriver to hDispatchDriver
  7079        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  7080        Function_Return retVal
  7081    End_Function
  7082End_Class
  7083
  7084// Event interface for Slider Control
  7085Class cSigCjCom_DSliderEvents is a Mixin
  7086
  7087    { MethodType=Event }
  7088    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  7089    End_Procedure
  7090
  7091    { MethodType=Event }
  7092    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  7093    End_Procedure
  7094
  7095    { MethodType=Event }
  7096    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  7097    End_Procedure
  7098
  7099    { MethodType=Event }
  7100    Procedure OnComClick
  7101    End_Procedure
  7102
  7103    { MethodType=Event }
  7104    Procedure OnComScroll
  7105    End_Procedure
  7106
  7107    { MethodType=Event }
  7108    Procedure OnComChange
  7109    End_Procedure
  7110
  7111    { Visibility=Private }
  7112    Procedure RegisterComEvents
  7113        Send RegisterComEvent -605 msg_OnComMouseDown
  7114        Send RegisterComEvent -606 msg_OnComMouseMove
  7115        Send RegisterComEvent -607 msg_OnComMouseUp
  7116        Send RegisterComEvent -600 msg_OnComClick
  7117        Send RegisterComEvent 1 msg_OnComScroll
  7118        Send RegisterComEvent 2 msg_OnComChange
  7119    End_Procedure
  7120End_Class
  7121
  7122// CoClass
  7123// Slider Control
  7124{ CLSID=L_cSigCjComSlider }
  7125Class cSigCjComSlider is a cComActiveXControl
  7126    Import_Class_Protocol cSigCjCom_DSlider
  7127    Import_Class_Protocol cSigCjCom_DSliderEvents
  7128
  7129    Procedure Construct_Object
  7130        Forward Send Construct_Object
  7131        Set psProgID to L_cSigCjComSlider
  7132        Set psEventId to "{14AD72F3-2797-45D9-B88D-A14E501CDB71}"
  7133        Set psLicenseKey to L_cSigCjKeyControls
  7134        Set peAutoCreate to acDeferredAutoCreate
  7135    End_Procedure
  7136End_Class
  7137
  7138// Dispatch interface for TaskDialog Control
  7139Class cSigCjCom_DTaskDialog is a Mixin
  7140
  7141    { MethodType=Property DesignTime=False }
  7142    Function ComWindowTitle Returns String
  7143        String retVal
  7144        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to retVal
  7145        Function_Return retVal
  7146    End_Function
  7147
  7148    { MethodType=Property DesignTime=False }
  7149    Procedure Set ComWindowTitle String value
  7150        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BSTR to value
  7151    End_Procedure
  7152
  7153    { MethodType=Property DesignTime=False }
  7154    Function ComMainInstructionText Returns String
  7155        String retVal
  7156        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
  7157        Function_Return retVal
  7158    End_Function
  7159
  7160    { MethodType=Property DesignTime=False }
  7161    Procedure Set ComMainInstructionText String value
  7162        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
  7163    End_Procedure
  7164
  7165    { MethodType=Property DesignTime=False }
  7166    Function ComContentText Returns String
  7167        String retVal
  7168        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BSTR to retVal
  7169        Function_Return retVal
  7170    End_Function
  7171
  7172    { MethodType=Property DesignTime=False }
  7173    Procedure Set ComContentText String value
  7174        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BSTR to value
  7175    End_Procedure
  7176
  7177    { MethodType=Property DesignTime=False }
  7178    Function ComExpandedInformationText Returns String
  7179        String retVal
  7180        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BSTR to retVal
  7181        Function_Return retVal
  7182    End_Function
  7183
  7184    { MethodType=Property DesignTime=False }
  7185    Procedure Set ComExpandedInformationText String value
  7186        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BSTR to value
  7187    End_Procedure
  7188
  7189    { MethodType=Property DesignTime=False }
  7190    Function ComFooterText Returns String
  7191        String retVal
  7192        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BSTR to retVal
  7193        Function_Return retVal
  7194    End_Function
  7195
  7196    { MethodType=Property DesignTime=False }
  7197    Procedure Set ComFooterText String value
  7198        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BSTR to value
  7199    End_Procedure
  7200
  7201    { MethodType=Property DesignTime=False }
  7202    Function ComDialogWidth Returns Integer
  7203        Integer retVal
  7204        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  7205        Function_Return retVal
  7206    End_Function
  7207
  7208    { MethodType=Property DesignTime=False }
  7209    Procedure Set ComDialogWidth Integer value
  7210        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  7211    End_Procedure
  7212
  7213    { MethodType=Property DesignTime=False }
  7214    Function ComVerificationText Returns String
  7215        String retVal
  7216        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to retVal
  7217        Function_Return retVal
  7218    End_Function
  7219
  7220    { MethodType=Property DesignTime=False }
  7221    Procedure Set ComVerificationText String value
  7222        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to value
  7223    End_Procedure
  7224
  7225    { MethodType=Property DesignTime=False }
  7226    Function ComExpandedControlText Returns String
  7227        String retVal
  7228        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BSTR to retVal
  7229        Function_Return retVal
  7230    End_Function
  7231
  7232    { MethodType=Property DesignTime=False }
  7233    Procedure Set ComExpandedControlText String value
  7234        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BSTR to value
  7235    End_Procedure
  7236
  7237    { MethodType=Property DesignTime=False }
  7238    Function ComCollapsedControlText Returns String
  7239        String retVal
  7240        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BSTR to retVal
  7241        Function_Return retVal
  7242    End_Function
  7243
  7244    { MethodType=Property DesignTime=False }
  7245    Procedure Set ComCollapsedControlText String value
  7246        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BSTR to value
  7247    End_Procedure
  7248
  7249    { MethodType=Property DesignTime=False }
  7250    Function ComEnableHyperlinks Returns Boolean
  7251        Boolean retVal
  7252        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
  7253        Function_Return retVal
  7254    End_Function
  7255
  7256    { MethodType=Property DesignTime=False }
  7257    Procedure Set ComEnableHyperlinks Boolean value
  7258        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
  7259    End_Procedure
  7260
  7261    { MethodType=Property DesignTime=False }
  7262    Function ComAllowCancellation Returns Boolean
  7263        Boolean retVal
  7264        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to retVal
  7265        Function_Return retVal
  7266    End_Function
  7267
  7268    { MethodType=Property DesignTime=False }
  7269    Procedure Set ComAllowCancellation Boolean value
  7270        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_BOOL to value
  7271    End_Procedure
  7272
  7273    { MethodType=Property DesignTime=False }
  7274    Function ComRelativePosition Returns Boolean
  7275        Boolean retVal
  7276        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to retVal
  7277        Function_Return retVal
  7278    End_Function
  7279
  7280    { MethodType=Property DesignTime=False }
  7281    Procedure Set ComRelativePosition Boolean value
  7282        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BOOL to value
  7283    End_Procedure
  7284
  7285    { MethodType=Property DesignTime=False }
  7286    Function ComRtlLayout Returns Boolean
  7287        Boolean retVal
  7288        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to retVal
  7289        Function_Return retVal
  7290    End_Function
  7291
  7292    { MethodType=Property DesignTime=False }
  7293    Procedure Set ComRtlLayout Boolean value
  7294        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_BOOL to value
  7295    End_Procedure
  7296
  7297    { MethodType=Property DesignTime=False }
  7298    Function ComExpandedByDefault Returns Boolean
  7299        Boolean retVal
  7300        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to retVal
  7301        Function_Return retVal
  7302    End_Function
  7303
  7304    { MethodType=Property DesignTime=False }
  7305    Procedure Set ComExpandedByDefault Boolean value
  7306        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_BOOL to value
  7307    End_Procedure
  7308
  7309    { MethodType=Property DesignTime=False }
  7310    Function ComExpandFooterArea Returns Boolean
  7311        Boolean retVal
  7312        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BOOL to retVal
  7313        Function_Return retVal
  7314    End_Function
  7315
  7316    { MethodType=Property DesignTime=False }
  7317    Procedure Set ComExpandFooterArea Boolean value
  7318        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BOOL to value
  7319    End_Procedure
  7320
  7321    { MethodType=Property DesignTime=False }
  7322    Function ComEnableCommandLinks Returns Boolean
  7323        Boolean retVal
  7324        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_BOOL to retVal
  7325        Function_Return retVal
  7326    End_Function
  7327
  7328    { MethodType=Property DesignTime=False }
  7329    Procedure Set ComEnableCommandLinks Boolean value
  7330        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_BOOL to value
  7331    End_Procedure
  7332
  7333    { MethodType=Property DesignTime=False }
  7334    Function ComDefaultButton Returns Integer
  7335        Integer retVal
  7336        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to retVal
  7337        Function_Return retVal
  7338    End_Function
  7339
  7340    { MethodType=Property DesignTime=False }
  7341    Procedure Set ComDefaultButton Integer value
  7342        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_I4 to value
  7343    End_Procedure
  7344
  7345    { MethodType=Property DesignTime=False }
  7346    Function ComDefaultRadioButton Returns Integer
  7347        Integer retVal
  7348        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
  7349        Function_Return retVal
  7350    End_Function
  7351
  7352    { MethodType=Property DesignTime=False }
  7353    Procedure Set ComDefaultRadioButton Integer value
  7354        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
  7355    End_Procedure
  7356
  7357    { MethodType=Property DesignTime=False }
  7358    Function ComVerifyCheckState Returns Boolean
  7359        Boolean retVal
  7360        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_BOOL to retVal
  7361        Function_Return retVal
  7362    End_Function
  7363
  7364    { MethodType=Property DesignTime=False }
  7365    Procedure Set ComVerifyCheckState Boolean value
  7366        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_BOOL to value
  7367    End_Procedure
  7368
  7369    { MethodType=Property DesignTime=False }
  7370    Function ComEnableCallbackTimer Returns Boolean
  7371        Boolean retVal
  7372        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BOOL to retVal
  7373        Function_Return retVal
  7374    End_Function
  7375
  7376    { MethodType=Property DesignTime=False }
  7377    Procedure Set ComEnableCallbackTimer Boolean value
  7378        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BOOL to value
  7379    End_Procedure
  7380
  7381    { MethodType=Property DesignTime=False }
  7382    Function ComUseComCtl32 Returns Boolean
  7383        Boolean retVal
  7384        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to retVal
  7385        Function_Return retVal
  7386    End_Function
  7387
  7388    { MethodType=Property DesignTime=False }
  7389    Procedure Set ComUseComCtl32 Boolean value
  7390        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to value
  7391    End_Procedure
  7392
  7393    { MethodType=Property DesignTime=False }
  7394    Function ComCommonButtons Returns OLETaskDialogCommonButtons
  7395        OLETaskDialogCommonButtons retVal
  7396        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
  7397        Function_Return retVal
  7398    End_Function
  7399
  7400    { MethodType=Property DesignTime=False }
  7401    Procedure Set ComCommonButtons OLETaskDialogCommonButtons value
  7402        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
  7403    End_Procedure
  7404
  7405    { MethodType=Property DesignTime=False }
  7406    Function ComParentHwnd Returns OLE_HANDLE
  7407        OLE_HANDLE retVal
  7408        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to retVal
  7409        Function_Return retVal
  7410    End_Function
  7411
  7412    { MethodType=Property DesignTime=False }
  7413    Procedure Set ComParentHwnd OLE_HANDLE value
  7414        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to value
  7415    End_Procedure
  7416
  7417    { MethodType=Property DesignTime=False }
  7418    Function ComMessageBoxStyle Returns Boolean
  7419        Boolean retVal
  7420        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to retVal
  7421        Function_Return retVal
  7422    End_Function
  7423
  7424    { MethodType=Property DesignTime=False }
  7425    Procedure Set ComMessageBoxStyle Boolean value
  7426        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_BOOL to value
  7427    End_Procedure
  7428
  7429    { MethodType=Property DesignTime=False }
  7430    Function ComMainIcon Returns OLETaskDialogIcon
  7431        OLETaskDialogIcon retVal
  7432        Get ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to retVal
  7433        Function_Return retVal
  7434    End_Function
  7435
  7436    { MethodType=Property DesignTime=False }
  7437    Procedure Set ComMainIcon OLETaskDialogIcon value
  7438        Set ComProperty of (phDispatchDriver(Self)) 25 OLE_VT_I4 to value
  7439    End_Procedure
  7440
  7441    { MethodType=Property DesignTime=False }
  7442    Function ComMainIconHandle Returns OLE_HANDLE
  7443        OLE_HANDLE retVal
  7444        Get ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to retVal
  7445        Function_Return retVal
  7446    End_Function
  7447
  7448    { MethodType=Property DesignTime=False }
  7449    Procedure Set ComMainIconHandle OLE_HANDLE value
  7450        Set ComProperty of (phDispatchDriver(Self)) 26 OLE_VT_I4 to value
  7451    End_Procedure
  7452
  7453    { MethodType=Property DesignTime=False }
  7454    Function ComFooterIcon Returns OLETaskDialogIcon
  7455        OLETaskDialogIcon retVal
  7456        Get ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to retVal
  7457        Function_Return retVal
  7458    End_Function
  7459
  7460    { MethodType=Property DesignTime=False }
  7461    Procedure Set ComFooterIcon OLETaskDialogIcon value
  7462        Set ComProperty of (phDispatchDriver(Self)) 27 OLE_VT_I4 to value
  7463    End_Procedure
  7464
  7465    { MethodType=Property DesignTime=False }
  7466    Function ComFooterIconHandle Returns OLE_HANDLE
  7467        OLE_HANDLE retVal
  7468        Get ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_I4 to retVal
  7469        Function_Return retVal
  7470    End_Function
  7471
  7472    { MethodType=Property DesignTime=False }
  7473    Procedure Set ComFooterIconHandle OLE_HANDLE value
  7474        Set ComProperty of (phDispatchDriver(Self)) 28 OLE_VT_I4 to value
  7475    End_Procedure
  7476
  7477    { MethodType=Property DesignTime=False }
  7478    Function ComProgressBarPos Returns Integer
  7479        Integer retVal
  7480        Get ComProperty of (phDispatchDriver(Self)) 29 OLE_VT_I4 to retVal
  7481        Function_Return retVal
  7482    End_Function
  7483
  7484    { MethodType=Property DesignTime=False }
  7485    Procedure Set ComProgressBarPos Integer value
  7486        Set ComProperty of (phDispatchDriver(Self)) 29 OLE_VT_I4 to value
  7487    End_Procedure
  7488
  7489    { MethodType=Property DesignTime=False }
  7490    Function ComShowCommandLinkIcons Returns Boolean
  7491        Boolean retVal
  7492        Get ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to retVal
  7493        Function_Return retVal
  7494    End_Function
  7495
  7496    { MethodType=Property DesignTime=False }
  7497    Procedure Set ComShowCommandLinkIcons Boolean value
  7498        Set ComProperty of (phDispatchDriver(Self)) 30 OLE_VT_BOOL to value
  7499    End_Procedure
  7500
  7501    { MethodType=Property DesignTime=False }
  7502    Function ComProgressBarStyle Returns OLETaskDialogProgressBarStyle
  7503        OLETaskDialogProgressBarStyle retVal
  7504        Get ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to retVal
  7505        Function_Return retVal
  7506    End_Function
  7507
  7508    { MethodType=Property DesignTime=False }
  7509    Procedure Set ComProgressBarStyle OLETaskDialogProgressBarStyle value
  7510        Set ComProperty of (phDispatchDriver(Self)) 31 OLE_VT_I4 to value
  7511    End_Procedure
  7512
  7513    { MethodType=Property DesignTime=False }
  7514    Function ComInputBoxText Returns String
  7515        String retVal
  7516        Get ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BSTR to retVal
  7517        Function_Return retVal
  7518    End_Function
  7519
  7520    { MethodType=Property DesignTime=False }
  7521    Procedure Set ComInputBoxText String value
  7522        Set ComProperty of (phDispatchDriver(Self)) 32 OLE_VT_BSTR to value
  7523    End_Procedure
  7524
  7525    { MethodType=Property DesignTime=False }
  7526    Function ComEnableMarkup Returns Boolean
  7527        Boolean retVal
  7528        Get ComProperty of (phDispatchDriver(Self)) 50 OLE_VT_BOOL to retVal
  7529        Function_Return retVal
  7530    End_Function
  7531
  7532    { MethodType=Property DesignTime=False }
  7533    Procedure Set ComEnableMarkup Boolean value
  7534        Set ComProperty of (phDispatchDriver(Self)) 50 OLE_VT_BOOL to value
  7535    End_Procedure
  7536
  7537    Function ComShowDialog Returns Integer
  7538        Handle hDispatchDriver
  7539        Integer retVal
  7540        Get phDispatchDriver to hDispatchDriver
  7541        Get InvokeComMethod of hDispatchDriver 33 OLE_VT_I4 to retVal
  7542        Function_Return retVal
  7543    End_Function
  7544
  7545    Procedure ComAddButton String llText Integer llId
  7546        Handle hDispatchDriver
  7547        Get phDispatchDriver to hDispatchDriver
  7548        Send PrepareParams to hDispatchDriver 2
  7549        Send DefineParam to hDispatchDriver OLE_VT_BSTR llText
  7550        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  7551        Send InvokeComMethod to hDispatchDriver 34 OLE_VT_VOID
  7552    End_Procedure
  7553
  7554    Procedure ComAddRadioButton String llText Integer llId
  7555        Handle hDispatchDriver
  7556        Get phDispatchDriver to hDispatchDriver
  7557        Send PrepareParams to hDispatchDriver 2
  7558        Send DefineParam to hDispatchDriver OLE_VT_BSTR llText
  7559        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  7560        Send InvokeComMethod to hDispatchDriver 35 OLE_VT_VOID
  7561    End_Procedure
  7562
  7563    Procedure ComReset
  7564        Handle hDispatchDriver
  7565        Get phDispatchDriver to hDispatchDriver
  7566        Send InvokeComMethod to hDispatchDriver 36 OLE_VT_VOID
  7567    End_Procedure
  7568
  7569    Procedure ComEnableRadioButton Integer llId Boolean llEnable
  7570        Handle hDispatchDriver
  7571        Get phDispatchDriver to hDispatchDriver
  7572        Send PrepareParams to hDispatchDriver 2
  7573        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  7574        Send DefineParam to hDispatchDriver OLE_VT_BOOL llEnable
  7575        Send InvokeComMethod to hDispatchDriver 37 OLE_VT_VOID
  7576    End_Procedure
  7577
  7578    Procedure ComEnableButton Integer llId Boolean llEnable
  7579        Handle hDispatchDriver
  7580        Get phDispatchDriver to hDispatchDriver
  7581        Send PrepareParams to hDispatchDriver 2
  7582        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  7583        Send DefineParam to hDispatchDriver OLE_VT_BOOL llEnable
  7584        Send InvokeComMethod to hDispatchDriver 38 OLE_VT_VOID
  7585    End_Procedure
  7586
  7587    Procedure ComClickButton Integer llId
  7588        Handle hDispatchDriver
  7589        Get phDispatchDriver to hDispatchDriver
  7590        Send PrepareParams to hDispatchDriver 1
  7591        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  7592        Send InvokeComMethod to hDispatchDriver 39 OLE_VT_VOID
  7593    End_Procedure
  7594
  7595    Procedure ComClickRadioButton Integer llId
  7596        Handle hDispatchDriver
  7597        Get phDispatchDriver to hDispatchDriver
  7598        Send PrepareParams to hDispatchDriver 1
  7599        Send DefineParam to hDispatchDriver OLE_VT_I4 llId
  7600        Send InvokeComMethod to hDispatchDriver 40 OLE_VT_VOID
  7601    End_Procedure
  7602
  7603    Procedure ComSetProgressBarRange Integer llMin Integer llMax
  7604        Handle hDispatchDriver
  7605        Get phDispatchDriver to hDispatchDriver
  7606        Send PrepareParams to hDispatchDriver 2
  7607        Send DefineParam to hDispatchDriver OLE_VT_I4 llMin
  7608        Send DefineParam to hDispatchDriver OLE_VT_I4 llMax
  7609        Send InvokeComMethod to hDispatchDriver 41 OLE_VT_VOID
  7610    End_Procedure
  7611
  7612    Procedure ComStartProgressBarMarquee Boolean llStartMarquee Integer llMilliSeconds
  7613        Handle hDispatchDriver
  7614        Get phDispatchDriver to hDispatchDriver
  7615        Send PrepareParams to hDispatchDriver 2
  7616        Send DefineParam to hDispatchDriver OLE_VT_BOOL llStartMarquee
  7617        Send DefineParam to hDispatchDriver OLE_VT_I4 llMilliSeconds
  7618        Send InvokeComMethod to hDispatchDriver 42 OLE_VT_VOID
  7619    End_Procedure
  7620
  7621    Procedure ComAddInputBox
  7622        Handle hDispatchDriver
  7623        Get phDispatchDriver to hDispatchDriver
  7624        Send InvokeComMethod to hDispatchDriver 43 OLE_VT_VOID
  7625    End_Procedure
  7626
  7627    Function ComCreateFromXML String llXMLString String llSection Variant llParameters Returns Boolean
  7628        Handle hDispatchDriver
  7629        Boolean retVal
  7630        Get phDispatchDriver to hDispatchDriver
  7631        Send PrepareParams to hDispatchDriver 3
  7632        Send DefineParam to hDispatchDriver OLE_VT_BSTR llXMLString
  7633        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  7634        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llParameters
  7635        Get InvokeComMethod of hDispatchDriver 49 OLE_VT_BOOL to retVal
  7636        Function_Return retVal
  7637    End_Function
  7638
  7639    Procedure ComAboutBox
  7640        Handle hDispatchDriver
  7641        Get phDispatchDriver to hDispatchDriver
  7642        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  7643    End_Procedure
  7644End_Class
  7645
  7646// Event interface for TaskDialog Control
  7647Class cSigCjCom_DTaskDialogEvents is a Mixin
  7648
  7649    { MethodType=Event }
  7650    Procedure OnComButtonClicked Integer llId Variant llCloseDialog
  7651    End_Procedure
  7652
  7653    { MethodType=Event }
  7654    Procedure OnComHyperlinkClicked String llURL
  7655    End_Procedure
  7656
  7657    { MethodType=Event }
  7658    Procedure OnComRadioButtonClicked Integer llId
  7659    End_Procedure
  7660
  7661    { MethodType=Event }
  7662    Procedure OnComVerificationClicked Boolean llChecked
  7663    End_Procedure
  7664
  7665    { MethodType=Event }
  7666    Procedure OnComExpandButtonClicked Boolean llExpanded
  7667    End_Procedure
  7668
  7669    { MethodType=Event }
  7670    Procedure OnComTimer Integer llMilliSeconds Variant llReset
  7671    End_Procedure
  7672
  7673    { MethodType=Event }
  7674    Procedure OnComConstructed
  7675    End_Procedure
  7676
  7677    { MethodType=Event }
  7678    Procedure OnComInputBoxChanged
  7679    End_Procedure
  7680
  7681    { Visibility=Private }
  7682    Procedure RegisterComEvents
  7683        Send RegisterComEvent 1 msg_OnComButtonClicked
  7684        Send RegisterComEvent 2 msg_OnComHyperlinkClicked
  7685        Send RegisterComEvent 3 msg_OnComRadioButtonClicked
  7686        Send RegisterComEvent 4 msg_OnComVerificationClicked
  7687        Send RegisterComEvent 5 msg_OnComExpandButtonClicked
  7688        Send RegisterComEvent 6 msg_OnComTimer
  7689        Send RegisterComEvent 7 msg_OnComConstructed
  7690        Send RegisterComEvent 8 msg_OnComInputBoxChanged
  7691    End_Procedure
  7692End_Class
  7693
  7694// CoClass
  7695// TaskDialog Control
  7696{ CLSID=L_cSigCjComTaskDialog }
  7697Class cSigCjComTaskDialog is a cComActiveXControl
  7698    Import_Class_Protocol cSigCjCom_DTaskDialog
  7699    Import_Class_Protocol cSigCjCom_DTaskDialogEvents
  7700
  7701    Procedure Construct_Object
  7702        Forward Send Construct_Object
  7703        Set psProgID to L_cSigCjComTaskDialog
  7704        Set psEventId to "{B92C5C2D-A70B-4266-91CE-4475E8A455B9}"
  7705        Set psLicenseKey to L_cSigCjKeyControls
  7706        Set peAutoCreate to acAutoCreate
  7707    End_Procedure
  7708End_Class
  7709
  7710// Dispatch interface for CommonDialog Control
  7711Class cSigCjCom_DCommonDialog is a Mixin
  7712
  7713    { MethodType=Property DesignTime=False }
  7714    Function ComColor Returns OLE_COLOR
  7715        OLE_COLOR retVal
  7716        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  7717        Function_Return retVal
  7718    End_Function
  7719
  7720    { MethodType=Property DesignTime=False }
  7721    Procedure Set ComColor OLE_COLOR value
  7722        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  7723    End_Procedure
  7724
  7725    { MethodType=Property DesignTime=False }
  7726    Function ComFlags Returns Integer
  7727        Integer retVal
  7728        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  7729        Function_Return retVal
  7730    End_Function
  7731
  7732    { MethodType=Property DesignTime=False }
  7733    Procedure Set ComFlags Integer value
  7734        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  7735    End_Procedure
  7736
  7737    { MethodType=Property DesignTime=False }
  7738    Function ComCancelError Returns Boolean
  7739        Boolean retVal
  7740        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  7741        Function_Return retVal
  7742    End_Function
  7743
  7744    { MethodType=Property DesignTime=False }
  7745    Procedure Set ComCancelError Boolean value
  7746        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  7747    End_Procedure
  7748
  7749    { MethodType=Property DesignTime=False }
  7750    Function ComFileName Returns String
  7751        String retVal
  7752        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BSTR to retVal
  7753        Function_Return retVal
  7754    End_Function
  7755
  7756    { MethodType=Property DesignTime=False }
  7757    Procedure Set ComFileName String value
  7758        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BSTR to value
  7759    End_Procedure
  7760
  7761    { MethodType=Property DesignTime=False }
  7762    Function ComFilter Returns String
  7763        String retVal
  7764        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BSTR to retVal
  7765        Function_Return retVal
  7766    End_Function
  7767
  7768    { MethodType=Property DesignTime=False }
  7769    Procedure Set ComFilter String value
  7770        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BSTR to value
  7771    End_Procedure
  7772
  7773    { MethodType=Property DesignTime=False }
  7774    Function ComDefaultExt Returns String
  7775        String retVal
  7776        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to retVal
  7777        Function_Return retVal
  7778    End_Function
  7779
  7780    { MethodType=Property DesignTime=False }
  7781    Procedure Set ComDefaultExt String value
  7782        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to value
  7783    End_Procedure
  7784
  7785    { MethodType=Property DesignTime=False }
  7786    Function ComDialogTitle Returns String
  7787        String retVal
  7788        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to retVal
  7789        Function_Return retVal
  7790    End_Function
  7791
  7792    { MethodType=Property DesignTime=False }
  7793    Procedure Set ComDialogTitle String value
  7794        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to value
  7795    End_Procedure
  7796
  7797    { MethodType=Property DesignTime=False }
  7798    Function ComInitDir Returns String
  7799        String retVal
  7800        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BSTR to retVal
  7801        Function_Return retVal
  7802    End_Function
  7803
  7804    { MethodType=Property DesignTime=False }
  7805    Procedure Set ComInitDir String value
  7806        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BSTR to value
  7807    End_Procedure
  7808
  7809    { MethodType=Property DesignTime=False }
  7810    Function ComDialogStyle Returns Integer
  7811        Integer retVal
  7812        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  7813        Function_Return retVal
  7814    End_Function
  7815
  7816    { MethodType=Property DesignTime=False }
  7817    Procedure Set ComDialogStyle Integer value
  7818        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  7819    End_Procedure
  7820
  7821    { MethodType=Property DesignTime=False }
  7822    Function ComFilterIndex Returns Integer
  7823        Integer retVal
  7824        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  7825        Function_Return retVal
  7826    End_Function
  7827
  7828    { MethodType=Property DesignTime=False }
  7829    Procedure Set ComFilterIndex Integer value
  7830        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  7831    End_Procedure
  7832
  7833    { MethodType=Property DesignTime=False }
  7834    Function ComMaxFileSize Returns Integer
  7835        Integer retVal
  7836        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  7837        Function_Return retVal
  7838    End_Function
  7839
  7840    { MethodType=Property DesignTime=False }
  7841    Procedure Set ComMaxFileSize Integer value
  7842        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  7843    End_Procedure
  7844
  7845    { MethodType=Property DesignTime=False }
  7846    Function ComFont Returns Variant
  7847        Variant retVal
  7848        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  7849        Function_Return retVal
  7850    End_Function
  7851
  7852    { MethodType=Property DesignTime=False }
  7853    Procedure Set ComFont Variant value
  7854        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  7855    End_Procedure
  7856
  7857    { MethodType=Property DesignTime=False }
  7858    Function ComHelpFile Returns String
  7859        String retVal
  7860        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BSTR to retVal
  7861        Function_Return retVal
  7862    End_Function
  7863
  7864    { MethodType=Property DesignTime=False }
  7865    Procedure Set ComHelpFile String value
  7866        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_BSTR to value
  7867    End_Procedure
  7868
  7869    { MethodType=Property DesignTime=False }
  7870    Function ComHelpCommand Returns Integer
  7871        Integer retVal
  7872        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
  7873        Function_Return retVal
  7874    End_Function
  7875
  7876    { MethodType=Property DesignTime=False }
  7877    Procedure Set ComHelpCommand Integer value
  7878        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
  7879    End_Procedure
  7880
  7881    { MethodType=Property DesignTime=False }
  7882    Function ComHelpContext Returns Integer
  7883        Integer retVal
  7884        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
  7885        Function_Return retVal
  7886    End_Function
  7887
  7888    { MethodType=Property DesignTime=False }
  7889    Procedure Set ComHelpContext Integer value
  7890        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
  7891    End_Procedure
  7892
  7893    { MethodType=Property DesignTime=False }
  7894    Function ComHelpKey Returns String
  7895        String retVal
  7896        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BSTR to retVal
  7897        Function_Return retVal
  7898    End_Function
  7899
  7900    { MethodType=Property DesignTime=False }
  7901    Procedure Set ComHelpKey String value
  7902        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_BSTR to value
  7903    End_Procedure
  7904
  7905    { MethodType=Property DesignTime=False }
  7906    Function ComRegistryKey Returns String
  7907        String retVal
  7908        Get ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_BSTR to retVal
  7909        Function_Return retVal
  7910    End_Function
  7911
  7912    { MethodType=Property DesignTime=False }
  7913    Procedure Set ComRegistryKey String value
  7914        Set ComProperty of (phDispatchDriver(Self)) 16 OLE_VT_BSTR to value
  7915    End_Procedure
  7916
  7917    { MethodType=Property DesignTime=False }
  7918    Function ComProfileName Returns String
  7919        String retVal
  7920        Get ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BSTR to retVal
  7921        Function_Return retVal
  7922    End_Function
  7923
  7924    { MethodType=Property DesignTime=False }
  7925    Procedure Set ComProfileName String value
  7926        Set ComProperty of (phDispatchDriver(Self)) 17 OLE_VT_BSTR to value
  7927    End_Procedure
  7928
  7929    { MethodType=Property DesignTime=False }
  7930    Function ComParentHwnd Returns OLE_HANDLE
  7931        OLE_HANDLE retVal
  7932        Get ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to retVal
  7933        Function_Return retVal
  7934    End_Function
  7935
  7936    { MethodType=Property DesignTime=False }
  7937    Procedure Set ComParentHwnd OLE_HANDLE value
  7938        Set ComProperty of (phDispatchDriver(Self)) 24 OLE_VT_I4 to value
  7939    End_Procedure
  7940
  7941    { MethodType=Property DesignTime=False }
  7942    Function ComCopies Returns Integer
  7943        Integer retVal
  7944        Get ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to retVal
  7945        Function_Return retVal
  7946    End_Function
  7947
  7948    { MethodType=Property DesignTime=False }
  7949    Procedure Set ComCopies Integer value
  7950        Set ComProperty of (phDispatchDriver(Self)) 18 OLE_VT_I4 to value
  7951    End_Procedure
  7952
  7953    { MethodType=Property DesignTime=False }
  7954    Function ComFromPage Returns Integer
  7955        Integer retVal
  7956        Get ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to retVal
  7957        Function_Return retVal
  7958    End_Function
  7959
  7960    { MethodType=Property DesignTime=False }
  7961    Procedure Set ComFromPage Integer value
  7962        Set ComProperty of (phDispatchDriver(Self)) 19 OLE_VT_I4 to value
  7963    End_Procedure
  7964
  7965    { MethodType=Property DesignTime=False }
  7966    Function ComToPage Returns Integer
  7967        Integer retVal
  7968        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to retVal
  7969        Function_Return retVal
  7970    End_Function
  7971
  7972    { MethodType=Property DesignTime=False }
  7973    Procedure Set ComToPage Integer value
  7974        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_I4 to value
  7975    End_Procedure
  7976
  7977    { MethodType=Property DesignTime=False }
  7978    Function ComHDC Returns Integer
  7979        Integer retVal
  7980        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to retVal
  7981        Function_Return retVal
  7982    End_Function
  7983
  7984    { MethodType=Property DesignTime=False }
  7985    Procedure Set ComHDC Integer value
  7986        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_I4 to value
  7987    End_Procedure
  7988
  7989    { MethodType=Property DesignTime=False }
  7990    Function ComMin Returns Integer
  7991        Integer retVal
  7992        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
  7993        Function_Return retVal
  7994    End_Function
  7995
  7996    { MethodType=Property DesignTime=False }
  7997    Procedure Set ComMin Integer value
  7998        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
  7999    End_Procedure
  8000
  8001    { MethodType=Property DesignTime=False }
  8002    Function ComMax Returns Integer
  8003        Integer retVal
  8004        Get ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to retVal
  8005        Function_Return retVal
  8006    End_Function
  8007
  8008    { MethodType=Property DesignTime=False }
  8009    Procedure Set ComMax Integer value
  8010        Set ComProperty of (phDispatchDriver(Self)) 23 OLE_VT_I4 to value
  8011    End_Procedure
  8012
  8013    Function ComShowColor Returns Integer
  8014        Handle hDispatchDriver
  8015        Integer retVal
  8016        Get phDispatchDriver to hDispatchDriver
  8017        Get InvokeComMethod of hDispatchDriver 25 OLE_VT_I4 to retVal
  8018        Function_Return retVal
  8019    End_Function
  8020
  8021    Function ComShowOpen Returns Integer
  8022        Handle hDispatchDriver
  8023        Integer retVal
  8024        Get phDispatchDriver to hDispatchDriver
  8025        Get InvokeComMethod of hDispatchDriver 26 OLE_VT_I4 to retVal
  8026        Function_Return retVal
  8027    End_Function
  8028
  8029    { MethodType=Property DesignTime=False }
  8030    Function ComFileTitle Returns String
  8031        Handle hDispatchDriver
  8032        String retVal
  8033        Get phDispatchDriver to hDispatchDriver
  8034        Get InvokeComMethod of hDispatchDriver 27 OLE_VT_BSTR to retVal
  8035        Function_Return retVal
  8036    End_Function
  8037
  8038    Function ComShowSave Returns Integer
  8039        Handle hDispatchDriver
  8040        Integer retVal
  8041        Get phDispatchDriver to hDispatchDriver
  8042        Get InvokeComMethod of hDispatchDriver 28 OLE_VT_I4 to retVal
  8043        Function_Return retVal
  8044    End_Function
  8045
  8046    Function ComShowBrowseFolder Returns Integer
  8047        Handle hDispatchDriver
  8048        Integer retVal
  8049        Get phDispatchDriver to hDispatchDriver
  8050        Get InvokeComMethod of hDispatchDriver 29 OLE_VT_I4 to retVal
  8051        Function_Return retVal
  8052    End_Function
  8053
  8054    Function ComShowFont Returns Integer
  8055        Handle hDispatchDriver
  8056        Integer retVal
  8057        Get phDispatchDriver to hDispatchDriver
  8058        Get InvokeComMethod of hDispatchDriver 30 OLE_VT_I4 to retVal
  8059        Function_Return retVal
  8060    End_Function
  8061
  8062    Function ComShowHelp Returns Integer
  8063        Handle hDispatchDriver
  8064        Integer retVal
  8065        Get phDispatchDriver to hDispatchDriver
  8066        Get InvokeComMethod of hDispatchDriver 31 OLE_VT_I4 to retVal
  8067        Function_Return retVal
  8068    End_Function
  8069
  8070    Function ComShowTipOfTheDay Boolean llStartup Returns Integer
  8071        Handle hDispatchDriver
  8072        Integer retVal
  8073        Get phDispatchDriver to hDispatchDriver
  8074        Send PrepareParams to hDispatchDriver 1
  8075        Send DefineParam to hDispatchDriver OLE_VT_BOOL llStartup
  8076        Get InvokeComMethod of hDispatchDriver 32 OLE_VT_I4 to retVal
  8077        Function_Return retVal
  8078    End_Function
  8079
  8080    Function ComShowWindowList OLE_HANDLE llhWndMDIClient Returns Integer
  8081        Handle hDispatchDriver
  8082        Integer retVal
  8083        Get phDispatchDriver to hDispatchDriver
  8084        Send PrepareParams to hDispatchDriver 1
  8085        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWndMDIClient
  8086        Get InvokeComMethod of hDispatchDriver 33 OLE_VT_I4 to retVal
  8087        Function_Return retVal
  8088    End_Function
  8089
  8090    Function ComGetNextFileName Returns String
  8091        Handle hDispatchDriver
  8092        String retVal
  8093        Get phDispatchDriver to hDispatchDriver
  8094        Get InvokeComMethod of hDispatchDriver 34 OLE_VT_BSTR to retVal
  8095        Function_Return retVal
  8096    End_Function
  8097
  8098    Function ComShowPrinter Returns Integer
  8099        Handle hDispatchDriver
  8100        Integer retVal
  8101        Get phDispatchDriver to hDispatchDriver
  8102        Get InvokeComMethod of hDispatchDriver 35 OLE_VT_I4 to retVal
  8103        Function_Return retVal
  8104    End_Function
  8105
  8106    Procedure ComAboutBox
  8107        Handle hDispatchDriver
  8108        Get phDispatchDriver to hDispatchDriver
  8109        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  8110    End_Procedure
  8111End_Class
  8112
  8113// Event interface for CommonDialog Control
  8114Class cSigCjCom_DCommonDialogEvents is a Mixin
  8115
  8116    { Visibility=Private }
  8117    Procedure RegisterComEvents
  8118    End_Procedure
  8119End_Class
  8120
  8121// CoClass
  8122// CommonDialog Control
  8123{ CLSID=L_cSigCjComCommonDialog }
  8124Class cSigCjComCommonDialog is a cComActiveXControl
  8125    Import_Class_Protocol cSigCjCom_DCommonDialog
  8126    Import_Class_Protocol cSigCjCom_DCommonDialogEvents
  8127
  8128    Procedure Construct_Object
  8129        Forward Send Construct_Object
  8130        Set psProgID to L_cSigCjComCommonDialog
  8131        Set psEventId to "{985878EB-DF8B-492C-8223-1516F05931A2}"
  8132        Set psLicenseKey to L_cSigCjKeyControls
  8133        Set peAutoCreate to acAutoCreate
  8134    End_Procedure
  8135End_Class
  8136
  8137// Dispatch interface for DateTimePicker Control
  8138Class cSigCjCom_DDateTimePicker is a Mixin
  8139
  8140    { MethodType=Property DesignTime=False }
  8141    Function ComValue Returns Variant
  8142        Variant retVal
  8143        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_VARIANT to retVal
  8144        Function_Return retVal
  8145    End_Function
  8146
  8147    { MethodType=Property DesignTime=False }
  8148    Procedure Set ComValue Variant value
  8149        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_VARIANT to value
  8150    End_Procedure
  8151
  8152    { MethodType=Property DesignTime=False }
  8153    Function ComEnabled Returns Boolean
  8154        Boolean retVal
  8155        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  8156        Function_Return retVal
  8157    End_Function
  8158
  8159    { MethodType=Property DesignTime=False }
  8160    Procedure Set ComEnabled Boolean value
  8161        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  8162    End_Procedure
  8163
  8164    { MethodType=Property DesignTime=False }
  8165    Function ComHWnd Returns OLE_HANDLE
  8166        OLE_HANDLE retVal
  8167        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  8168        Function_Return retVal
  8169    End_Function
  8170
  8171    { MethodType=Property DesignTime=False }
  8172    Procedure Set ComHWnd OLE_HANDLE value
  8173        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  8174    End_Procedure
  8175
  8176    { MethodType=Property DesignTime=False }
  8177    Function ComFont Returns Variant
  8178        Variant retVal
  8179        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  8180        Function_Return retVal
  8181    End_Function
  8182
  8183    { MethodType=Property DesignTime=False }
  8184    Procedure Set ComFont Variant value
  8185        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  8186    End_Procedure
  8187
  8188    { MethodType=Property DesignTime=False }
  8189    Function ComCheckBox Returns Boolean
  8190        Boolean retVal
  8191        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  8192        Function_Return retVal
  8193    End_Function
  8194
  8195    { MethodType=Property DesignTime=False }
  8196    Procedure Set ComCheckBox Boolean value
  8197        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  8198    End_Procedure
  8199
  8200    { MethodType=Property DesignTime=False }
  8201    Function ComCustomFormat Returns String
  8202        String retVal
  8203        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
  8204        Function_Return retVal
  8205    End_Function
  8206
  8207    { MethodType=Property DesignTime=False }
  8208    Procedure Set ComCustomFormat String value
  8209        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
  8210    End_Procedure
  8211
  8212    { MethodType=Property DesignTime=False }
  8213    Function ComFormat Returns OLEDateTimeFormat
  8214        OLEDateTimeFormat retVal
  8215        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
  8216        Function_Return retVal
  8217    End_Function
  8218
  8219    { MethodType=Property DesignTime=False }
  8220    Procedure Set ComFormat OLEDateTimeFormat value
  8221        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
  8222    End_Procedure
  8223
  8224    { MethodType=Property DesignTime=False }
  8225    Function ComMaxDate Returns DateTime
  8226        DateTime retVal
  8227        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_DATE to retVal
  8228        Function_Return retVal
  8229    End_Function
  8230
  8231    { MethodType=Property DesignTime=False }
  8232    Procedure Set ComMaxDate DateTime value
  8233        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_DATE to value
  8234    End_Procedure
  8235
  8236    { MethodType=Property DesignTime=False }
  8237    Function ComMinDate Returns DateTime
  8238        DateTime retVal
  8239        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_DATE to retVal
  8240        Function_Return retVal
  8241    End_Function
  8242
  8243    { MethodType=Property DesignTime=False }
  8244    Procedure Set ComMinDate DateTime value
  8245        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_DATE to value
  8246    End_Procedure
  8247
  8248    { MethodType=Property DesignTime=False }
  8249    Function ComUpDown Returns Boolean
  8250        Boolean retVal
  8251        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  8252        Function_Return retVal
  8253    End_Function
  8254
  8255    { MethodType=Property DesignTime=False }
  8256    Procedure Set ComUpDown Boolean value
  8257        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  8258    End_Procedure
  8259
  8260    { MethodType=Property DesignTime=False }
  8261    Function ComYear Returns Integer
  8262        Integer retVal
  8263        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  8264        Function_Return retVal
  8265    End_Function
  8266
  8267    { MethodType=Property DesignTime=False }
  8268    Procedure Set ComYear Integer value
  8269        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  8270    End_Procedure
  8271
  8272    { MethodType=Property DesignTime=False }
  8273    Function ComMonth Returns Integer
  8274        Integer retVal
  8275        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  8276        Function_Return retVal
  8277    End_Function
  8278
  8279    { MethodType=Property DesignTime=False }
  8280    Procedure Set ComMonth Integer value
  8281        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  8282    End_Procedure
  8283
  8284    { MethodType=Property DesignTime=False }
  8285    Function ComDay Returns Integer
  8286        Integer retVal
  8287        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  8288        Function_Return retVal
  8289    End_Function
  8290
  8291    { MethodType=Property DesignTime=False }
  8292    Procedure Set ComDay Integer value
  8293        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  8294    End_Procedure
  8295
  8296    { MethodType=Property DesignTime=False }
  8297    Function ComHour Returns Integer
  8298        Integer retVal
  8299        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  8300        Function_Return retVal
  8301    End_Function
  8302
  8303    { MethodType=Property DesignTime=False }
  8304    Procedure Set ComHour Integer value
  8305        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  8306    End_Procedure
  8307
  8308    { MethodType=Property DesignTime=False }
  8309    Function ComMinute Returns Integer
  8310        Integer retVal
  8311        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to retVal
  8312        Function_Return retVal
  8313    End_Function
  8314
  8315    { MethodType=Property DesignTime=False }
  8316    Procedure Set ComMinute Integer value
  8317        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_I4 to value
  8318    End_Procedure
  8319
  8320    { MethodType=Property DesignTime=False }
  8321    Function ComSecond Returns Integer
  8322        Integer retVal
  8323        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
  8324        Function_Return retVal
  8325    End_Function
  8326
  8327    { MethodType=Property DesignTime=False }
  8328    Procedure Set ComSecond Integer value
  8329        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
  8330    End_Procedure
  8331
  8332    { MethodType=Property DesignTime=False }
  8333    Function ComControlToolTip Returns String
  8334        String retVal
  8335        Get ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to retVal
  8336        Function_Return retVal
  8337    End_Function
  8338
  8339    { MethodType=Property DesignTime=False }
  8340    Procedure Set ComControlToolTip String value
  8341        Set ComProperty of (phDispatchDriver(Self)) 70 OLE_VT_BSTR to value
  8342    End_Procedure
  8343
  8344    Procedure ComAboutBox
  8345        Handle hDispatchDriver
  8346        Get phDispatchDriver to hDispatchDriver
  8347        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  8348    End_Procedure
  8349
  8350    { MethodType=Property DesignTime=False }
  8351    Function ComToolTipContext Returns Variant
  8352        Handle hDispatchDriver
  8353        Variant retVal
  8354        Get phDispatchDriver to hDispatchDriver
  8355        Get InvokeComMethod of hDispatchDriver 71 OLE_VT_DISPATCH to retVal
  8356        Function_Return retVal
  8357    End_Function
  8358End_Class
  8359
  8360// Event interface for DateTimePicker Control
  8361Class cSigCjCom_DDateTimePickerEvents is a Mixin
  8362
  8363    { MethodType=Event }
  8364    Procedure OnComChange
  8365    End_Procedure
  8366
  8367    { MethodType=Event }
  8368    Procedure OnComDropDown
  8369    End_Procedure
  8370
  8371    { MethodType=Event }
  8372    Procedure OnComCloseUp
  8373    End_Procedure
  8374
  8375    { Visibility=Private }
  8376    Procedure RegisterComEvents
  8377        Send RegisterComEvent 1 msg_OnComChange
  8378        Send RegisterComEvent 2 msg_OnComDropDown
  8379        Send RegisterComEvent 3 msg_OnComCloseUp
  8380    End_Procedure
  8381End_Class
  8382
  8383// CoClass
  8384// DateTimePicker Control
  8385{ CLSID=L_cSigCjComDateTimePicker }
  8386Class cSigCjComDateTimePicker is a cComActiveXControl
  8387    Import_Class_Protocol cSigCjCom_DDateTimePicker
  8388    Import_Class_Protocol cSigCjCom_DDateTimePickerEvents
  8389
  8390    Procedure Construct_Object
  8391        Forward Send Construct_Object
  8392        Set psProgID to L_cSigCjComDateTimePicker
  8393        Set psEventId to "{CEB3E6DA-7A7E-43B6-8468-0B74ADBA1168}"
  8394        Set psLicenseKey to L_cSigCjKeyControls
  8395        Set peAutoCreate to acDeferredAutoCreate
  8396    End_Procedure
  8397End_Class
  8398
  8399// Dispatch interface for MonthCalendar Control
  8400Class cSigCjCom_DMonthCalendar is a Mixin
  8401
  8402    { MethodType=Property DesignTime=False }
  8403    Function ComValue Returns DateTime
  8404        DateTime retVal
  8405        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_DATE to retVal
  8406        Function_Return retVal
  8407    End_Function
  8408
  8409    { MethodType=Property DesignTime=False }
  8410    Procedure Set ComValue DateTime value
  8411        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_DATE to value
  8412    End_Procedure
  8413
  8414    { MethodType=Property DesignTime=False }
  8415    Function ComFont Returns Variant
  8416        Variant retVal
  8417        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  8418        Function_Return retVal
  8419    End_Function
  8420
  8421    { MethodType=Property DesignTime=False }
  8422    Procedure Set ComFont Variant value
  8423        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  8424    End_Procedure
  8425
  8426    { MethodType=Property DesignTime=False }
  8427    Function ComHWnd Returns OLE_HANDLE
  8428        OLE_HANDLE retVal
  8429        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  8430        Function_Return retVal
  8431    End_Function
  8432
  8433    { MethodType=Property DesignTime=False }
  8434    Procedure Set ComHWnd OLE_HANDLE value
  8435        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  8436    End_Procedure
  8437
  8438    { MethodType=Property DesignTime=False }
  8439    Function ComEnabled Returns Boolean
  8440        Boolean retVal
  8441        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  8442        Function_Return retVal
  8443    End_Function
  8444
  8445    { MethodType=Property DesignTime=False }
  8446    Procedure Set ComEnabled Boolean value
  8447        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  8448    End_Procedure
  8449
  8450    { MethodType=Property DesignTime=False }
  8451    Function ComAutoSize Returns Boolean
  8452        Boolean retVal
  8453        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  8454        Function_Return retVal
  8455    End_Function
  8456
  8457    { MethodType=Property DesignTime=False }
  8458    Procedure Set ComAutoSize Boolean value
  8459        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  8460    End_Procedure
  8461
  8462    { MethodType=Property DesignTime=False }
  8463    Function ComMinDate Returns DateTime
  8464        DateTime retVal
  8465        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_DATE to retVal
  8466        Function_Return retVal
  8467    End_Function
  8468
  8469    { MethodType=Property DesignTime=False }
  8470    Procedure Set ComMinDate DateTime value
  8471        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_DATE to value
  8472    End_Procedure
  8473
  8474    { MethodType=Property DesignTime=False }
  8475    Function ComMaxDate Returns DateTime
  8476        DateTime retVal
  8477        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_DATE to retVal
  8478        Function_Return retVal
  8479    End_Function
  8480
  8481    { MethodType=Property DesignTime=False }
  8482    Procedure Set ComMaxDate DateTime value
  8483        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_DATE to value
  8484    End_Procedure
  8485
  8486    { MethodType=Property DesignTime=False }
  8487    Function ComMaxSelCount Returns Integer
  8488        Integer retVal
  8489        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
  8490        Function_Return retVal
  8491    End_Function
  8492
  8493    { MethodType=Property DesignTime=False }
  8494    Procedure Set ComMaxSelCount Integer value
  8495        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
  8496    End_Procedure
  8497
  8498    { MethodType=Property DesignTime=False }
  8499    Function ComMonthColumns Returns Integer
  8500        Integer retVal
  8501        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
  8502        Function_Return retVal
  8503    End_Function
  8504
  8505    { MethodType=Property DesignTime=False }
  8506    Procedure Set ComMonthColumns Integer value
  8507        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
  8508    End_Procedure
  8509
  8510    { MethodType=Property DesignTime=False }
  8511    Function ComMonthRows Returns Integer
  8512        Integer retVal
  8513        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  8514        Function_Return retVal
  8515    End_Function
  8516
  8517    { MethodType=Property DesignTime=False }
  8518    Procedure Set ComMonthRows Integer value
  8519        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  8520    End_Procedure
  8521
  8522    { MethodType=Property DesignTime=False }
  8523    Function ComMultiSelect Returns Boolean
  8524        Boolean retVal
  8525        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  8526        Function_Return retVal
  8527    End_Function
  8528
  8529    { MethodType=Property DesignTime=False }
  8530    Procedure Set ComMultiSelect Boolean value
  8531        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  8532    End_Procedure
  8533
  8534    { MethodType=Property DesignTime=False }
  8535    Function ComShowToday Returns Boolean
  8536        Boolean retVal
  8537        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  8538        Function_Return retVal
  8539    End_Function
  8540
  8541    { MethodType=Property DesignTime=False }
  8542    Procedure Set ComShowToday Boolean value
  8543        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  8544    End_Procedure
  8545
  8546    { MethodType=Property DesignTime=False }
  8547    Function ComShowWeekNumbers Returns Boolean
  8548        Boolean retVal
  8549        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to retVal
  8550        Function_Return retVal
  8551    End_Function
  8552
  8553    { MethodType=Property DesignTime=False }
  8554    Procedure Set ComShowWeekNumbers Boolean value
  8555        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_BOOL to value
  8556    End_Procedure
  8557
  8558    { MethodType=Property DesignTime=False }
  8559    Function ComStartOfWeek Returns Integer
  8560        Integer retVal
  8561        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to retVal
  8562        Function_Return retVal
  8563    End_Function
  8564
  8565    { MethodType=Property DesignTime=False }
  8566    Procedure Set ComStartOfWeek Integer value
  8567        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_I4 to value
  8568    End_Procedure
  8569
  8570    { MethodType=Property DesignTime=False }
  8571    Function ComSelStart Returns DateTime
  8572        DateTime retVal
  8573        Get ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DATE to retVal
  8574        Function_Return retVal
  8575    End_Function
  8576
  8577    { MethodType=Property DesignTime=False }
  8578    Procedure Set ComSelStart DateTime value
  8579        Set ComProperty of (phDispatchDriver(Self)) 11 OLE_VT_DATE to value
  8580    End_Procedure
  8581
  8582    { MethodType=Property DesignTime=False }
  8583    Function ComSelEnd Returns DateTime
  8584        DateTime retVal
  8585        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_DATE to retVal
  8586        Function_Return retVal
  8587    End_Function
  8588
  8589    { MethodType=Property DesignTime=False }
  8590    Procedure Set ComSelEnd DateTime value
  8591        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_DATE to value
  8592    End_Procedure
  8593
  8594    { MethodType=Property DesignTime=False }
  8595    Function ComDay Returns Integer
  8596        Integer retVal
  8597        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
  8598        Function_Return retVal
  8599    End_Function
  8600
  8601    { MethodType=Property DesignTime=False }
  8602    Procedure Set ComDay Integer value
  8603        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
  8604    End_Procedure
  8605
  8606    { MethodType=Property DesignTime=False }
  8607    Function ComMonth Returns Integer
  8608        Integer retVal
  8609        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
  8610        Function_Return retVal
  8611    End_Function
  8612
  8613    { MethodType=Property DesignTime=False }
  8614    Procedure Set ComMonth Integer value
  8615        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
  8616    End_Procedure
  8617
  8618    { MethodType=Property DesignTime=False }
  8619    Function ComYear Returns Integer
  8620        Integer retVal
  8621        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  8622        Function_Return retVal
  8623    End_Function
  8624
  8625    { MethodType=Property DesignTime=False }
  8626    Procedure Set ComYear Integer value
  8627        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  8628    End_Procedure
  8629
  8630    Procedure ComAboutBox
  8631        Handle hDispatchDriver
  8632        Get phDispatchDriver to hDispatchDriver
  8633        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  8634    End_Procedure
  8635End_Class
  8636
  8637// Event interface for MonthCalendar Control
  8638Class cSigCjCom_DMonthCalendarEvents is a Mixin
  8639
  8640    { MethodType=Event }
  8641    Procedure OnComSelChange DateTime llStartDate DateTime llEndDate Boolean ByRef llCancel
  8642    End_Procedure
  8643
  8644    { MethodType=Event }
  8645    Procedure OnComDateClick DateTime llDateClicked
  8646    End_Procedure
  8647
  8648    { MethodType=Event }
  8649    Procedure OnComDblClick
  8650    End_Procedure
  8651
  8652    { MethodType=Event }
  8653    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  8654    End_Procedure
  8655
  8656    { MethodType=Event }
  8657    Procedure OnComMouseMove Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  8658    End_Procedure
  8659
  8660    { MethodType=Event }
  8661    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  8662    End_Procedure
  8663
  8664    { MethodType=Event }
  8665    Procedure OnComClick
  8666    End_Procedure
  8667
  8668    { Visibility=Private }
  8669    Procedure RegisterComEvents
  8670        Send RegisterComEvent 1 msg_OnComSelChange
  8671        Send RegisterComEvent 2 msg_OnComDateClick
  8672        Send RegisterComEvent -601 msg_OnComDblClick
  8673        Send RegisterComEvent -605 msg_OnComMouseDown
  8674        Send RegisterComEvent -606 msg_OnComMouseMove
  8675        Send RegisterComEvent -607 msg_OnComMouseUp
  8676        Send RegisterComEvent -600 msg_OnComClick
  8677    End_Procedure
  8678End_Class
  8679
  8680// CoClass
  8681// MonthCalendar Control
  8682{ CLSID=L_cSigCjComMonthCalendar }
  8683Class cSigCjComMonthCalendar is a cComActiveXControl
  8684    Import_Class_Protocol cSigCjCom_DMonthCalendar
  8685    Import_Class_Protocol cSigCjCom_DMonthCalendarEvents
  8686
  8687    Procedure Construct_Object
  8688        Forward Send Construct_Object
  8689        Set psProgID to L_cSigCjComMonthCalendar
  8690        Set psEventId to "{501C18D1-5C4B-40AD-916B-5F7D03A172FC}"
  8691        Set psLicenseKey to L_cSigCjKeyControls
  8692        Set peAutoCreate to acDeferredAutoCreate
  8693    End_Procedure
  8694End_Class
  8695
  8696// Dispatch interface for WebBrowser Control
  8697Class cSigCjCom_DWebBrowser is a Mixin
  8698
  8699    { MethodType=Property DesignTime=False }
  8700    Function ComBorderStyle Returns Short
  8701        Short retVal
  8702        Get ComProperty of (phDispatchDriver(Self)) -504 OLE_VT_I2 to retVal
  8703        Function_Return retVal
  8704    End_Function
  8705
  8706    { MethodType=Property DesignTime=False }
  8707    Procedure Set ComBorderStyle Short value
  8708        Set ComProperty of (phDispatchDriver(Self)) -504 OLE_VT_I2 to value
  8709    End_Procedure
  8710
  8711    { MethodType=Property DesignTime=False }
  8712    Function ComAppearance Returns Short
  8713        Short retVal
  8714        Get ComProperty of (phDispatchDriver(Self)) -520 OLE_VT_I2 to retVal
  8715        Function_Return retVal
  8716    End_Function
  8717
  8718    { MethodType=Property DesignTime=False }
  8719    Procedure Set ComAppearance Short value
  8720        Set ComProperty of (phDispatchDriver(Self)) -520 OLE_VT_I2 to value
  8721    End_Procedure
  8722
  8723    { MethodType=Property DesignTime=False }
  8724    Function ComWebBrowserContextMenu Returns Boolean
  8725        Boolean retVal
  8726        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  8727        Function_Return retVal
  8728    End_Function
  8729
  8730    { MethodType=Property DesignTime=False }
  8731    Procedure Set ComWebBrowserContextMenu Boolean value
  8732        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  8733    End_Procedure
  8734
  8735    { MethodType=Property DesignTime=False }
  8736    Function ComScrollBarStyle Returns OLEWebBrowserScrollBar
  8737        OLEWebBrowserScrollBar retVal
  8738        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
  8739        Function_Return retVal
  8740    End_Function
  8741
  8742    { MethodType=Property DesignTime=False }
  8743    Procedure Set ComScrollBarStyle OLEWebBrowserScrollBar value
  8744        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
  8745    End_Procedure
  8746
  8747    { MethodType=Property DesignTime=False }
  8748    Function ComScriptErrorsSuppressed Returns Boolean
  8749        Boolean retVal
  8750        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  8751        Function_Return retVal
  8752    End_Function
  8753
  8754    { MethodType=Property DesignTime=False }
  8755    Procedure Set ComScriptErrorsSuppressed Boolean value
  8756        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  8757    End_Procedure
  8758
  8759    { MethodType=Property DesignTime=False }
  8760    Function ComOffline Returns Boolean
  8761        Boolean retVal
  8762        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  8763        Function_Return retVal
  8764    End_Function
  8765
  8766    { MethodType=Property DesignTime=False }
  8767    Procedure Set ComOffline Boolean value
  8768        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  8769    End_Procedure
  8770
  8771    { MethodType=Property DesignTime=False }
  8772    Function ComSilent Returns Boolean
  8773        Boolean retVal
  8774        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  8775        Function_Return retVal
  8776    End_Function
  8777
  8778    { MethodType=Property DesignTime=False }
  8779    Procedure Set ComSilent Boolean value
  8780        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  8781    End_Procedure
  8782
  8783    { MethodType=Property DesignTime=False }
  8784    Function ComInnerHTML Returns String
  8785        String retVal
  8786        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to retVal
  8787        Function_Return retVal
  8788    End_Function
  8789
  8790    { MethodType=Property DesignTime=False }
  8791    Procedure Set ComInnerHTML String value
  8792        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BSTR to value
  8793    End_Procedure
  8794
  8795    { MethodType=Property DesignTime=False }
  8796    Function ComStaticText Returns Boolean
  8797        Boolean retVal
  8798        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  8799        Function_Return retVal
  8800    End_Function
  8801
  8802    { MethodType=Property DesignTime=False }
  8803    Procedure Set ComStaticText Boolean value
  8804        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  8805    End_Procedure
  8806
  8807    { MethodType=Property DesignTime=False }
  8808    Function ComBackColor Returns OLE_COLOR
  8809        OLE_COLOR retVal
  8810        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  8811        Function_Return retVal
  8812    End_Function
  8813
  8814    { MethodType=Property DesignTime=False }
  8815    Procedure Set ComBackColor OLE_COLOR value
  8816        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  8817    End_Procedure
  8818
  8819    { MethodType=Property DesignTime=False }
  8820    Function ComForeColor Returns OLE_COLOR
  8821        OLE_COLOR retVal
  8822        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  8823        Function_Return retVal
  8824    End_Function
  8825
  8826    { MethodType=Property DesignTime=False }
  8827    Procedure Set ComForeColor OLE_COLOR value
  8828        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  8829    End_Procedure
  8830
  8831    { MethodType=Property DesignTime=False }
  8832    Function ComFont Returns Variant
  8833        Variant retVal
  8834        Get ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to retVal
  8835        Function_Return retVal
  8836    End_Function
  8837
  8838    { MethodType=Property DesignTime=False }
  8839    Procedure Set ComFont Variant value
  8840        Set ComProperty of (phDispatchDriver(Self)) -512 OLE_VT_DISPATCH to value
  8841    End_Procedure
  8842
  8843    { MethodType=Property DesignTime=False }
  8844    Function ComRegisterAsDropTarget Returns Boolean
  8845        Boolean retVal
  8846        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to retVal
  8847        Function_Return retVal
  8848    End_Function
  8849
  8850    { MethodType=Property DesignTime=False }
  8851    Procedure Set ComRegisterAsDropTarget Boolean value
  8852        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_BOOL to value
  8853    End_Procedure
  8854
  8855    { MethodType=Property DesignTime=False }
  8856    Function ComLocationURL Returns String
  8857        Handle hDispatchDriver
  8858        String retVal
  8859        Get phDispatchDriver to hDispatchDriver
  8860        Get InvokeComMethod of hDispatchDriver 9 OLE_VT_BSTR to retVal
  8861        Function_Return retVal
  8862    End_Function
  8863
  8864    { MethodType=Property DesignTime=False }
  8865    Function ComLocationName Returns String
  8866        Handle hDispatchDriver
  8867        String retVal
  8868        Get phDispatchDriver to hDispatchDriver
  8869        Get InvokeComMethod of hDispatchDriver 10 OLE_VT_BSTR to retVal
  8870        Function_Return retVal
  8871    End_Function
  8872
  8873    { MethodType=Property DesignTime=False }
  8874    Function ComDocument Returns Variant
  8875        Handle hDispatchDriver
  8876        Variant retVal
  8877        Get phDispatchDriver to hDispatchDriver
  8878        Get InvokeComMethod of hDispatchDriver 11 OLE_VT_DISPATCH to retVal
  8879        Function_Return retVal
  8880    End_Function
  8881
  8882    { MethodType=Property DesignTime=False }
  8883    Function ComApplication Returns Variant
  8884        Handle hDispatchDriver
  8885        Variant retVal
  8886        Get phDispatchDriver to hDispatchDriver
  8887        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_DISPATCH to retVal
  8888        Function_Return retVal
  8889    End_Function
  8890
  8891    { MethodType=Property DesignTime=False }
  8892    Function ComBusy Returns Boolean
  8893        Handle hDispatchDriver
  8894        Boolean retVal
  8895        Get phDispatchDriver to hDispatchDriver
  8896        Get InvokeComMethod of hDispatchDriver 13 OLE_VT_BOOL to retVal
  8897        Function_Return retVal
  8898    End_Function
  8899
  8900    { MethodType=Property DesignTime=False }
  8901    Function ComReadyState Returns Integer
  8902        Handle hDispatchDriver
  8903        Integer retVal
  8904        Get phDispatchDriver to hDispatchDriver
  8905        Get InvokeComMethod of hDispatchDriver 14 OLE_VT_I4 to retVal
  8906        Function_Return retVal
  8907    End_Function
  8908
  8909    Procedure ComNavigate String llURL Variant llFlags Variant llTargetFrameName Variant llPostData Variant llHeaders
  8910        Handle hDispatchDriver
  8911        Get phDispatchDriver to hDispatchDriver
  8912        Send PrepareParams to hDispatchDriver 5
  8913        Send DefineParam to hDispatchDriver OLE_VT_BSTR llURL
  8914        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llFlags
  8915        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llTargetFrameName
  8916        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llPostData
  8917        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llHeaders
  8918        Send InvokeComMethod to hDispatchDriver 15 OLE_VT_VOID
  8919    End_Procedure
  8920
  8921    Procedure ComExecWB Integer llCmdID Integer llCmdExecOpt Variant llpvaIn Variant llpvaOut
  8922        Handle hDispatchDriver
  8923        Get phDispatchDriver to hDispatchDriver
  8924        Send PrepareParams to hDispatchDriver 4
  8925        Send DefineParam to hDispatchDriver OLE_VT_I4 llCmdID
  8926        Send DefineParam to hDispatchDriver OLE_VT_I4 llCmdExecOpt
  8927        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llpvaIn
  8928        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llpvaOut
  8929        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
  8930    End_Procedure
  8931
  8932    Procedure ComGoBack
  8933        Handle hDispatchDriver
  8934        Get phDispatchDriver to hDispatchDriver
  8935        Send InvokeComMethod to hDispatchDriver 17 OLE_VT_VOID
  8936    End_Procedure
  8937
  8938    Procedure ComGoForward
  8939        Handle hDispatchDriver
  8940        Get phDispatchDriver to hDispatchDriver
  8941        Send InvokeComMethod to hDispatchDriver 18 OLE_VT_VOID
  8942    End_Procedure
  8943
  8944    Procedure ComGoHome
  8945        Handle hDispatchDriver
  8946        Get phDispatchDriver to hDispatchDriver
  8947        Send InvokeComMethod to hDispatchDriver 19 OLE_VT_VOID
  8948    End_Procedure
  8949
  8950    Procedure ComGoSearch
  8951        Handle hDispatchDriver
  8952        Get phDispatchDriver to hDispatchDriver
  8953        Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
  8954    End_Procedure
  8955
  8956    Procedure ComRefresh2 Variant llLevel
  8957        Handle hDispatchDriver
  8958        Get phDispatchDriver to hDispatchDriver
  8959        Send PrepareParams to hDispatchDriver 1
  8960        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llLevel
  8961        Send InvokeComMethod to hDispatchDriver 21 OLE_VT_VOID
  8962    End_Procedure
  8963
  8964    Procedure ComStop
  8965        Handle hDispatchDriver
  8966        Get phDispatchDriver to hDispatchDriver
  8967        Send InvokeComMethod to hDispatchDriver 22 OLE_VT_VOID
  8968    End_Procedure
  8969
  8970    Procedure ComRefresh
  8971        Handle hDispatchDriver
  8972        Get phDispatchDriver to hDispatchDriver
  8973        Send InvokeComMethod to hDispatchDriver 23 OLE_VT_VOID
  8974    End_Procedure
  8975
  8976    Procedure ComSetObjectForScripting Variant llExternal
  8977        Handle hDispatchDriver
  8978        Get phDispatchDriver to hDispatchDriver
  8979        Send PrepareParams to hDispatchDriver 1
  8980        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llExternal
  8981        Send InvokeComMethod to hDispatchDriver 24 OLE_VT_VOID
  8982    End_Procedure
  8983
  8984    Procedure ComAboutBox
  8985        Handle hDispatchDriver
  8986        Get phDispatchDriver to hDispatchDriver
  8987        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  8988    End_Procedure
  8989End_Class
  8990
  8991// Event interface for WebBrowser Control
  8992Class cSigCjCom_DWebBrowserEvents is a Mixin
  8993
  8994    // Download of page complete.
  8995    { MethodType=Event }
  8996    Procedure OnComDownloadComplete
  8997    End_Procedure
  8998
  8999    // Fired when the document being navigated to reaches ReadyState_Complete.
  9000    { MethodType=Event }
  9001    Procedure OnComDocumentComplete Variant llpDisp Variant llURL
  9002    End_Procedure
  9003
  9004    // Fired when the document being navigated to becomes visible and enters the navigation stack.
  9005    { MethodType=Event }
  9006    Procedure OnComNavigateComplete2 Variant llpDisp Variant llURL
  9007    End_Procedure
  9008
  9009    // Fired before navigate occurs in the given WebBrowser (window or frameset element). The processing of this navigation may be modified.
  9010    { MethodType=Event }
  9011    Procedure OnComBeforeNavigate2 Variant llpDisp Variant llURL Variant llFlags Variant llTargetFrameName Variant llPostData Variant llHeaders Boolean ByRef llCancel
  9012    End_Procedure
  9013
  9014    // Statusbar text changed.
  9015    { MethodType=Event }
  9016    Procedure OnComStatusTextChange String llText
  9017    End_Procedure
  9018
  9019    // Fired when download progress is updated.
  9020    { MethodType=Event }
  9021    Procedure OnComProgressChange Integer llProgress Integer llProgressMax
  9022    End_Procedure
  9023
  9024    // Document title changed.
  9025    { MethodType=Event }
  9026    Procedure OnComTitleChange String llTitle
  9027    End_Procedure
  9028
  9029    // Download of a page started.
  9030    { MethodType=Event }
  9031    Procedure OnComDownloadBegin
  9032    End_Procedure
  9033
  9034    // The enabled state of a command changed.
  9035    { MethodType=Event }
  9036    Procedure OnComCommandStateChange Integer llCommand Boolean llEnable
  9037    End_Procedure
  9038
  9039    // Fired when the PutProperty method has been called.
  9040    { MethodType=Event }
  9041    Procedure OnComPropertyChange String llProperty
  9042    End_Procedure
  9043
  9044    // A new, hidden, non-navigated WebBrowser window is needed.
  9045    { MethodType=Event }
  9046    Procedure OnComNewWindow2 Variant llppDisp Boolean ByRef llCancel
  9047    End_Procedure
  9048
  9049    // Fired when application is quiting
  9050    { MethodType=Event }
  9051    Procedure OnComQuit
  9052    End_Procedure
  9053
  9054    // Fired when a binding error occurs (window or frameset element)
  9055    { MethodType=Event }
  9056    Procedure OnComNavigateError Variant llpDisp Variant llURL Variant llTargetFrameName Variant llStatusCode Boolean ByRef llCancel
  9057    End_Procedure
  9058
  9059    // Fired when the host window should allow/disallow resizing
  9060    { MethodType=Event }
  9061    Procedure OnComWindowSetResizable Boolean llResizable
  9062    End_Procedure
  9063
  9064    // Fired when the host window should change its Left coordinate
  9065    { MethodType=Event }
  9066    Procedure OnComWindowSetLeft Integer llLeft
  9067    End_Procedure
  9068
  9069    // Fired when the host window should change its Top coordinate
  9070    { MethodType=Event }
  9071    Procedure OnComWindowSetTop Integer llTop
  9072    End_Procedure
  9073
  9074    // Fired when the host window should change its width
  9075    { MethodType=Event }
  9076    Procedure OnComWindowSetWidth Integer llWidth
  9077    End_Procedure
  9078
  9079    // Fired when the host window should change its height
  9080    { MethodType=Event }
  9081    Procedure OnComWindowSetHeight Integer llHeight
  9082    End_Procedure
  9083
  9084    // Fired when the WebBrowser is about to be closed by script
  9085    { MethodType=Event }
  9086    Procedure OnComWindowClosing Boolean llIsChildWindow Boolean ByRef llCancel
  9087    End_Procedure
  9088
  9089    // Fired to indicate the security level of the current web page contents
  9090    { MethodType=Event }
  9091    Procedure OnComSetSecureLockIcon Integer llSecureLockIcon
  9092    End_Procedure
  9093
  9094    { Visibility=Private }
  9095    Procedure RegisterComEvents
  9096        Send RegisterComEvent 1 msg_OnComDownloadComplete
  9097        Send RegisterComEvent 2 msg_OnComDocumentComplete
  9098        Send RegisterComEvent 3 msg_OnComNavigateComplete2
  9099        Send RegisterComEvent 4 msg_OnComBeforeNavigate2
  9100        Send RegisterComEvent 5 msg_OnComStatusTextChange
  9101        Send RegisterComEvent 6 msg_OnComProgressChange
  9102        Send RegisterComEvent 7 msg_OnComTitleChange
  9103        Send RegisterComEvent 8 msg_OnComDownloadBegin
  9104        Send RegisterComEvent 9 msg_OnComCommandStateChange
  9105        Send RegisterComEvent 10 msg_OnComPropertyChange
  9106        Send RegisterComEvent 11 msg_OnComNewWindow2
  9107        Send RegisterComEvent 12 msg_OnComQuit
  9108        Send RegisterComEvent 13 msg_OnComNavigateError
  9109        Send RegisterComEvent 14 msg_OnComWindowSetResizable
  9110        Send RegisterComEvent 15 msg_OnComWindowSetLeft
  9111        Send RegisterComEvent 16 msg_OnComWindowSetTop
  9112        Send RegisterComEvent 17 msg_OnComWindowSetWidth
  9113        Send RegisterComEvent 18 msg_OnComWindowSetHeight
  9114        Send RegisterComEvent 19 msg_OnComWindowClosing
  9115        Send RegisterComEvent 20 msg_OnComSetSecureLockIcon
  9116    End_Procedure
  9117End_Class
  9118
  9119// CoClass
  9120// WebBrowser Control
  9121{ CLSID=L_cSigCjComWebBrowser }
  9122Class cSigCjComWebBrowser is a cComActiveXControl
  9123    Import_Class_Protocol cSigCjCom_DWebBrowser
  9124    Import_Class_Protocol cSigCjCom_DWebBrowserEvents
  9125
  9126    Procedure Construct_Object
  9127        Forward Send Construct_Object
  9128        Set psProgID to L_cSigCjComWebBrowser
  9129        Set psEventId to "{37831927-D91C-4911-ADA7-3A1EB6EB003B}"
  9130        Set psLicenseKey to L_cSigCjKeyControls
  9131        Set peAutoCreate to acDeferredAutoCreate
  9132    End_Procedure
  9133End_Class
  9134
  9135// Dispatch interface for TrayIcon Control
  9136Class cSigCjCom_DTrayIcon is a Mixin
  9137
  9138    { MethodType=Property DesignTime=False }
  9139    Function ComText Returns String
  9140        String retVal
  9141        Get ComProperty of (phDispatchDriver(Self)) -517 OLE_VT_BSTR to retVal
  9142        Function_Return retVal
  9143    End_Function
  9144
  9145    { MethodType=Property DesignTime=False }
  9146    Procedure Set ComText String value
  9147        Set ComProperty of (phDispatchDriver(Self)) -517 OLE_VT_BSTR to value
  9148    End_Procedure
  9149
  9150    { MethodType=Property DesignTime=False }
  9151    Function ComIcon Returns Variant
  9152        Variant retVal
  9153        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_DISPATCH to retVal
  9154        Function_Return retVal
  9155    End_Function
  9156
  9157    { MethodType=Property DesignTime=False }
  9158    Procedure Set ComIcon Variant value
  9159        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_DISPATCH to value
  9160    End_Procedure
  9161
  9162    Procedure ComShowBalloonTip Integer llTimeout String llTipTitle String llTipText Integer llTipIcon
  9163        Handle hDispatchDriver
  9164        Get phDispatchDriver to hDispatchDriver
  9165        Send PrepareParams to hDispatchDriver 4
  9166        Send DefineParam to hDispatchDriver OLE_VT_I4 llTimeout
  9167        Send DefineParam to hDispatchDriver OLE_VT_BSTR llTipTitle
  9168        Send DefineParam to hDispatchDriver OLE_VT_BSTR llTipText
  9169        Send DefineParam to hDispatchDriver OLE_VT_I4 llTipIcon
  9170        Send InvokeComMethod to hDispatchDriver 2 OLE_VT_VOID
  9171    End_Procedure
  9172
  9173    Procedure ComMinimizeToTray OLE_HANDLE llhWnd
  9174        Handle hDispatchDriver
  9175        Get phDispatchDriver to hDispatchDriver
  9176        Send PrepareParams to hDispatchDriver 1
  9177        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
  9178        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
  9179    End_Procedure
  9180
  9181    Procedure ComMaximizeFromTray OLE_HANDLE llhWnd
  9182        Handle hDispatchDriver
  9183        Get phDispatchDriver to hDispatchDriver
  9184        Send PrepareParams to hDispatchDriver 1
  9185        Send DefineParam to hDispatchDriver OLE_VT_I4 llhWnd
  9186        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
  9187    End_Procedure
  9188
  9189    Procedure ComAboutBox
  9190        Handle hDispatchDriver
  9191        Get phDispatchDriver to hDispatchDriver
  9192        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  9193    End_Procedure
  9194End_Class
  9195
  9196// Event interface for TrayIcon Control
  9197Class cSigCjCom_DTrayIconEvents is a Mixin
  9198
  9199    { MethodType=Event }
  9200    Procedure OnComBalloonTipShown
  9201    End_Procedure
  9202
  9203    { MethodType=Event }
  9204    Procedure OnComBalloonTipClosed
  9205    End_Procedure
  9206
  9207    { MethodType=Event }
  9208    Procedure OnComBalloonTipClicked
  9209    End_Procedure
  9210
  9211    { MethodType=Event }
  9212    Procedure OnComDblClick
  9213    End_Procedure
  9214
  9215    { MethodType=Event }
  9216    Procedure OnComClick
  9217    End_Procedure
  9218
  9219    { MethodType=Event }
  9220    Procedure OnComMouseUp Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  9221    End_Procedure
  9222
  9223    { MethodType=Event }
  9224    Procedure OnComMouseDown Short llButton Short llShift OLE_XPOS_PIXELS llx OLE_YPOS_PIXELS lly
  9225    End_Procedure
  9226
  9227    { Visibility=Private }
  9228    Procedure RegisterComEvents
  9229        Send RegisterComEvent 1 msg_OnComBalloonTipShown
  9230        Send RegisterComEvent 2 msg_OnComBalloonTipClosed
  9231        Send RegisterComEvent 3 msg_OnComBalloonTipClicked
  9232        Send RegisterComEvent -601 msg_OnComDblClick
  9233        Send RegisterComEvent -600 msg_OnComClick
  9234        Send RegisterComEvent -607 msg_OnComMouseUp
  9235        Send RegisterComEvent -605 msg_OnComMouseDown
  9236    End_Procedure
  9237End_Class
  9238
  9239// CoClass
  9240// TrayIcon Control
  9241{ CLSID=L_cSigCjComTrayIcon }
  9242Class cSigCjComTrayIcon is a cComActiveXControl
  9243    Import_Class_Protocol cSigCjCom_DTrayIcon
  9244    Import_Class_Protocol cSigCjCom_DTrayIconEvents
  9245
  9246    Procedure Construct_Object
  9247        Forward Send Construct_Object
  9248        Set psProgID to L_cSigCjComTrayIcon
  9249        Set psEventId to "{27D0DF68-077E-414F-BDB7-C07CC582AAA4}"
  9250        Set psLicenseKey to L_cSigCjKeyControls
  9251        Set peAutoCreate to acAutoCreate
  9252    End_Procedure
  9253End_Class
  9254
  9255// Dispatch interface for HexEdit Control
  9256Class cSigCjCom_DHexEdit is a Mixin
  9257
  9258    { MethodType=Property DesignTime=False }
  9259    Function ComUseVisualStyle Returns Boolean
  9260        Boolean retVal
  9261        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to retVal
  9262        Function_Return retVal
  9263    End_Function
  9264
  9265    { MethodType=Property DesignTime=False }
  9266    Procedure Set ComUseVisualStyle Boolean value
  9267        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_BOOL to value
  9268    End_Procedure
  9269
  9270    { MethodType=Property DesignTime=False }
  9271    Function ComShowAddress Returns Boolean
  9272        Boolean retVal
  9273        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  9274        Function_Return retVal
  9275    End_Function
  9276
  9277    { MethodType=Property DesignTime=False }
  9278    Procedure Set ComShowAddress Boolean value
  9279        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  9280    End_Procedure
  9281
  9282    { MethodType=Property DesignTime=False }
  9283    Function ComShowHex Returns Boolean
  9284        Boolean retVal
  9285        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  9286        Function_Return retVal
  9287    End_Function
  9288
  9289    { MethodType=Property DesignTime=False }
  9290    Procedure Set ComShowHex Boolean value
  9291        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  9292    End_Procedure
  9293
  9294    { MethodType=Property DesignTime=False }
  9295    Function ComShowAscii Returns Boolean
  9296        Boolean retVal
  9297        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  9298        Function_Return retVal
  9299    End_Function
  9300
  9301    { MethodType=Property DesignTime=False }
  9302    Procedure Set ComShowAscii Boolean value
  9303        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  9304    End_Procedure
  9305
  9306    { MethodType=Property DesignTime=False }
  9307    Function ComWideAddress Returns Boolean
  9308        Boolean retVal
  9309        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  9310        Function_Return retVal
  9311    End_Function
  9312
  9313    { MethodType=Property DesignTime=False }
  9314    Procedure Set ComWideAddress Boolean value
  9315        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  9316    End_Procedure
  9317
  9318    { MethodType=Property DesignTime=False }
  9319    Function ComBytePerRow Returns Integer
  9320        Integer retVal
  9321        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
  9322        Function_Return retVal
  9323    End_Function
  9324
  9325    { MethodType=Property DesignTime=False }
  9326    Procedure Set ComBytePerRow Integer value
  9327        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
  9328    End_Procedure
  9329
  9330    { MethodType=Property DesignTime=False }
  9331    Function ComLocked Returns Boolean
  9332        Boolean retVal
  9333        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to retVal
  9334        Function_Return retVal
  9335    End_Function
  9336
  9337    { MethodType=Property DesignTime=False }
  9338    Procedure Set ComLocked Boolean value
  9339        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_BOOL to value
  9340    End_Procedure
  9341
  9342    { MethodType=Property DesignTime=False }
  9343    Function ComMaxLength Returns Integer
  9344        Integer retVal
  9345        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  9346        Function_Return retVal
  9347    End_Function
  9348
  9349    { MethodType=Property DesignTime=False }
  9350    Procedure Set ComMaxLength Integer value
  9351        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  9352    End_Procedure
  9353
  9354    { MethodType=Property DesignTime=False }
  9355    Function ComAppearance Returns OLEAppearanceStyle
  9356        OLEAppearanceStyle retVal
  9357        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  9358        Function_Return retVal
  9359    End_Function
  9360
  9361    { MethodType=Property DesignTime=False }
  9362    Procedure Set ComAppearance OLEAppearanceStyle value
  9363        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  9364    End_Procedure
  9365
  9366    { MethodType=Property DesignTime=False }
  9367    Function ComHWnd Returns OLE_HANDLE
  9368        OLE_HANDLE retVal
  9369        Get ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to retVal
  9370        Function_Return retVal
  9371    End_Function
  9372
  9373    { MethodType=Property DesignTime=False }
  9374    Procedure Set ComHWnd OLE_HANDLE value
  9375        Set ComProperty of (phDispatchDriver(Self)) -515 OLE_VT_I4 to value
  9376    End_Procedure
  9377
  9378    { MethodType=Property DesignTime=False }
  9379    Function ComEnabled Returns Boolean
  9380        Boolean retVal
  9381        Get ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to retVal
  9382        Function_Return retVal
  9383    End_Function
  9384
  9385    { MethodType=Property DesignTime=False }
  9386    Procedure Set ComEnabled Boolean value
  9387        Set ComProperty of (phDispatchDriver(Self)) -514 OLE_VT_BOOL to value
  9388    End_Procedure
  9389
  9390    { MethodType=Property DesignTime=False }
  9391    Function ComForeColor Returns OLE_COLOR
  9392        OLE_COLOR retVal
  9393        Get ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to retVal
  9394        Function_Return retVal
  9395    End_Function
  9396
  9397    { MethodType=Property DesignTime=False }
  9398    Procedure Set ComForeColor OLE_COLOR value
  9399        Set ComProperty of (phDispatchDriver(Self)) -513 OLE_VT_I4 to value
  9400    End_Procedure
  9401
  9402    { MethodType=Property DesignTime=False }
  9403    Function ComBackColor Returns OLE_COLOR
  9404        OLE_COLOR retVal
  9405        Get ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to retVal
  9406        Function_Return retVal
  9407    End_Function
  9408
  9409    { MethodType=Property DesignTime=False }
  9410    Procedure Set ComBackColor OLE_COLOR value
  9411        Set ComProperty of (phDispatchDriver(Self)) -501 OLE_VT_I4 to value
  9412    End_Procedure
  9413
  9414    { MethodType=Property DesignTime=False }
  9415    Function ComShowBorder Returns Boolean
  9416        Boolean retVal
  9417        Get ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to retVal
  9418        Function_Return retVal
  9419    End_Function
  9420
  9421    { MethodType=Property DesignTime=False }
  9422    Procedure Set ComShowBorder Boolean value
  9423        Set ComProperty of (phDispatchDriver(Self)) 40 OLE_VT_BOOL to value
  9424    End_Procedure
  9425
  9426    Procedure ComSetData Variant llData
  9427        Handle hDispatchDriver
  9428        Get phDispatchDriver to hDispatchDriver
  9429        Send PrepareParams to hDispatchDriver 1
  9430        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llData
  9431        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
  9432    End_Procedure
  9433
  9434    { MethodType=Property DesignTime=False }
  9435    Function ComLength Returns Integer
  9436        Handle hDispatchDriver
  9437        Integer retVal
  9438        Get phDispatchDriver to hDispatchDriver
  9439        Get InvokeComMethod of hDispatchDriver 11 OLE_VT_I4 to retVal
  9440        Function_Return retVal
  9441    End_Function
  9442
  9443    Function ComGetData Returns Variant
  9444        Handle hDispatchDriver
  9445        Variant retVal
  9446        Get phDispatchDriver to hDispatchDriver
  9447        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_VARIANT to retVal
  9448        Function_Return retVal
  9449    End_Function
  9450
  9451    Procedure ComAboutBox
  9452        Handle hDispatchDriver
  9453        Get phDispatchDriver to hDispatchDriver
  9454        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  9455    End_Procedure
  9456End_Class
  9457
  9458// Event interface for HexEdit Control
  9459Class cSigCjCom_DHexEditEvents is a Mixin
  9460
  9461    { Visibility=Private }
  9462    Procedure RegisterComEvents
  9463    End_Procedure
  9464End_Class
  9465
  9466// CoClass
  9467// HexEdit Control
  9468{ CLSID=L_cSigCjComHexEdit }
  9469Class cSigCjComHexEdit is a cComActiveXControl
  9470    Import_Class_Protocol cSigCjCom_DHexEdit
  9471    Import_Class_Protocol cSigCjCom_DHexEditEvents
  9472
  9473    Procedure Construct_Object
  9474        Forward Send Construct_Object
  9475        Set psProgID to L_cSigCjComHexEdit
  9476        Set psEventId to "{A7CC1CC3-EF36-4585-941C-9FCC90A153B1}"
  9477        Set psLicenseKey to L_cSigCjKeyControls
  9478        Set peAutoCreate to acDeferredAutoCreate
  9479    End_Procedure
  9480End_Class
  9481
  9482// Dispatch interface for FormExtender Control
  9483Class cSigCjCom_DFormExtender is a Mixin
  9484
  9485    { MethodType=Property DesignTime=False }
  9486    Function ComCaption Returns String
  9487        String retVal
  9488        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BSTR to retVal
  9489        Function_Return retVal
  9490    End_Function
  9491
  9492    { MethodType=Property DesignTime=False }
  9493    Procedure Set ComCaption String value
  9494        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BSTR to value
  9495    End_Procedure
  9496
  9497    { MethodType=Property DesignTime=False }
  9498    Function ComTransparency Returns Integer
  9499        Integer retVal
  9500        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to retVal
  9501        Function_Return retVal
  9502    End_Function
  9503
  9504    { MethodType=Property DesignTime=False }
  9505    Procedure Set ComTransparency Integer value
  9506        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_I4 to value
  9507    End_Procedure
  9508
  9509    { MethodType=Property DesignTime=False }
  9510    Function ComRegion Returns Variant
  9511        Variant retVal
  9512        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_DISPATCH to retVal
  9513        Function_Return retVal
  9514    End_Function
  9515
  9516    { MethodType=Property DesignTime=False }
  9517    Procedure Set ComRegion Variant value
  9518        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_DISPATCH to value
  9519    End_Procedure
  9520
  9521    { MethodType=Property DesignTime=False }
  9522    Function ComAllowDragClient Returns Boolean
  9523        Boolean retVal
  9524        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to retVal
  9525        Function_Return retVal
  9526    End_Function
  9527
  9528    { MethodType=Property DesignTime=False }
  9529    Procedure Set ComAllowDragClient Boolean value
  9530        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BOOL to value
  9531    End_Procedure
  9532
  9533    { MethodType=Property DesignTime=False }
  9534    Function ComClosable Returns Boolean
  9535        Boolean retVal
  9536        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  9537        Function_Return retVal
  9538    End_Function
  9539
  9540    { MethodType=Property DesignTime=False }
  9541    Procedure Set ComClosable Boolean value
  9542        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  9543    End_Procedure
  9544
  9545    { MethodType=Property DesignTime=False }
  9546    Function ComTopMost Returns Boolean
  9547        Boolean retVal
  9548        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  9549        Function_Return retVal
  9550    End_Function
  9551
  9552    { MethodType=Property DesignTime=False }
  9553    Procedure Set ComTopMost Boolean value
  9554        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  9555    End_Procedure
  9556
  9557    { MethodType=Property DesignTime=False }
  9558    Function ComClientMinWidth Returns Integer
  9559        Integer retVal
  9560        Get ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to retVal
  9561        Function_Return retVal
  9562    End_Function
  9563
  9564    { MethodType=Property DesignTime=False }
  9565    Procedure Set ComClientMinWidth Integer value
  9566        Set ComProperty of (phDispatchDriver(Self)) 12 OLE_VT_I4 to value
  9567    End_Procedure
  9568
  9569    { MethodType=Property DesignTime=False }
  9570    Function ComClientMinHeight Returns Integer
  9571        Integer retVal
  9572        Get ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to retVal
  9573        Function_Return retVal
  9574    End_Function
  9575
  9576    { MethodType=Property DesignTime=False }
  9577    Procedure Set ComClientMinHeight Integer value
  9578        Set ComProperty of (phDispatchDriver(Self)) 13 OLE_VT_I4 to value
  9579    End_Procedure
  9580
  9581    { MethodType=Property DesignTime=False }
  9582    Function ComClientMaxWidth Returns Integer
  9583        Integer retVal
  9584        Get ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to retVal
  9585        Function_Return retVal
  9586    End_Function
  9587
  9588    { MethodType=Property DesignTime=False }
  9589    Procedure Set ComClientMaxWidth Integer value
  9590        Set ComProperty of (phDispatchDriver(Self)) 14 OLE_VT_I4 to value
  9591    End_Procedure
  9592
  9593    { MethodType=Property DesignTime=False }
  9594    Function ComClientMaxHeight Returns Integer
  9595        Integer retVal
  9596        Get ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to retVal
  9597        Function_Return retVal
  9598    End_Function
  9599
  9600    { MethodType=Property DesignTime=False }
  9601    Procedure Set ComClientMaxHeight Integer value
  9602        Set ComProperty of (phDispatchDriver(Self)) 15 OLE_VT_I4 to value
  9603    End_Procedure
  9604
  9605    Procedure ComSavePlacement String llRegistryKey String llAppName String llSection
  9606        Handle hDispatchDriver
  9607        Get phDispatchDriver to hDispatchDriver
  9608        Send PrepareParams to hDispatchDriver 3
  9609        Send DefineParam to hDispatchDriver OLE_VT_BSTR llRegistryKey
  9610        Send DefineParam to hDispatchDriver OLE_VT_BSTR llAppName
  9611        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  9612        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
  9613    End_Procedure
  9614
  9615    Procedure ComRestorePlacement String llRegistryKey String llAppName String llSection
  9616        Handle hDispatchDriver
  9617        Get phDispatchDriver to hDispatchDriver
  9618        Send PrepareParams to hDispatchDriver 3
  9619        Send DefineParam to hDispatchDriver OLE_VT_BSTR llRegistryKey
  9620        Send DefineParam to hDispatchDriver OLE_VT_BSTR llAppName
  9621        Send DefineParam to hDispatchDriver OLE_VT_BSTR llSection
  9622        Send InvokeComMethod to hDispatchDriver 17 OLE_VT_VOID
  9623    End_Procedure
  9624
  9625    Procedure ComAboutBox
  9626        Handle hDispatchDriver
  9627        Get phDispatchDriver to hDispatchDriver
  9628        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
  9629    End_Procedure
  9630End_Class
  9631
  9632// Event interface for FormExtender Control
  9633Class cSigCjCom_DFormExtenderEvents is a Mixin
  9634
  9635    { Visibility=Private }
  9636    Procedure RegisterComEvents
  9637    End_Procedure
  9638End_Class
  9639
  9640// CoClass
  9641// FormExtender Control
  9642{ CLSID=L_cSigCjComFormExtender }
  9643Class cSigCjComFormExtender is a cComActiveXControl
  9644    Import_Class_Protocol cSigCjCom_DFormExtender
  9645    Import_Class_Protocol cSigCjCom_DFormExtenderEvents
  9646
  9647    Procedure Construct_Object
  9648        Forward Send Construct_Object
  9649        Set psProgID to L_cSigCjComFormExtender
  9650        Set psEventId to "{4E06DED7-B768-43F0-B9AF-C31CD2103724}"
  9651        Set peAutoCreate to acAutoCreate
  9652    End_Procedure
  9653End_Class
  9654
  9655// SuiteControls Global Settings
  9656Class cSigCjComISuiteControlsGlobalSettings is a Mixin
  9657
  9658    { MethodType=Property DesignTime=False }
  9659    Function ComResourceFile Returns String
  9660        String retVal
  9661        Get ComProperty of (phDispatchDriver(Self)) 100 OLE_VT_BSTR to retVal
  9662        Function_Return retVal
  9663    End_Function
  9664
  9665    { MethodType=Property DesignTime=False }
  9666    Procedure Set ComResourceFile String value
  9667        Set ComProperty of (phDispatchDriver(Self)) 100 OLE_VT_BSTR to value
  9668    End_Procedure
  9669
  9670    { MethodType=Property DesignTime=False }
  9671    Function ComLicense Returns String
  9672        String retVal
  9673        Get ComProperty of (phDispatchDriver(Self)) 101 OLE_VT_BSTR to retVal
  9674        Function_Return retVal
  9675    End_Function
  9676
  9677    { MethodType=Property DesignTime=False }
  9678    Procedure Set ComLicense String value
  9679        Set ComProperty of (phDispatchDriver(Self)) 101 OLE_VT_BSTR to value
  9680    End_Procedure
  9681
  9682    { MethodType=Property DesignTime=False }
  9683    Function ComTitle Returns String
  9684        String retVal
  9685        Get ComProperty of (phDispatchDriver(Self)) 102 OLE_VT_BSTR to retVal
  9686        Function_Return retVal
  9687    End_Function
  9688
  9689    { MethodType=Property DesignTime=False }
  9690    Procedure Set ComTitle String value
  9691        Set ComProperty of (phDispatchDriver(Self)) 102 OLE_VT_BSTR to value
  9692    End_Procedure
  9693
  9694    { MethodType=Property DesignTime=False }
  9695    Function ComOffice2007Images Returns String
  9696        String retVal
  9697        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to retVal
  9698        Function_Return retVal
  9699    End_Function
  9700
  9701    { MethodType=Property DesignTime=False }
  9702    Procedure Set ComOffice2007Images String value
  9703        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BSTR to value
  9704    End_Procedure
  9705
  9706    { MethodType=Property DesignTime=False }
  9707    Function ComColorManager Returns Variant
  9708        Handle hDispatchDriver
  9709        Variant retVal
  9710        Get phDispatchDriver to hDispatchDriver
  9711        Get InvokeComMethod of hDispatchDriver 103 OLE_VT_DISPATCH to retVal
  9712        Function_Return retVal
  9713    End_Function
  9714
  9715    { MethodType=Property DesignTime=False }
  9716    Function ComVersion Returns String
  9717        Handle hDispatchDriver
  9718        String retVal
  9719        Get phDispatchDriver to hDispatchDriver
  9720        Get InvokeComMethod of hDispatchDriver 104 OLE_VT_BSTR to retVal
  9721        Function_Return retVal
  9722    End_Function
  9723
  9724    { MethodType=Property DesignTime=False }
  9725    Function ComUnicode Returns Boolean
  9726        Handle hDispatchDriver
  9727        Boolean retVal
  9728        Get phDispatchDriver to hDispatchDriver
  9729        Get InvokeComMethod of hDispatchDriver 105 OLE_VT_BOOL to retVal
  9730        Function_Return retVal
  9731    End_Function
  9732
  9733    { MethodType=Property DesignTime=False }
  9734    Function ComOcxPath Returns String
  9735        Handle hDispatchDriver
  9736        String retVal
  9737        Get phDispatchDriver to hDispatchDriver
  9738        Get InvokeComMethod of hDispatchDriver 106 OLE_VT_BSTR to retVal
  9739        Function_Return retVal
  9740    End_Function
  9741
  9742    { MethodType=Property DesignTime=False }
  9743    Function ComIcons Returns Variant
  9744        Handle hDispatchDriver
  9745        Variant retVal
  9746        Get phDispatchDriver to hDispatchDriver
  9747        Get InvokeComMethod of hDispatchDriver 108 OLE_VT_DISPATCH to retVal
  9748        Function_Return retVal
  9749    End_Function
  9750
  9751    Function ComCreatePropExchange Returns Variant
  9752        Handle hDispatchDriver
  9753        Variant retVal
  9754        Get phDispatchDriver to hDispatchDriver
  9755        Get InvokeComMethod of hDispatchDriver 107 OLE_VT_DISPATCH to retVal
  9756        Function_Return retVal
  9757    End_Function
  9758End_Class
  9759
  9760// CoClass
  9761// SuiteControls Global Settings
  9762Class cSigCjComSuiteControlsGlobalSettings is a cComAutomationObject
  9763    Import_Class_Protocol cSigCjComISuiteControlsGlobalSettings
  9764
  9765    Procedure Construct_Object
  9766        Forward Send Construct_Object
  9767        Set psProgID to L_cSigCjComSuiteControlsGlobalSettings
  9768        Set peAutoCreate to acNoAutoCreate
  9769    End_Procedure
  9770End_Class
  9771
  9772Class cSigCjComTreeViewNode is a cComAutomationObject
  9773
  9774    { MethodType=Property DesignTime=False }
  9775    Function ComText Returns String
  9776        String retVal
  9777        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
  9778        Function_Return retVal
  9779    End_Function
  9780
  9781    { MethodType=Property DesignTime=False }
  9782    Procedure Set ComText String value
  9783        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
  9784    End_Procedure
  9785
  9786    { MethodType=Property DesignTime=False }
  9787    Function ComTag Returns Variant
  9788        Variant retVal
  9789        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to retVal
  9790        Function_Return retVal
  9791    End_Function
  9792
  9793    { MethodType=Property DesignTime=False }
  9794    Procedure Set ComTag Variant value
  9795        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to value
  9796    End_Procedure
  9797
  9798    { MethodType=Property DesignTime=False }
  9799    Function ComKey Returns String
  9800        String retVal
  9801        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
  9802        Function_Return retVal
  9803    End_Function
  9804
  9805    { MethodType=Property DesignTime=False }
  9806    Procedure Set ComKey String value
  9807        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
  9808    End_Procedure
  9809
  9810    { MethodType=Property DesignTime=False }
  9811    Function ComChecked Returns Boolean
  9812        Boolean retVal
  9813        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
  9814        Function_Return retVal
  9815    End_Function
  9816
  9817    { MethodType=Property DesignTime=False }
  9818    Procedure Set ComChecked Boolean value
  9819        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
  9820    End_Procedure
  9821
  9822    { MethodType=Property DesignTime=False }
  9823    Function ComExpanded Returns Boolean
  9824        Boolean retVal
  9825        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
  9826        Function_Return retVal
  9827    End_Function
  9828
  9829    { MethodType=Property DesignTime=False }
  9830    Procedure Set ComExpanded Boolean value
  9831        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
  9832    End_Procedure
  9833
  9834    { MethodType=Property DesignTime=False }
  9835    Function ComSelected Returns Boolean
  9836        Boolean retVal
  9837        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
  9838        Function_Return retVal
  9839    End_Function
  9840
  9841    { MethodType=Property DesignTime=False }
  9842    Procedure Set ComSelected Boolean value
  9843        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
  9844    End_Procedure
  9845
  9846    { MethodType=Property DesignTime=False }
  9847    Function ComBold Returns Boolean
  9848        Boolean retVal
  9849        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
  9850        Function_Return retVal
  9851    End_Function
  9852
  9853    { MethodType=Property DesignTime=False }
  9854    Procedure Set ComBold Boolean value
  9855        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
  9856    End_Procedure
  9857
  9858    { MethodType=Property DesignTime=False }
  9859    Function ComImage Returns Integer
  9860        Integer retVal
  9861        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
  9862        Function_Return retVal
  9863    End_Function
  9864
  9865    { MethodType=Property DesignTime=False }
  9866    Procedure Set ComImage Integer value
  9867        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
  9868    End_Procedure
  9869
  9870    { MethodType=Property DesignTime=False }
  9871    Function ComForeColor Returns OLE_COLOR
  9872        OLE_COLOR retVal
  9873        Get ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to retVal
  9874        Function_Return retVal
  9875    End_Function
  9876
  9877    { MethodType=Property DesignTime=False }
  9878    Procedure Set ComForeColor OLE_COLOR value
  9879        Set ComProperty of (phDispatchDriver(Self)) 8 OLE_VT_I4 to value
  9880    End_Procedure
  9881
  9882    { MethodType=Property DesignTime=False }
  9883    Function ComBackColor Returns OLE_COLOR
  9884        OLE_COLOR retVal
  9885        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
  9886        Function_Return retVal
  9887    End_Function
  9888
  9889    { MethodType=Property DesignTime=False }
  9890    Procedure Set ComBackColor OLE_COLOR value
  9891        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
  9892    End_Procedure
  9893
  9894    { MethodType=Property DesignTime=False }
  9895    Function ComSorted Returns Boolean
  9896        Boolean retVal
  9897        Get ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to retVal
  9898        Function_Return retVal
  9899    End_Function
  9900
  9901    { MethodType=Property DesignTime=False }
  9902    Procedure Set ComSorted Boolean value
  9903        Set ComProperty of (phDispatchDriver(Self)) 10 OLE_VT_BOOL to value
  9904    End_Procedure
  9905
  9906    { MethodType=Property DesignTime=False }
  9907    Function ComParent Returns Variant
  9908        Handle hDispatchDriver
  9909        Variant retVal
  9910        Get phDispatchDriver to hDispatchDriver
  9911        Get InvokeComMethod of hDispatchDriver 11 OLE_VT_DISPATCH to retVal
  9912        Function_Return retVal
  9913    End_Function
  9914
  9915    { MethodType=Property DesignTime=False }
  9916    Procedure Set ComParent Variant value
  9917        Handle hDispatchDriver
  9918        Get phDispatchDriver to hDispatchDriver
  9919        Send PrepareParams to hDispatchDriver 1
  9920        Set ComProperty of hDispatchDriver 11 OLE_VT_DISPATCH to value
  9921    End_Procedure
  9922
  9923    { MethodType=Property DesignTime=False }
  9924    Function ComIndex Returns Integer
  9925        Handle hDispatchDriver
  9926        Integer retVal
  9927        Get phDispatchDriver to hDispatchDriver
  9928        Get InvokeComMethod of hDispatchDriver 12 OLE_VT_I4 to retVal
  9929        Function_Return retVal
  9930    End_Function
  9931
  9932    { MethodType=Property DesignTime=False }
  9933    Function ComFirstSibling Returns Variant
  9934        Handle hDispatchDriver
  9935        Variant retVal
  9936        Get phDispatchDriver to hDispatchDriver
  9937        Get InvokeComMethod of hDispatchDriver 13 OLE_VT_DISPATCH to retVal
  9938        Function_Return retVal
  9939    End_Function
  9940
  9941    { MethodType=Property DesignTime=False }
  9942    Function ComLastSibling Returns Variant
  9943        Handle hDispatchDriver
  9944        Variant retVal
  9945        Get phDispatchDriver to hDispatchDriver
  9946        Get InvokeComMethod of hDispatchDriver 14 OLE_VT_DISPATCH to retVal
  9947        Function_Return retVal
  9948    End_Function
  9949
  9950    { MethodType=Property DesignTime=False }
  9951    Function ComChild Returns Variant
  9952        Handle hDispatchDriver
  9953        Variant retVal
  9954        Get phDispatchDriver to hDispatchDriver
  9955        Get InvokeComMethod of hDispatchDriver 15 OLE_VT_DISPATCH to retVal
  9956        Function_Return retVal
  9957    End_Function
  9958
  9959    { MethodType=Property DesignTime=False }
  9960    Function ComChildren Returns Integer
  9961        Handle hDispatchDriver
  9962        Integer retVal
  9963        Get phDispatchDriver to hDispatchDriver
  9964        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_I4 to retVal
  9965        Function_Return retVal
  9966    End_Function
  9967
  9968    { MethodType=Property DesignTime=False }
  9969    Function ComNext Returns Variant
  9970        Handle hDispatchDriver
  9971        Variant retVal
  9972        Get phDispatchDriver to hDispatchDriver
  9973        Get InvokeComMethod of hDispatchDriver 17 OLE_VT_DISPATCH to retVal
  9974        Function_Return retVal
  9975    End_Function
  9976
  9977    { MethodType=Property DesignTime=False }
  9978    Function ComPrevious Returns Variant
  9979        Handle hDispatchDriver
  9980        Variant retVal
  9981        Get phDispatchDriver to hDispatchDriver
  9982        Get InvokeComMethod of hDispatchDriver 18 OLE_VT_DISPATCH to retVal
  9983        Function_Return retVal
  9984    End_Function
  9985
  9986    { MethodType=Property DesignTime=False }
  9987    Function ComRoot Returns Variant
  9988        Handle hDispatchDriver
  9989        Variant retVal
  9990        Get phDispatchDriver to hDispatchDriver
  9991        Get InvokeComMethod of hDispatchDriver 19 OLE_VT_DISPATCH to retVal
  9992        Function_Return retVal
  9993    End_Function
  9994
  9995    Procedure ComEnsureVisible
  9996        Handle hDispatchDriver
  9997        Get phDispatchDriver to hDispatchDriver
  9998        Send InvokeComMethod to hDispatchDriver 20 OLE_VT_VOID
  9999    End_Procedure
 10000
 10001    { MethodType=Property DesignTime=False }
 10002    Function ComFullPath Returns String
 10003        Handle hDispatchDriver
 10004        String retVal
 10005        Get phDispatchDriver to hDispatchDriver
 10006        Get InvokeComMethod of hDispatchDriver 21 OLE_VT_BSTR to retVal
 10007        Function_Return retVal
 10008    End_Function
 10009End_Class
 10010
 10011Class cSigCjComTreeViewNodes is a cComAutomationObject
 10012
 10013    { MethodType=Property DesignTime=False }
 10014    Function ComItem Variant llIndex Returns Variant
 10015        Handle hDispatchDriver
 10016        Variant retVal
 10017        Get phDispatchDriver to hDispatchDriver
 10018        Send PrepareParams to hDispatchDriver 1
 10019        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10020        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
 10021        Function_Return retVal
 10022    End_Function
 10023
 10024    { MethodType=Property DesignTime=False }
 10025    Function ComCount Returns Integer
 10026        Handle hDispatchDriver
 10027        Integer retVal
 10028        Get phDispatchDriver to hDispatchDriver
 10029        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
 10030        Function_Return retVal
 10031    End_Function
 10032
 10033    Procedure ComClear
 10034        Handle hDispatchDriver
 10035        Get phDispatchDriver to hDispatchDriver
 10036        Send InvokeComMethod to hDispatchDriver 2 OLE_VT_VOID
 10037    End_Procedure
 10038
 10039    Function ComAdd Variant llRelative Variant llRelationship Variant llKey Variant llText Variant llImage Returns Variant
 10040        Handle hDispatchDriver
 10041        Variant retVal
 10042        Get phDispatchDriver to hDispatchDriver
 10043        Send PrepareParams to hDispatchDriver 5
 10044        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llRelative
 10045        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llRelationship
 10046        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llKey
 10047        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llText
 10048        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llImage
 10049        Get InvokeComMethod of hDispatchDriver 3 OLE_VT_DISPATCH to retVal
 10050        Function_Return retVal
 10051    End_Function
 10052
 10053    Procedure ComRemove Variant llIndex
 10054        Handle hDispatchDriver
 10055        Get phDispatchDriver to hDispatchDriver
 10056        Send PrepareParams to hDispatchDriver 1
 10057        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10058        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
 10059    End_Procedure
 10060
 10061    { MethodType=Property DesignTime=False }
 10062    Function Com_NewEnum Returns Variant
 10063        Handle hDispatchDriver
 10064        Variant retVal
 10065        Get phDispatchDriver to hDispatchDriver
 10066        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
 10067        Function_Return retVal
 10068    End_Function
 10069End_Class
 10070
 10071Class cSigCjComListViewColumnHeader is a cComAutomationObject
 10072
 10073    { MethodType=Property DesignTime=False }
 10074    Function ComText Returns String
 10075        String retVal
 10076        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
 10077        Function_Return retVal
 10078    End_Function
 10079
 10080    { MethodType=Property DesignTime=False }
 10081    Procedure Set ComText String value
 10082        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
 10083    End_Procedure
 10084
 10085    { MethodType=Property DesignTime=False }
 10086    Function ComTag Returns Variant
 10087        Variant retVal
 10088        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to retVal
 10089        Function_Return retVal
 10090    End_Function
 10091
 10092    { MethodType=Property DesignTime=False }
 10093    Procedure Set ComTag Variant value
 10094        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to value
 10095    End_Procedure
 10096
 10097    { MethodType=Property DesignTime=False }
 10098    Function ComAlignment Returns OLEListViewColumnAlignment
 10099        OLEListViewColumnAlignment retVal
 10100        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to retVal
 10101        Function_Return retVal
 10102    End_Function
 10103
 10104    { MethodType=Property DesignTime=False }
 10105    Procedure Set ComAlignment OLEListViewColumnAlignment value
 10106        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_I4 to value
 10107    End_Procedure
 10108
 10109    { MethodType=Property DesignTime=False }
 10110    Function ComWidth Returns Integer
 10111        Integer retVal
 10112        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to retVal
 10113        Function_Return retVal
 10114    End_Function
 10115
 10116    { MethodType=Property DesignTime=False }
 10117    Procedure Set ComWidth Integer value
 10118        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_I4 to value
 10119    End_Procedure
 10120
 10121    { MethodType=Property DesignTime=False }
 10122    Function ComIcon Returns Integer
 10123        Integer retVal
 10124        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
 10125        Function_Return retVal
 10126    End_Function
 10127
 10128    { MethodType=Property DesignTime=False }
 10129    Procedure Set ComIcon Integer value
 10130        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
 10131    End_Procedure
 10132
 10133    { MethodType=Property DesignTime=False }
 10134    Function ComPosition Returns Integer
 10135        Integer retVal
 10136        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to retVal
 10137        Function_Return retVal
 10138    End_Function
 10139
 10140    { MethodType=Property DesignTime=False }
 10141    Procedure Set ComPosition Integer value
 10142        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_I4 to value
 10143    End_Procedure
 10144
 10145    { MethodType=Property DesignTime=False }
 10146    Function ComKey Returns String
 10147        String retVal
 10148        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BSTR to retVal
 10149        Function_Return retVal
 10150    End_Function
 10151
 10152    { MethodType=Property DesignTime=False }
 10153    Procedure Set ComKey String value
 10154        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BSTR to value
 10155    End_Procedure
 10156
 10157    { MethodType=Property DesignTime=False }
 10158    Function ComResizable Returns Boolean
 10159        Boolean retVal
 10160        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to retVal
 10161        Function_Return retVal
 10162    End_Function
 10163
 10164    { MethodType=Property DesignTime=False }
 10165    Procedure Set ComResizable Boolean value
 10166        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to value
 10167    End_Procedure
 10168
 10169    { MethodType=Property DesignTime=False }
 10170    Function ComIndex Returns Integer
 10171        Handle hDispatchDriver
 10172        Integer retVal
 10173        Get phDispatchDriver to hDispatchDriver
 10174        Get InvokeComMethod of hDispatchDriver 6 OLE_VT_I4 to retVal
 10175        Function_Return retVal
 10176    End_Function
 10177
 10178    { MethodType=Property DesignTime=False }
 10179    Function ComSubItemIndex Returns Integer
 10180        Handle hDispatchDriver
 10181        Integer retVal
 10182        Get phDispatchDriver to hDispatchDriver
 10183        Get InvokeComMethod of hDispatchDriver 7 OLE_VT_I4 to retVal
 10184        Function_Return retVal
 10185    End_Function
 10186End_Class
 10187
 10188Class cSigCjComListViewColumnHeaders is a cComAutomationObject
 10189
 10190    { MethodType=Property DesignTime=False }
 10191    Function ComCount Returns Integer
 10192        Handle hDispatchDriver
 10193        Integer retVal
 10194        Get phDispatchDriver to hDispatchDriver
 10195        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
 10196        Function_Return retVal
 10197    End_Function
 10198
 10199    Function ComAdd Variant llIndex Variant llKey Variant llText Variant llWidth Variant llAlignment Variant llIcon Returns Variant
 10200        Handle hDispatchDriver
 10201        Variant retVal
 10202        Get phDispatchDriver to hDispatchDriver
 10203        Send PrepareParams to hDispatchDriver 6
 10204        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10205        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llKey
 10206        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llText
 10207        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llWidth
 10208        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llAlignment
 10209        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIcon
 10210        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_DISPATCH to retVal
 10211        Function_Return retVal
 10212    End_Function
 10213
 10214    Procedure ComClear
 10215        Handle hDispatchDriver
 10216        Get phDispatchDriver to hDispatchDriver
 10217        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
 10218    End_Procedure
 10219
 10220    Procedure ComRemove Variant llIndex
 10221        Handle hDispatchDriver
 10222        Get phDispatchDriver to hDispatchDriver
 10223        Send PrepareParams to hDispatchDriver 1
 10224        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10225        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
 10226    End_Procedure
 10227
 10228    { MethodType=Property DesignTime=False }
 10229    Function ComItem Variant llIndex Returns Variant
 10230        Handle hDispatchDriver
 10231        Variant retVal
 10232        Get phDispatchDriver to hDispatchDriver
 10233        Send PrepareParams to hDispatchDriver 1
 10234        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10235        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
 10236        Function_Return retVal
 10237    End_Function
 10238
 10239    { MethodType=Property DesignTime=False }
 10240    Function Com_NewEnum Returns Variant
 10241        Handle hDispatchDriver
 10242        Variant retVal
 10243        Get phDispatchDriver to hDispatchDriver
 10244        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
 10245        Function_Return retVal
 10246    End_Function
 10247End_Class
 10248
 10249Class cSigCjComListViewSubItem is a cComAutomationObject
 10250
 10251    { MethodType=Property DesignTime=False }
 10252    Function ComText Returns String
 10253        String retVal
 10254        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
 10255        Function_Return retVal
 10256    End_Function
 10257
 10258    { MethodType=Property DesignTime=False }
 10259    Procedure Set ComText String value
 10260        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
 10261    End_Procedure
 10262
 10263    { MethodType=Property DesignTime=False }
 10264    Function ComTag Returns Variant
 10265        Variant retVal
 10266        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to retVal
 10267        Function_Return retVal
 10268    End_Function
 10269
 10270    { MethodType=Property DesignTime=False }
 10271    Procedure Set ComTag Variant value
 10272        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to value
 10273    End_Procedure
 10274
 10275    { MethodType=Property DesignTime=False }
 10276    Function ComToolTipText Returns String
 10277        String retVal
 10278        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
 10279        Function_Return retVal
 10280    End_Function
 10281
 10282    { MethodType=Property DesignTime=False }
 10283    Procedure Set ComToolTipText String value
 10284        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
 10285    End_Procedure
 10286
 10287    { MethodType=Property DesignTime=False }
 10288    Function ComBold Returns Boolean
 10289        Boolean retVal
 10290        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
 10291        Function_Return retVal
 10292    End_Function
 10293
 10294    { MethodType=Property DesignTime=False }
 10295    Procedure Set ComBold Boolean value
 10296        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
 10297    End_Procedure
 10298
 10299    { MethodType=Property DesignTime=False }
 10300    Function ComForeColor Returns OLE_COLOR
 10301        OLE_COLOR retVal
 10302        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to retVal
 10303        Function_Return retVal
 10304    End_Function
 10305
 10306    { MethodType=Property DesignTime=False }
 10307    Procedure Set ComForeColor OLE_COLOR value
 10308        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_I4 to value
 10309    End_Procedure
 10310
 10311    { MethodType=Property DesignTime=False }
 10312    Function ComKey Returns String
 10313        String retVal
 10314        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BSTR to retVal
 10315        Function_Return retVal
 10316    End_Function
 10317
 10318    { MethodType=Property DesignTime=False }
 10319    Procedure Set ComKey String value
 10320        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BSTR to value
 10321    End_Procedure
 10322
 10323    { MethodType=Property DesignTime=False }
 10324    Function ComIndex Returns Integer
 10325        Handle hDispatchDriver
 10326        Integer retVal
 10327        Get phDispatchDriver to hDispatchDriver
 10328        Get InvokeComMethod of hDispatchDriver 5 OLE_VT_I4 to retVal
 10329        Function_Return retVal
 10330    End_Function
 10331End_Class
 10332
 10333Class cSigCjComListViewSubItems is a cComAutomationObject
 10334
 10335    { MethodType=Property DesignTime=False }
 10336    Function ComCount Returns Integer
 10337        Handle hDispatchDriver
 10338        Integer retVal
 10339        Get phDispatchDriver to hDispatchDriver
 10340        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
 10341        Function_Return retVal
 10342    End_Function
 10343
 10344    Function ComAdd Variant llIndex Variant llKey Variant llText Returns Variant
 10345        Handle hDispatchDriver
 10346        Variant retVal
 10347        Get phDispatchDriver to hDispatchDriver
 10348        Send PrepareParams to hDispatchDriver 3
 10349        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10350        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llKey
 10351        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llText
 10352        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_DISPATCH to retVal
 10353        Function_Return retVal
 10354    End_Function
 10355
 10356    Procedure ComClear
 10357        Handle hDispatchDriver
 10358        Get phDispatchDriver to hDispatchDriver
 10359        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
 10360    End_Procedure
 10361
 10362    Procedure ComRemove Variant llIndex
 10363        Handle hDispatchDriver
 10364        Get phDispatchDriver to hDispatchDriver
 10365        Send PrepareParams to hDispatchDriver 1
 10366        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10367        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
 10368    End_Procedure
 10369
 10370    { MethodType=Property DesignTime=False }
 10371    Function ComItem Variant llIndex Returns Variant
 10372        Handle hDispatchDriver
 10373        Variant retVal
 10374        Get phDispatchDriver to hDispatchDriver
 10375        Send PrepareParams to hDispatchDriver 1
 10376        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10377        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
 10378        Function_Return retVal
 10379    End_Function
 10380
 10381    { MethodType=Property DesignTime=False }
 10382    Function Com_NewEnum Returns Variant
 10383        Handle hDispatchDriver
 10384        Variant retVal
 10385        Get phDispatchDriver to hDispatchDriver
 10386        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
 10387        Function_Return retVal
 10388    End_Function
 10389End_Class
 10390
 10391Class cSigCjComListViewItem is a cComAutomationObject
 10392
 10393    { MethodType=Property DesignTime=False }
 10394    Function ComText Returns String
 10395        String retVal
 10396        Get ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to retVal
 10397        Function_Return retVal
 10398    End_Function
 10399
 10400    { MethodType=Property DesignTime=False }
 10401    Procedure Set ComText String value
 10402        Set ComProperty of (phDispatchDriver(Self)) 0 OLE_VT_BSTR to value
 10403    End_Procedure
 10404
 10405    { MethodType=Property DesignTime=False }
 10406    Function ComTag Returns Variant
 10407        Variant retVal
 10408        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to retVal
 10409        Function_Return retVal
 10410    End_Function
 10411
 10412    { MethodType=Property DesignTime=False }
 10413    Procedure Set ComTag Variant value
 10414        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_VARIANT to value
 10415    End_Procedure
 10416
 10417    { MethodType=Property DesignTime=False }
 10418    Function ComToolTipText Returns String
 10419        String retVal
 10420        Get ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to retVal
 10421        Function_Return retVal
 10422    End_Function
 10423
 10424    { MethodType=Property DesignTime=False }
 10425    Procedure Set ComToolTipText String value
 10426        Set ComProperty of (phDispatchDriver(Self)) 2 OLE_VT_BSTR to value
 10427    End_Procedure
 10428
 10429    { MethodType=Property DesignTime=False }
 10430    Function ComChecked Returns Boolean
 10431        Boolean retVal
 10432        Get ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to retVal
 10433        Function_Return retVal
 10434    End_Function
 10435
 10436    { MethodType=Property DesignTime=False }
 10437    Procedure Set ComChecked Boolean value
 10438        Set ComProperty of (phDispatchDriver(Self)) 3 OLE_VT_BOOL to value
 10439    End_Procedure
 10440
 10441    { MethodType=Property DesignTime=False }
 10442    Function ComSelected Returns Boolean
 10443        Boolean retVal
 10444        Get ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to retVal
 10445        Function_Return retVal
 10446    End_Function
 10447
 10448    { MethodType=Property DesignTime=False }
 10449    Procedure Set ComSelected Boolean value
 10450        Set ComProperty of (phDispatchDriver(Self)) 4 OLE_VT_BOOL to value
 10451    End_Procedure
 10452
 10453    { MethodType=Property DesignTime=False }
 10454    Function ComBold Returns Boolean
 10455        Boolean retVal
 10456        Get ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to retVal
 10457        Function_Return retVal
 10458    End_Function
 10459
 10460    { MethodType=Property DesignTime=False }
 10461    Procedure Set ComBold Boolean value
 10462        Set ComProperty of (phDispatchDriver(Self)) 5 OLE_VT_BOOL to value
 10463    End_Procedure
 10464
 10465    { MethodType=Property DesignTime=False }
 10466    Function ComForeColor Returns OLE_COLOR
 10467        OLE_COLOR retVal
 10468        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to retVal
 10469        Function_Return retVal
 10470    End_Function
 10471
 10472    { MethodType=Property DesignTime=False }
 10473    Procedure Set ComForeColor OLE_COLOR value
 10474        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_I4 to value
 10475    End_Procedure
 10476
 10477    { MethodType=Property DesignTime=False }
 10478    Function ComIcon Returns Integer
 10479        Integer retVal
 10480        Get ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to retVal
 10481        Function_Return retVal
 10482    End_Function
 10483
 10484    { MethodType=Property DesignTime=False }
 10485    Procedure Set ComIcon Integer value
 10486        Set ComProperty of (phDispatchDriver(Self)) 7 OLE_VT_I4 to value
 10487    End_Procedure
 10488
 10489    { MethodType=Property DesignTime=False }
 10490    Function ComKey Returns String
 10491        String retVal
 10492        Get ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BSTR to retVal
 10493        Function_Return retVal
 10494    End_Function
 10495
 10496    { MethodType=Property DesignTime=False }
 10497    Procedure Set ComKey String value
 10498        Set ComProperty of (phDispatchDriver(Self)) 20 OLE_VT_BSTR to value
 10499    End_Procedure
 10500
 10501    { MethodType=Property DesignTime=False }
 10502    Function ComGhosted Returns Boolean
 10503        Boolean retVal
 10504        Get ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to retVal
 10505        Function_Return retVal
 10506    End_Function
 10507
 10508    { MethodType=Property DesignTime=False }
 10509    Procedure Set ComGhosted Boolean value
 10510        Set ComProperty of (phDispatchDriver(Self)) 21 OLE_VT_BOOL to value
 10511    End_Procedure
 10512
 10513    { MethodType=Property DesignTime=False }
 10514    Function ComTextBackColor Returns OLE_COLOR
 10515        OLE_COLOR retVal
 10516        Get ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to retVal
 10517        Function_Return retVal
 10518    End_Function
 10519
 10520    { MethodType=Property DesignTime=False }
 10521    Procedure Set ComTextBackColor OLE_COLOR value
 10522        Set ComProperty of (phDispatchDriver(Self)) 22 OLE_VT_I4 to value
 10523    End_Procedure
 10524
 10525    { MethodType=Property DesignTime=False }
 10526    Function ComIndex Returns Integer
 10527        Handle hDispatchDriver
 10528        Integer retVal
 10529        Get phDispatchDriver to hDispatchDriver
 10530        Get InvokeComMethod of hDispatchDriver 8 OLE_VT_I4 to retVal
 10531        Function_Return retVal
 10532    End_Function
 10533
 10534    { MethodType=Property DesignTime=False }
 10535    Function ComListSubItems Returns Variant
 10536        Handle hDispatchDriver
 10537        Variant retVal
 10538        Get phDispatchDriver to hDispatchDriver
 10539        Get InvokeComMethod of hDispatchDriver 9 OLE_VT_DISPATCH to retVal
 10540        Function_Return retVal
 10541    End_Function
 10542
 10543    { MethodType=Property DesignTime=False }
 10544    Function ComSubItems Integer llIndex Returns String
 10545        Handle hDispatchDriver
 10546        String retVal
 10547        Get phDispatchDriver to hDispatchDriver
 10548        Send PrepareParams to hDispatchDriver 1
 10549        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
 10550        Get InvokeComMethod of hDispatchDriver 16 OLE_VT_BSTR to retVal
 10551        Function_Return retVal
 10552    End_Function
 10553
 10554    { MethodType=Property DesignTime=False }
 10555    Procedure Set ComSubItems Integer llIndex String value
 10556        Handle hDispatchDriver
 10557        Get phDispatchDriver to hDispatchDriver
 10558        Send PrepareParams to hDispatchDriver 2
 10559        Send DefineParam to hDispatchDriver OLE_VT_I4 llIndex
 10560        Set ComProperty of hDispatchDriver 16 OLE_VT_BSTR to value
 10561    End_Procedure
 10562
 10563    Procedure ComEnsureVisible
 10564        Handle hDispatchDriver
 10565        Get phDispatchDriver to hDispatchDriver
 10566        Send InvokeComMethod to hDispatchDriver 18 OLE_VT_VOID
 10567    End_Procedure
 10568End_Class
 10569
 10570Class cSigCjComListViewItems is a cComAutomationObject
 10571
 10572    { MethodType=Property DesignTime=False }
 10573    Function ComCount Returns Integer
 10574        Handle hDispatchDriver
 10575        Integer retVal
 10576        Get phDispatchDriver to hDispatchDriver
 10577        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
 10578        Function_Return retVal
 10579    End_Function
 10580
 10581    Function ComAdd Variant llIndex Variant llKey Variant llText Variant llIcon Returns Variant
 10582        Handle hDispatchDriver
 10583        Variant retVal
 10584        Get phDispatchDriver to hDispatchDriver
 10585        Send PrepareParams to hDispatchDriver 4
 10586        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10587        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llKey
 10588        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llText
 10589        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIcon
 10590        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_DISPATCH to retVal
 10591        Function_Return retVal
 10592    End_Function
 10593
 10594    Procedure ComClear
 10595        Handle hDispatchDriver
 10596        Get phDispatchDriver to hDispatchDriver
 10597        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
 10598    End_Procedure
 10599
 10600    Procedure ComRemove Variant llIndex
 10601        Handle hDispatchDriver
 10602        Get phDispatchDriver to hDispatchDriver
 10603        Send PrepareParams to hDispatchDriver 1
 10604        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10605        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
 10606    End_Procedure
 10607
 10608    { MethodType=Property DesignTime=False }
 10609    Function ComItem Variant llIndex Returns Variant
 10610        Handle hDispatchDriver
 10611        Variant retVal
 10612        Get phDispatchDriver to hDispatchDriver
 10613        Send PrepareParams to hDispatchDriver 1
 10614        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llIndex
 10615        Get InvokeComMethod of hDispatchDriver 0 OLE_VT_DISPATCH to retVal
 10616        Function_Return retVal
 10617    End_Function
 10618
 10619    { MethodType=Property DesignTime=False }
 10620    Function Com_NewEnum Returns Variant
 10621        Handle hDispatchDriver
 10622        Variant retVal
 10623        Get phDispatchDriver to hDispatchDriver
 10624        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
 10625        Function_Return retVal
 10626    End_Function
 10627End_Class
 10628
 10629//==============================================================================
 10630//End of package - SigCjW_Controls.pkg
 10631//==============================================================================
 10632