Module oShortCutBar_Container.pkg

     1Use DfAllEnt.pkg
     2Use cSigCJDockingPane_Container.pkg
     3Use cSigCjShortcutBar.pkg
     4
     5Define C_Bar_OrderSamples 	   for 1
     6Define C_Bar_GeneralComponents for 2
     7Define C_Bar_ReportControl 	   for 3
     8Define C_Bar_CalendarControl   for 4
     9Define C_Bar_TreeViewControl   for 5
    10
    11Object oShortCutBar_Container is a cSigCJDockingPane_Container
    12    Set Border_Style to Border_None
    13    
    14    Object oSigCjShortCutBar is a cSigCjShortCutBar
    15        Set size to 100 100
    16        Set peAnchors to anAll
    17
    18        Procedure Setup_ShortcutBar
    19            Handle hoBar
    20    
    21            Send Add_Bar of ghoSigCj_ShortcutBar C_Bar_OrderSamples "Order Samples" "Order.ico"
    22    			Send Add_Item of ghoSigCj_ShortcutBar C_Bar_OrderSamples "Inventory Item View"     "Order.ico" "msg_Activate_oInventoryView"   "oClientArea"
    23    			Send Add_Item of ghoSigCj_ShortcutBar C_Bar_OrderSamples "Vendor Entry View"       "Order.ico" "msg_Activate_oVendorView"      "oClientArea"
    24    			Send Add_Item of ghoSigCj_ShortcutBar C_Bar_OrderSamples "Sales Person Entry View" "Order.ico" "msg_Activate_oSalesPersonView" "oClientArea"
    25    			Send Add_Item of ghoSigCj_ShortcutBar C_Bar_OrderSamples "Customer Entry View"     "Order.ico" "msg_Activate_oCustomerView"    "oClientArea"
    26    			Send Add_Item of ghoSigCj_ShortcutBar C_Bar_OrderSamples "Order Entry"             "Order.ico" "msg_Activate_oOrderEntryView"  "oClientArea"
    27    
    28            Send Add_Bar of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "General Components" "Tasks_16.ico"
    29				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "Push Buttons"          "Tasks_16.ico" "msg_Activate_oSigCJPushButtonDemo_View"    "oClientArea"
    30				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "Tri-State Checkbox"    "Tasks_16.ico" "msg_Activate_oSigCJCheckBoxDemo_View"      "oClientArea"
    31				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "Message Dialogs"       "Tasks_16.ico" "msg_Activate_oSigCJTaskDialogDemo_View"    "oClientArea"
    32				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "Popup Calendar"        "Tasks_16.ico" "msg_Activate_oSigCJMonthCalendarDemo_View" "oClientArea"
    33				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "Popup Message Control" "Tasks_16.ico" "msg_Activate_oSigCJPopupControlDemo_View"  "oClientArea"
    34				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_GeneralComponents "Markup Control"        "Tasks_16.ico" "msg_Activate_oSIGCJLabelControlDemo_View"  "oClientArea"
    35            
    36            Send Add_Bar of ghoSigCj_ShortcutBar C_Bar_ReportControl "Report Control" "ActionCopy.ico"
    37				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_ReportControl "Text File"      "ActionCopy.ico" "msg_Activate_SigCjReportControlDemo_Text_View"  "oClientArea"
    38				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_ReportControl "Standard Table" "ActionCopy.ico" "msg_Activate_SigCjReportControlDemo_Table_View" "oClientArea"
    39				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_ReportControl "SQL Table"      "ActionCopy.ico" "msg_Activate_SigCjReportControlDemo_SQL_View"   "oClientArea"
    40				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_ReportControl "Tree View"      "ActionCopy.ico" "msg_Activate_oSigCJReportControlDemo_TreeView"  "oClientArea"
    41				
    42            Send Add_Bar of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Calendar Control" "ActionCalendar.ico"
    43				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Special Dates"      "ActionCalendar.ico" "msg_Activate_oSigCJCalendarDemo_Special_Dates_View" "oClientArea"
    44				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Categories"         "ActionCalendar.ico" "msg_Activate_oSigCjCalendarDemo_Categories_View"    "oClientArea"
    45				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Calendar Resources" "ActionCalendar.ico" "msg_Activate_oCalendar_Resources"                   "oClientArea"
    46                Send Add_Item of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Standard Calendar"  "ActionCalendar.ico" "msg_Activate_oSigCJCalendarDemo_Standard_View"      "oClientArea"
    47				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Bespoke Calendar"   "ActionCalendar.ico" "msg_Activate_oSigCJCalendarDemo_Bespoke_View"       "oClientArea"
    48				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_CalendarControl "Resource Calendar"  "ActionCalendar.ico" "msg_Activate_oSigCJCalendarDemo_Resource_View"      "oClientArea"
    49
    50            Send Add_Bar of ghoSigCj_ShortcutBar C_Bar_TreeViewControl "Calendar Control" "WindowSidebar_16.ico"
    51				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_TreeViewControl "Simple TreeView"        "WindowSidebar_16.ico" "msg_Activate_oSigCJTreeViewDemo_Simple_View"       "oClientArea"
    52				Send Add_Item of ghoSigCj_ShortcutBar C_Bar_TreeViewControl "Sales Orders TreeVeiw"  "WindowSidebar_16.ico" "msg_Activate_oSigCJTreeViewDemo_SalesOrders_View"  "oClientArea"
    53				      
    54            Get Find_Bar C_Bar_OrderSamples to hoBar
    55            Send Color_Bar of hoBar clTeal
    56            
    57            Get Find_Bar C_Bar_GeneralComponents to hoBar
    58            Send Color_Bar of hoBar clOlive
    59        End_Procedure
    60        
    61        //Works any time so Colors can be set and reset as required
    62//        Procedure Color_Bars
    63//            Handle hoBar
    64//            
    65//            Get Find_Bar C_Bar_OrderSamples to hoBar
    66//            Send Color_Bar of hoBar clTeal
    67//            
    68//            Get Find_Bar C_Bar_GeneralComponents to hoBar
    69//            Send Color_Bar of hoBar clOlive
    70//        End_Procedure
    71    End_Object
    72
    73End_Object