Module cCJImageManager.pkg

     1// Visual DataFlex COM proxy classes generated from C:\Program Files\Codejock Software\ActiveX\Xtreme SuitePro ActiveX v13.4.2\Bin\Codejock.CommandBars.v13.4.2.ocx
     2Use FlexCom20.pkg
     3
     4// Image State
     5Define XTPImageState for Integer
     6    Define xtpImageNormal for 0
     7    Define xtpImageDisabled for 1
     8    Define xtpImageHot for 2
     9    Define xtpImageChecked for 3
    10    Define xtpImagePressed for 4
    11    
    12// CLSID: {DCDB9842-AE6D-46A8-BC77-CEE7D5CE9ED7}
    13Class cCJIImageManagerIcons is a Mixin
    14
    15    { MethodType=Property DesignTime=False }
    16    Function ComDrawReverted Returns Boolean
    17        Boolean retVal
    18        Get ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to retVal
    19        Function_Return retVal
    20    End_Function
    21
    22    { MethodType=Property DesignTime=False }
    23    Procedure Set ComDrawReverted Boolean value
    24        Set ComProperty of (phDispatchDriver(Self)) 6 OLE_VT_BOOL to value
    25    End_Procedure
    26
    27    { MethodType=Property DesignTime=False }
    28    Function ComMaskColor Returns OLE_COLOR
    29        OLE_COLOR retVal
    30        Get ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to retVal
    31        Function_Return retVal
    32    End_Function
    33
    34    { MethodType=Property DesignTime=False }
    35    Procedure Set ComMaskColor OLE_COLOR value
    36        Set ComProperty of (phDispatchDriver(Self)) 9 OLE_VT_I4 to value
    37    End_Procedure
    38
    39    { MethodType=Property DesignTime=False }
    40    Function ComCount Returns Integer
    41        Handle hDispatchDriver
    42        Integer retVal
    43        Get phDispatchDriver to hDispatchDriver
    44        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
    45        Function_Return retVal
    46    End_Function
    47
    48    Procedure ComAddIcon Integer llHandle Integer llCommand XTPImageState llimageState
    49        Handle hDispatchDriver
    50        Get phDispatchDriver to hDispatchDriver
    51        Send PrepareParams to hDispatchDriver 3
    52        Send DefineParam to hDispatchDriver OLE_VT_I4 llHandle
    53        Send DefineParam to hDispatchDriver OLE_VT_I4 llCommand
    54        Send DefineParam to hDispatchDriver OLE_VT_I4 llimageState
    55        Send InvokeComMethod to hDispatchDriver 2 OLE_VT_VOID
    56    End_Procedure
    57
    58    Procedure ComLoadIcon String llPath Integer llCommand XTPImageState llimageState
    59        Handle hDispatchDriver
    60        Get phDispatchDriver to hDispatchDriver
    61        Send PrepareParams to hDispatchDriver 3
    62        Send DefineParam to hDispatchDriver OLE_VT_BSTR llPath
    63        Send DefineParam to hDispatchDriver OLE_VT_I4 llCommand
    64        Send DefineParam to hDispatchDriver OLE_VT_I4 llimageState
    65        Send InvokeComMethod to hDispatchDriver 3 OLE_VT_VOID
    66    End_Procedure
    67
    68    Procedure ComAddBitmap Integer llHandle Variant llCommands XTPImageState llimageState Boolean llAlpha
    69        Handle hDispatchDriver
    70        Get phDispatchDriver to hDispatchDriver
    71        Send PrepareParams to hDispatchDriver 4
    72        Send DefineParam to hDispatchDriver OLE_VT_I4 llHandle
    73        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llCommands
    74        Send DefineParam to hDispatchDriver OLE_VT_I4 llimageState
    75        Send DefineParam to hDispatchDriver OLE_VT_BOOL llAlpha
    76        Send InvokeComMethod to hDispatchDriver 8 OLE_VT_VOID
    77    End_Procedure
    78
    79    Procedure ComLoadBitmap String llPath Variant llCommands XTPImageState llimageState
    80        Handle hDispatchDriver
    81        Get phDispatchDriver to hDispatchDriver
    82        Send PrepareParams to hDispatchDriver 3
    83        Send DefineParam to hDispatchDriver OLE_VT_BSTR llPath
    84        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llCommands
    85        Send DefineParam to hDispatchDriver OLE_VT_I4 llimageState
    86        Send InvokeComMethod to hDispatchDriver 4 OLE_VT_VOID
    87    End_Procedure
    88
    89    Procedure ComLoadBitmapFromResource Integer llModule Integer llResource Variant llCommands XTPImageState llimageState
    90        Handle hDispatchDriver
    91        Get phDispatchDriver to hDispatchDriver
    92        Send PrepareParams to hDispatchDriver 4
    93        Send DefineParam to hDispatchDriver OLE_VT_I4 llModule
    94        Send DefineParam to hDispatchDriver OLE_VT_I4 llResource
    95        Send DefineParam to hDispatchDriver OLE_VT_VARIANT llCommands
    96        Send DefineParam to hDispatchDriver OLE_VT_I4 llimageState
    97        Send InvokeComMethod to hDispatchDriver 14 OLE_VT_VOID
    98    End_Procedure
    99
   100    Procedure ComLoadIconFromResource Integer llModule Integer llResource Integer llCommand XTPImageState llimageState
   101        Handle hDispatchDriver
   102        Get phDispatchDriver to hDispatchDriver
   103        Send PrepareParams to hDispatchDriver 4
   104        Send DefineParam to hDispatchDriver OLE_VT_I4 llModule
   105        Send DefineParam to hDispatchDriver OLE_VT_I4 llResource
   106        Send DefineParam to hDispatchDriver OLE_VT_I4 llCommand
   107        Send DefineParam to hDispatchDriver OLE_VT_I4 llimageState
   108        Send InvokeComMethod to hDispatchDriver 16 OLE_VT_VOID
   109    End_Procedure
   110
   111    Procedure ComRemoveAll
   112        Handle hDispatchDriver
   113        Get phDispatchDriver to hDispatchDriver
   114        Send InvokeComMethod to hDispatchDriver 5 OLE_VT_VOID
   115    End_Procedure
   116
   117    Procedure ComAddIcons Variant llIcons
   118        Handle hDispatchDriver
   119        Get phDispatchDriver to hDispatchDriver
   120        Send PrepareParams to hDispatchDriver 1
   121        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llIcons
   122        Send InvokeComMethod to hDispatchDriver 7 OLE_VT_VOID
   123    End_Procedure
   124
   125    Procedure ComRemoveIcon Integer llCommand
   126        Handle hDispatchDriver
   127        Get phDispatchDriver to hDispatchDriver
   128        Send PrepareParams to hDispatchDriver 1
   129        Send DefineParam to hDispatchDriver OLE_VT_I4 llCommand
   130        Send InvokeComMethod to hDispatchDriver 10 OLE_VT_VOID
   131    End_Procedure
   132
   133    { MethodType=Property DesignTime=False }
   134    Function ComIsAlphaIconsSupported Returns Boolean
   135        Handle hDispatchDriver
   136        Boolean retVal
   137        Get phDispatchDriver to hDispatchDriver
   138        Get InvokeComMethod of hDispatchDriver 11 OLE_VT_BOOL to retVal
   139        Function_Return retVal
   140    End_Function
   141
   142    Procedure ComRefreshAll
   143        Handle hDispatchDriver
   144        Get phDispatchDriver to hDispatchDriver
   145        Send InvokeComMethod to hDispatchDriver 12 OLE_VT_VOID
   146    End_Procedure
   147
   148    Function ComGetImage Integer llCommand Integer llWidth Returns Variant
   149        Handle hDispatchDriver
   150        Variant retVal
   151        Get phDispatchDriver to hDispatchDriver
   152        Send PrepareParams to hDispatchDriver 2
   153        Send DefineParam to hDispatchDriver OLE_VT_I4 llCommand
   154        Send DefineParam to hDispatchDriver OLE_VT_I4 llWidth
   155        Get InvokeComMethod of hDispatchDriver 13 OLE_VT_DISPATCH to retVal
   156        Function_Return retVal
   157    End_Function
   158
   159    { MethodType=Property DesignTime=False }
   160    Function Com_NewEnum Returns Variant
   161        Handle hDispatchDriver
   162        Variant retVal
   163        Get phDispatchDriver to hDispatchDriver
   164        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
   165        Function_Return retVal
   166    End_Function
   167
   168    Procedure ComDoPropExchange Variant llpPX
   169        Handle hDispatchDriver
   170        Get phDispatchDriver to hDispatchDriver
   171        Send PrepareParams to hDispatchDriver 1
   172        Send DefineParam to hDispatchDriver OLE_VT_DISPATCH llpPX
   173        Send InvokeComMethod to hDispatchDriver 15 OLE_VT_VOID
   174    End_Procedure
   175End_Class
   176
   177// CoClass
   178// CLSID: {1232C4DB-8C00-4F05-AF87-9F05BCB55475}
   179{ ClassLibrary=Windows }
   180Class cCJImageManagerIcons is a cComAutomationObject
   181    Import_Class_Protocol cCJIImageManagerIcons
   182
   183    Procedure Construct_Object
   184        Forward Send Construct_Object
   185        Set peAutoCreate to acNoAutoCreate
   186    End_Procedure
   187End_Class
   188
   189// CLSID: {1B4C4444-7540-4926-8D3D-82A953AE7B7B}
   190// Dispatch interface for ImageManager Control
   191Class cCJ_DImageManager is a Mixin
   192
   193    { MethodType=Property DesignTime=False }
   194    Function ComIcons Returns Variant
   195        Variant retVal
   196        Get ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_DISPATCH to retVal
   197        Function_Return retVal
   198    End_Function
   199
   200    { MethodType=Property DesignTime=False }
   201    Procedure Set ComIcons Variant value
   202        Set ComProperty of (phDispatchDriver(Self)) 1 OLE_VT_DISPATCH to value
   203    End_Procedure
   204
   205    Function ComIsAlphaIconsSupported Returns Boolean
   206        Handle hDispatchDriver
   207        Boolean retVal
   208        Get phDispatchDriver to hDispatchDriver
   209        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_BOOL to retVal
   210        Function_Return retVal
   211    End_Function
   212
   213    Procedure ComAboutBox
   214        Handle hDispatchDriver
   215        Get phDispatchDriver to hDispatchDriver
   216        Send InvokeComMethod to hDispatchDriver -552 OLE_VT_VOID
   217    End_Procedure
   218End_Class
   219
   220// CLSID: {C3B3E592-E0F3-48CF-BD1D-5305A4F46C99}
   221// Event interface for ImageManager Control
   222Class cCJ_DImageManagerEvents is a Mixin
   223
   224    { Visibility=Private }
   225    Procedure RegisterComEvents
   226    End_Procedure
   227End_Class
   228
   229// CoClass
   230// ProgID: Codejock.ImageManager.13.4.2
   231// CLSID: {B2F3AAF2-6669-49C0-A3E9-329A842A37B7}
   232// Xtreme ImageManager Control
   233{ CLSID="{B2F3AAF2-6669-49C0-A3E9-329A842A37B7}" }
   234Class cCJImageManager is a cComActiveXControl
   235    Import_Class_Protocol cCJ_DImageManager
   236    Import_Class_Protocol cCJ_DImageManagerEvents
   237
   238    Procedure Construct_Object
   239        Forward Send Construct_Object
   240        Set psProgID to "{B2F3AAF2-6669-49C0-A3E9-329A842A37B7}"
   241        Set psEventId to "{C3B3E592-E0F3-48CF-BD1D-5305A4F46C99}"
   242        Set peAutoCreate to acAutoCreate
   243    End_Procedure
   244End_Class
   245
   246// CLSID: {1CDB9842-AE6D-46A8-BC77-CEE7D5CE9ED7}
   247{ ClassLibrary=Windows }
   248Class cCJImageManagerIcon is a cComAutomationObject
   249
   250    { MethodType=Property DesignTime=False }
   251    Function ComId Returns Integer
   252        Handle hDispatchDriver
   253        Integer retVal
   254        Get phDispatchDriver to hDispatchDriver
   255        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
   256        Function_Return retVal
   257    End_Function
   258
   259    { MethodType=Property DesignTime=False }
   260    Function ComWidth Returns Integer
   261        Handle hDispatchDriver
   262        Integer retVal
   263        Get phDispatchDriver to hDispatchDriver
   264        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_I4 to retVal
   265        Function_Return retVal
   266    End_Function
   267
   268    { MethodType=Property DesignTime=False }
   269    Function ComHeight Returns Integer
   270        Handle hDispatchDriver
   271        Integer retVal
   272        Get phDispatchDriver to hDispatchDriver
   273        Get InvokeComMethod of hDispatchDriver 3 OLE_VT_I4 to retVal
   274        Function_Return retVal
   275    End_Function
   276
   277    { MethodType=Property DesignTime=False }
   278    Function ComScaled Returns Boolean
   279        Handle hDispatchDriver
   280        Boolean retVal
   281        Get phDispatchDriver to hDispatchDriver
   282        Get InvokeComMethod of hDispatchDriver 4 OLE_VT_BOOL to retVal
   283        Function_Return retVal
   284    End_Function
   285
   286    { MethodType=Property DesignTime=False }
   287    Function ComAlpha Returns Boolean
   288        Handle hDispatchDriver
   289        Boolean retVal
   290        Get phDispatchDriver to hDispatchDriver
   291        Get InvokeComMethod of hDispatchDriver 5 OLE_VT_BOOL to retVal
   292        Function_Return retVal
   293    End_Function
   294
   295    { MethodType=Property DesignTime=False }
   296    Function ComHandle Returns OLE_HANDLE
   297        Handle hDispatchDriver
   298        OLE_HANDLE retVal
   299        Get phDispatchDriver to hDispatchDriver
   300        Get InvokeComMethod of hDispatchDriver 6 OLE_VT_I4 to retVal
   301        Function_Return retVal
   302    End_Function
   303
   304    Procedure ComDraw OLE_HANDLE llhDC Integer llx Integer lly Integer llcx Integer llcy XTPImageState llstate
   305        Handle hDispatchDriver
   306        Get phDispatchDriver to hDispatchDriver
   307        Send PrepareParams to hDispatchDriver 6
   308        Send DefineParam to hDispatchDriver OLE_VT_I4 llhDC
   309        Send DefineParam to hDispatchDriver OLE_VT_I4 llx
   310        Send DefineParam to hDispatchDriver OLE_VT_I4 lly
   311        Send DefineParam to hDispatchDriver OLE_VT_I4 llcx
   312        Send DefineParam to hDispatchDriver OLE_VT_I4 llcy
   313        Send DefineParam to hDispatchDriver OLE_VT_I4 llstate
   314        Send InvokeComMethod to hDispatchDriver 7 OLE_VT_VOID
   315    End_Procedure
   316
   317    Function ComCreatePicture XTPImageState llstate Returns Variant
   318        Handle hDispatchDriver
   319        Variant retVal
   320        Get phDispatchDriver to hDispatchDriver
   321        Send PrepareParams to hDispatchDriver 1
   322        Send DefineParam to hDispatchDriver OLE_VT_I4 llstate
   323        Get InvokeComMethod of hDispatchDriver 8 OLE_VT_DISPATCH to retVal
   324        Function_Return retVal
   325    End_Function
   326
   327    Function ComScale Integer llWidth Returns Variant
   328        Handle hDispatchDriver
   329        Variant retVal
   330        Get phDispatchDriver to hDispatchDriver
   331        Send PrepareParams to hDispatchDriver 1
   332        Send DefineParam to hDispatchDriver OLE_VT_I4 llWidth
   333        Get InvokeComMethod of hDispatchDriver 9 OLE_VT_DISPATCH to retVal
   334        Function_Return retVal
   335    End_Function
   336End_Class
   337
   338// CLSID: {567B9842-AE6D-46A8-BC77-CEE7D5CE9ED7}
   339{ ClassLibrary=Windows }
   340Class cCJImageManagerIconSet is a cComAutomationObject
   341
   342    { MethodType=Property DesignTime=False }
   343    Function ComId Returns Integer
   344        Handle hDispatchDriver
   345        Integer retVal
   346        Get phDispatchDriver to hDispatchDriver
   347        Get InvokeComMethod of hDispatchDriver 1 OLE_VT_I4 to retVal
   348        Function_Return retVal
   349    End_Function
   350
   351    { MethodType=Property DesignTime=False }
   352    Function ComCount Returns Integer
   353        Handle hDispatchDriver
   354        Integer retVal
   355        Get phDispatchDriver to hDispatchDriver
   356        Get InvokeComMethod of hDispatchDriver 2 OLE_VT_I4 to retVal
   357        Function_Return retVal
   358    End_Function
   359
   360    Function ComGetImage Integer llWidth Returns Variant
   361        Handle hDispatchDriver
   362        Variant retVal
   363        Get phDispatchDriver to hDispatchDriver
   364        Send PrepareParams to hDispatchDriver 1
   365        Send DefineParam to hDispatchDriver OLE_VT_I4 llWidth
   366        Get InvokeComMethod of hDispatchDriver 13 OLE_VT_DISPATCH to retVal
   367        Function_Return retVal
   368    End_Function
   369
   370    { MethodType=Property DesignTime=False }
   371    Function Com_NewEnum Returns Variant
   372        Handle hDispatchDriver
   373        Variant retVal
   374        Get phDispatchDriver to hDispatchDriver
   375        Get InvokeComMethod of hDispatchDriver -4 OLE_VT_UNKNOWN to retVal
   376        Function_Return retVal
   377    End_Function
   378End_Class
   379
   380