Module oTaskPanel_Container.pkg

     1Use cSigCJTaskPanel.pkg
     2
     3    Object oTaskPanel_Container is a cSigCJTaskPanel
     4        Set peTaskPanelBehaviour to eTPB_BehaviourToolbox
     5               
     6        Object oOrder_Sample_Group is a cSigCJTaskPanelGroup
     7            Set psLabel to "Order Samples"
     8            Set psImage to "Order.ico"
     9
    10            Object oInventoryItemView_GroupItem is a cSigCJTaskPanelGroupItem
    11                Set psLabel   to "Inventory Item View"
    12                Set psImage   to "Order.ico"
    13
    14                Procedure OnClick
    15                    Handle hoClient
    16                    Get Client_Id to hoClient
    17                    Send Activate_oInventoryView of hoClient
    18                End_Procedure
    19            End_Object
    20            
    21            Object oVendorEntryView_GroupItem is a cSigCJTaskPanelGroupItem
    22                Set psLabel to "Vendor Entry View"
    23                Set psImage to "Order.ico"
    24            
    25                Procedure OnClick
    26                    Handle hoClient
    27                    Get Client_Id to hoClient
    28                    Send Activate_oVendorView of hoClient
    29                End_Procedure
    30            End_Object
    31
    32            Object oSalesPersonEntryView_GroupItem is a cSigCJTaskPanelGroupItem
    33                Set psLabel to "Sales Person Entry View"
    34                Set psImage to "Order.ico"
    35            
    36                Procedure OnClick
    37                    Handle hoClient
    38                    Get Client_Id to hoClient
    39                    Send Activate_oSalesPersonView of hoClient
    40                End_Procedure
    41            End_Object
    42
    43            Object oCustomerEntryView_GroupItem is a cSigCJTaskPanelGroupItem
    44                Set psLabel to "Customer Entry View"
    45                Set psImage to "Order.ico"
    46            
    47                Procedure OnClick
    48                    Handle hoClient
    49                    Get Client_Id to hoClient
    50                    Send Activate_oCustomerView of hoClient
    51                End_Procedure
    52            End_Object
    53
    54            Object oOrderEntry_GroupItem is a cSigCJTaskPanelGroupItem
    55                Set psLabel to "Order Entry"
    56                Set psImage to "Order.ico"
    57            
    58                Procedure OnClick
    59                    Handle hoClient
    60                    Get Client_Id to hoClient
    61                    Send Activate_oOrderEntryView of hoClient
    62                End_Procedure
    63            End_Object
    64
    65            Object oXEntry_GroupItem is a cSigCJTaskPanelGroupItem
    66                Set psLabel to "Order Entry"
    67                Set psImage to "Order.ico"
    68            
    69                Procedure OnClick
    70                    Handle hoClient
    71                    Get Client_Id to hoClient
    72                    Send Activate_oOrderEntryView of hoClient
    73                End_Procedure
    74            End_Object
    75            
    76        End_Object // oOrder_Sample_Group
    77
    78        Object oGeneral_Components_Group is a cSigCJTaskPanelGroup
    79            Set psLabel to "General Components"
    80            Set psImage to "Tasks_16.ico"
    81            
    82            Object oPushButtons_GroupItem is a cSigCJTaskPanelGroupItem
    83                Set psLabel to "Push Buttons"
    84                Set psImage to "Tasks_16.ico"
    85                
    86                Procedure OnClick
    87                    Handle hoClient
    88                    Get Client_Id to hoClient
    89                    Send Activate_oSigCJPushButtonDemo_View of hoClient
    90                End_Procedure
    91            End_Object
    92
    93            Object oTriStateCheckbox_GroupItem is a cSigCJTaskPanelGroupItem
    94                Set psLabel to "Tri-State Checkbox"
    95                Set psImage to "Tasks_16.ico"
    96
    97                Procedure OnClick
    98                    Handle hoClient
    99                    Get Client_Id to hoClient
   100                    Send Activate_oSigCJCheckBoxDemo_View of hoClient
   101                End_Procedure
   102            End_Object
   103
   104            Object oMessageDialogs_GroupItem is a cSigCJTaskPanelGroupItem
   105                Set psLabel to "Message Dialogs"
   106                Set psImage to "Tasks_16.ico"
   107
   108                Procedure OnClick
   109                    Handle hoClient
   110                    Get Client_Id to hoClient
   111                    Send Activate_oSigCJTaskDialogDemo_View of hoClient
   112                End_Procedure
   113            End_Object
   114
   115            Object oMonthCalendar_GroupItem is a cSigCJTaskPanelGroupItem
   116                Set psLabel to "Popup Calendar"
   117                Set psImage to "Tasks_16.ico"
   118
   119                Procedure OnClick
   120                    Handle hoClient
   121                    Get Client_Id to hoClient
   122                    Send Activate_oSigCJMonthCalendarDemo_View of hoClient
   123                End_Procedure
   124            End_Object
   125
   126            Object oPopupMessageControl_GroupItem is a cSigCJTaskPanelGroupItem
   127                Set psLabel to "Popup Message Control"
   128                Set psImage to "Tasks_16.ico"
   129
   130                Procedure OnClick
   131                    Handle hoClient
   132                    Get Client_Id to hoClient
   133                    Send Activate_oSigCJPopupControlDemo_View of hoClient
   134                End_Procedure
   135            End_Object
   136
   137            Object oMarkupControl_GroupItem is a cSigCJTaskPanelGroupItem
   138                Set psLabel to "Markup Control"
   139                Set psImage to "Tasks_16.ico"
   140
   141                Procedure OnClick
   142                    Handle hoClient
   143                    Get Client_Id to hoClient
   144                    Send Activate_oSIGCJLabelControlDemo_View of hoClient
   145                End_Procedure
   146            End_Object
   147        End_Object // oGeneral_Components_Group
   148
   149        Object oReport_Control_Group is a cSigCJTaskPanelGroup
   150            Set psLabel to "Report Control"
   151            Set psImage to "ActionCopy.ico"
   152            
   153            Object oReportControlText_GroupItem is a cSigCJTaskPanelGroupItem
   154                Set psLabel to "Text File"
   155                Set psImage to "ActionCopy.ico"
   156                
   157                Procedure OnClick
   158                    Handle hoClient
   159                    Get Client_Id to hoClient
   160                    Send Activate_SigCjReportControlDemo_Text_View of hoClient
   161                End_Procedure
   162            End_Object
   163        
   164            Object oReportControlTable_GroupItem is a cSigCJTaskPanelGroupItem
   165                Set psLabel to "Standard Table"
   166                Set psImage to "ActionCopy.ico"
   167                
   168                Procedure OnClick
   169                    Handle hoClient
   170                    Get Client_Id to hoClient
   171                    Send Activate_SigCjReportControlDemo_Table_View of hoClient
   172                End_Procedure
   173            End_Object
   174
   175            Object oReportControlSQL_GroupItem is a cSigCJTaskPanelGroupItem
   176                Set psLabel to "SQL Table"
   177                Set psImage to "ActionCopy.ico"
   178                
   179                Procedure OnClick
   180                    Handle hoClient
   181                    Get Client_Id to hoClient
   182                    Send Activate_SigCjReportControlDemo_SQL_View of hoClient
   183                End_Procedure
   184            End_Object
   185                                        
   186            Object oReportControlTree_GroupItem is a cSigCJTaskPanelGroupItem
   187                Set psLabel to "Tree View"
   188                Set psImage to "ActionCopy.ico"
   189                
   190                Procedure OnClick
   191                    Handle hoClient
   192                    Get Client_Id to hoClient
   193                    Send Activate_oSigCJReportControlDemo_TreeView of hoClient
   194                End_Procedure
   195            End_Object
   196
   197        End_Object // oReport_Control_Group
   198
   199        Object oCalendar_Control_Group is a cSigCJTaskPanelGroup
   200            Set psLabel to "Calendar Control"
   201            Set psImage to "ActionCalendar.ico"
   202            
   203            Object oCalendarControlSpecialDates_GroupItem is a cSigCJTaskPanelGroupItem
   204                Set psLabel to "Special Dates"
   205                Set psImage to "ActionCalendar.ico"
   206                
   207                Procedure OnClick
   208                    Handle hoClient
   209                    Get Client_Id to hoClient
   210                    Send Activate_oSigCJCalendarDemo_Special_Dates_View of hoClient
   211                End_Procedure
   212            End_Object
   213        
   214            Object oCalendarControlCategories_GroupItem is a cSigCJTaskPanelGroupItem
   215                Set psLabel to "Categories"
   216                Set psImage to "ActionCalendar.ico"
   217                
   218                Procedure OnClick
   219                    Handle hoClient
   220                    Get Client_Id to hoClient
   221                    Send Activate_oSigCjCalendarDemo_Categories_View of hoClient
   222                End_Procedure
   223            End_Object
   224
   225            Object oCalendar_Resources_GroupItem is a cSigCJTaskPanelGroupItem
   226                Set psLabel to "Calendar Resources"
   227                Set psImage to "ActionCalendar.ico"
   228                
   229                Procedure OnClick
   230                    Handle hoClient
   231                    Get Client_Id to hoClient
   232                    Send Activate_oCalendar_Resources of hoClient
   233                End_Procedure
   234            End_Object
   235
   236            Object oCalendarControlStandardCalendar_GroupItem is a cSigCJTaskPanelGroupItem
   237                Set psLabel to "Standard Calendar"
   238                Set psImage to "ActionCalendar.ico"
   239                
   240                Procedure OnClick
   241                    Handle hoClient
   242                    Get Client_Id to hoClient
   243                    Send Activate_oSigCJCalendarDemo_Standard_View of hoClient
   244                End_Procedure
   245            End_Object
   246
   247            Object oCalendarControl_GroupItem is a cSigCJTaskPanelGroupItem
   248                Set psLabel to "Bespoke Calendar"
   249                Set psImage to "ActionCalendar.ico"
   250                
   251                Procedure OnClick
   252                    Handle hoClient
   253                    Get Client_Id to hoClient
   254                    Send Activate_oSigCJCalendarDemo_Bespoke_View of hoClient
   255                End_Procedure
   256            End_Object
   257                                      
   258            Object oResourceCalendarControl_GroupItem is a cSigCJTaskPanelGroupItem
   259                Set psLabel to "Resource Calendar"
   260                Set psImage to "ActionCalendar.ico"
   261                
   262                Procedure OnClick
   263                    Handle hoClient
   264                    Get Client_Id to hoClient
   265                    Send Activate_oSigCJCalendarDemo_Resource_View of hoClient
   266                End_Procedure
   267            End_Object
   268
   269        End_Object // oCalendar_Control_Group
   270
   271        Object oTreeView_Control_Group is a cSigCJTaskPanelGroup
   272            Set psLabel to "TreeView Control"
   273            Set psImage to "WindowSidebar_16.ico"
   274            
   275            Object oSimpleTreeView_GroupItem is a cSigCJTaskPanelGroupItem
   276                Set psLabel to "Simple TreeView"
   277                Set psImage to "WindowSidebar_16.ico"
   278                
   279                Procedure OnClick
   280                    Handle hoClient
   281                    Get Client_Id to hoClient
   282                    Send Activate_oSigCJTreeViewDemo_Simple_View of hoClient
   283                End_Procedure
   284            End_Object
   285        
   286            Object oSalesOrdersTreeView_GroupItem is a cSigCJTaskPanelGroupItem
   287                Set psLabel to "Sales Orders TreeView"
   288                Set psImage to "WindowSidebar_16.ico"
   289                
   290                Procedure OnClick
   291                    Handle hoClient
   292                    Get Client_Id to hoClient
   293                    Send Activate_oSigCJTreeViewDemo_SalesOrders_View of hoClient
   294                End_Procedure
   295            End_Object
   296
   297        End_Object // oTreeView_Control_Group
   298
   299        Object oTheme_Group is a cSigCJTaskPanelGroup
   300            Set psLabel to "Change Theme"
   301            Set psImage to "Theme_16.ico"
   302            Object oOffice2000_Item is a cSigCJTaskPanelGroupItem
   303                Set psLabel to "Office 2000"
   304                Set psImage to "Theme_16.ico"
   305                Procedure OnClick
   306                    Set peTaskPanelTheme to eTPT_Office2000
   307                End_Procedure
   308            End_Object
   309            Object oOffice2003_Item is a cSigCJTaskPanelGroupItem
   310                Set psLabel to "Office 2003"
   311                Set psImage to "Theme_16.ico"
   312                Procedure OnClick
   313                    Set peTaskPanelTheme to eTPT_Office2003
   314                End_Procedure
   315            End_Object
   316            Object oNativeWinXP_Item is a cSigCJTaskPanelGroupItem
   317                Set psLabel to "Native WinXP"
   318                Set psImage to "Theme_16.ico"
   319                Procedure OnClick
   320                    Set peTaskPanelTheme to eTPT_NativeWinXP
   321                End_Procedure
   322            End_Object
   323            Object oOffice2000Plain_Item is a cSigCJTaskPanelGroupItem
   324                Set psLabel to "Office 2000 Plain"
   325                Set psImage to "Theme_16.ico"
   326                Procedure OnClick
   327                    Set peTaskPanelTheme to eTPT_Office2000Plain
   328                End_Procedure
   329            End_Object
   330            Object oOfficeXPPlain_Item is a cSigCJTaskPanelGroupItem
   331                Set psLabel to "Office XP Plain"
   332                Set psImage to "Theme_16.ico"
   333                Procedure OnClick
   334                    Set peTaskPanelTheme to eTPT_OfficeXPPlain
   335                End_Procedure
   336            End_Object
   337            Object oOffice2003Plain_Item is a cSigCJTaskPanelGroupItem
   338                Set psLabel to "Office 2003 Plain"
   339                Set psImage to "Theme_16.ico"
   340                Procedure OnClick
   341                    Set peTaskPanelTheme to eTPT_Office2003Plain
   342                End_Procedure
   343            End_Object
   344            Object oNativeWinXPPlain_Item is a cSigCJTaskPanelGroupItem
   345                Set psLabel to "Native WinXP Plain"
   346                Set psImage to "Theme_16.ico"
   347                Procedure OnClick
   348                    Set peTaskPanelTheme to eTPT_NativeWinXPPlain
   349                End_Procedure
   350            End_Object
   351            Object Toolbox_Item is a cSigCJTaskPanelGroupItem
   352                Set psLabel to "Toolbox"
   353                Set psImage to "Theme_16.ico"
   354                Procedure OnClick
   355                    Set peTaskPanelTheme to eTPT_Toolbox
   356                End_Procedure
   357            End_Object
   358            Object oToolboxWhidbey_Item is a cSigCJTaskPanelGroupItem
   359                Set psLabel to "Toolbox Whidbey"
   360                Set psImage to "Theme_16.ico"
   361                Procedure OnClick
   362                    Set peTaskPanelTheme to eTPT_ToolboxWhidbey
   363                End_Procedure
   364            End_Object
   365            Object oListView_Item is a cSigCJTaskPanelGroupItem
   366                Set psLabel to "ListView"
   367                Set psImage to "Theme_16.ico"
   368                Procedure OnClick
   369                    Set peTaskPanelTheme to eTPT_ListView
   370                End_Procedure
   371            End_Object
   372            Object oListViewOfficeXP_Item is a cSigCJTaskPanelGroupItem
   373                Set psLabel to "ListView Office XP"
   374                Set psImage to "Theme_16.ico"
   375                Procedure OnClick
   376                    Set peTaskPanelTheme to eTPT_ListOfficeXP
   377                End_Procedure
   378            End_Object
   379            Object oListViewOffice2003_Item is a cSigCJTaskPanelGroupItem
   380                Set psLabel to "ListView Office 2003"
   381                Set psImage to "Theme_16.ico"
   382                Procedure OnClick
   383                    Set peTaskPanelTheme to eTPT_ListOffice2003
   384                End_Procedure
   385            End_Object
   386            Object oShortcutBarOffice2003_Item is a cSigCJTaskPanelGroupItem
   387                Set psLabel to "Shortcut Bar Office 2003"
   388                Set psImage to "Theme_16.ico"
   389                Procedure OnClick
   390                    Set peTaskPanelTheme to eTPT_BarOffice2003
   391                End_Procedure
   392            End_Object
   393            Object oShortcutBarOffice2007_Item is a cSigCJTaskPanelGroupItem
   394                Set psLabel to "Shortcut Bar Office 2007"
   395                Set psImage to "Theme_16.ico"
   396                Procedure OnClick
   397                    #IF (SigCj_Codejock_Version < 150001) 
   398                        Set peTaskPanelTheme to eTPT_BarOffice2007
   399                    #ELSE    
   400                        Set peTaskPanelTheme to eTPT_Resource
   401                    #ENDIF 
   402                End_Procedure
   403            End_Object
   404        End_Object 
   405        Object oBehaviour_Group is a cSigCJTaskPanelGroup
   406            Set psLabel to "Change Behaviour"
   407            Set psImage to "WindowSidebar_16.ico"
   408            Object oBehaviour_Explorer_Item is a cSigCJTaskPanelGroupItem
   409                Set psLabel to "Windows Explorer"
   410                Set psImage to "WindowSidebar_16.ico"
   411                Procedure OnClick
   412                    Set peTaskPanelBehaviour to eTPB_BehaviourExplorer
   413                End_Procedure
   414            End_Object
   415            Object oBehaviour_List_Item is a cSigCJTaskPanelGroupItem
   416                Set psLabel to "Windows List Box"
   417                Set psImage to "WindowSidebar_16.ico"
   418                Procedure OnClick
   419                    Set peTaskPanelBehaviour to eTPB_BehaviourList
   420                End_Procedure
   421            End_Object
   422            Object oBehaviour_Toolbox_Item is a cSigCJTaskPanelGroupItem
   423                Set psLabel to "VS. NET Toolbox"
   424                Set psImage to "WindowSidebar_16.ico"
   425                Procedure OnClick
   426                    Set peTaskPanelBehaviour to eTPB_BehaviourToolbox
   427                End_Procedure
   428            End_Object
   429        End_Object
   430        
   431    End_Object
   432