main.dfm

East make Tray Icon in delphi

      Caption = 'Parameter &Info'
      OnExecute = File_New_ActionExecute
    end
    object Edit_Complete_Word_Action: TAction
      Category = 'Edit_Category'
      Caption = 'Complete W&ord'
      OnExecute = File_New_ActionExecute
    end
    object Insert_New_Class_Action: TAction
      Category = 'Insert_Category'
      Caption = '&New Class...'
      OnExecute = File_New_ActionExecute
    end
    object Insert_New_Form_Action: TAction
      Category = 'Insert_Category'
      Caption = 'New F&orm...'
      OnExecute = File_New_ActionExecute
    end
    object Insert_Resource_Action: TAction
      Category = 'Insert_Category'
      Caption = '&Resource'
      ShortCut = 16466
      OnExecute = File_New_ActionExecute
    end
    object Insert_Resource_Copy_Action: TAction
      Category = 'Insert_Category'
      Caption = 'Resource Copy...'
      OnExecute = File_New_ActionExecute
    end
    object Insert_File_As_Text_Action: TAction
      Category = 'Insert_Category'
      Caption = 'File As Text...'
      OnExecute = File_New_ActionExecute
    end
    object Insert_New_ATL_Object_Action: TAction
      Category = 'Insert_Category'
      Caption = 'New ATL Object...'
      ImageIndex = 48
      OnExecute = File_New_ActionExecute
    end
    object Project_Set_Active_Project_Action: TAction
      Category = 'Project_Category'
      Caption = 'Set Acti&ve Project'
      OnExecute = File_New_ActionExecute
    end
    object Project_Add_To_Project_Action: TAction
      Category = 'Project_Category'
      Caption = '&Add To Project'
      OnExecute = File_New_ActionExecute
    end
    object Project_Source_Control_Action: TAction
      Category = 'Project_Category'
      Caption = 'Source &Control'
      OnExecute = File_New_ActionExecute
    end
    object Project_DePendencies_Action: TAction
      Category = 'Project_Category'
      Caption = 'D&ePendencies...'
      OnExecute = File_New_ActionExecute
    end
    object Project_Settings_Action: TAction
      Category = 'Project_Category'
      Caption = '&Settings...'
      ShortCut = 32886
      OnExecute = File_New_ActionExecute
    end
    object Project_Export_Makefile_Action: TAction
      Category = 'Project_Category'
      Caption = 'Export &Makefile'
      OnExecute = File_New_ActionExecute
    end
    object Project_Insert_Project_into_Workspace_Action: TAction
      Category = 'Project_Category'
      Caption = '&Insert Project into Workspace'
      OnExecute = File_New_ActionExecute
    end
    object Build_Compile_Action: TAction
      Category = 'Build_Category'
      Caption = '&Compile...'
      ImageIndex = 23
      ShortCut = 16502
      OnExecute = File_New_ActionExecute
    end
    object Build_Build_Action: TAction
      Category = 'Build_Category'
      Caption = '&Build'
      ImageIndex = 24
      ShortCut = 16504
      OnExecute = File_New_ActionExecute
    end
    object Build_Rebuild_All_Action: TAction
      Category = 'Build_Category'
      Caption = '&Rebuild All'
      OnExecute = File_New_ActionExecute
    end
    object Build_Batch_Build_Action: TAction
      Category = 'Build_Category'
      Caption = 'Batch B&uild...'
      OnExecute = File_New_ActionExecute
    end
    object Build_Clean_Action: TAction
      Category = 'Build_Category'
      Caption = 'Cl&ean'
      OnExecute = File_New_ActionExecute
    end
    object Build_Start_Debug_Action: TAction
      Category = 'Build_Category'
      Caption = 'Start &Debug'
      OnExecute = File_New_ActionExecute
    end
    object Build_Debugger_Remote_Connection_Action: TAction
      Category = 'Build_Category'
      Caption = 'Debugger Remote Co&nnection...'
      OnExecute = File_New_ActionExecute
    end
    object Build_Execute_Action: TAction
      Category = 'Build_Category'
      Caption = 'E&xecute'
      ImageIndex = 26
      ShortCut = 16500
      OnExecute = File_New_ActionExecute
    end
    object Build_Set_Active_Configuration_Action: TAction
      Category = 'Build_Category'
      Caption = 'Set Active C&onfiguration...'
      OnExecute = File_New_ActionExecute
    end
    object Build_Configurations_Action: TAction
      Category = 'Build_Category'
      Caption = 'Con&figurations...'
      OnExecute = File_New_ActionExecute
    end
    object Build_Profile_Action: TAction
      Category = 'Build_Category'
      Caption = '&Profile...'
      OnExecute = File_New_ActionExecute
    end
    object Tools_Source_Browser_Action: TAction
      Category = 'Tools_Category'
      Caption = 'Source Bro&wser...'
      ShortCut = 32891
      OnExecute = File_New_ActionExecute
    end
    object Tools_Close_Source_Browser_File_Action: TAction
      Category = 'Tools_Category'
      Caption = 'Close Source Browser &File'
      OnExecute = File_New_ActionExecute
    end
    object Tools_Visual_Component_Manager_Action: TAction
      Category = 'Tools_Category'
      Caption = 'Visual Component M&anager'
      ImageIndex = 49
      OnExecute = File_New_ActionExecute
    end
    object Tools_Register_Control_Action: TAction
      Category = 'Tools_Category'
      Caption = 'Re&gister Control'
      ImageIndex = 50
      OnExecute = File_New_ActionExecute
    end
    object Tools_Error_Lookup_Action: TAction
      Category = 'Tools_Category'
      Caption = 'Error Loo&kup'
      ImageIndex = 51
      OnExecute = File_New_ActionExecute
    end
    object Tools_ActiveX_Control_Test_Container_Action: TAction
      Category = 'Tools_Category'
      Caption = 'Activ&eX Control Test Container'
      ImageIndex = 52
      OnExecute = File_New_ActionExecute
    end
    object Tools_OLE_COM_Object_Viewer_Action: TAction
      Category = 'Tools_Category'
      Caption = 'OLE/COM Object &Viewer'
      ImageIndex = 53
      OnExecute = File_New_ActionExecute
    end
    object Tools_Spy_Action: TAction
      Category = 'Tools_Category'
      Caption = 'S&py++'
      ImageIndex = 54
      OnExecute = File_New_ActionExecute
    end
    object Tools_MFC_Tracer_Action: TAction
      Category = 'Tools_Category'
      Caption = 'MFC &Tracer'
      ImageIndex = 55
      OnExecute = File_New_ActionExecute
    end
    object Tools_Customize_Action: TAction
      Category = 'Tools_Category'
      Caption = '&Customize...'
      OnExecute = File_New_ActionExecute
    end
    object Tools_Options_Action: TAction
      Category = 'Tools_Category'
      Caption = '&Options...'
      OnExecute = File_New_ActionExecute
    end
    object Tools_Macro_Action: TAction
      Category = 'Tools_Category'
      Caption = '&Macro...'
      ImageIndex = 56
      OnExecute = File_New_ActionExecute
    end
    object Tools_Record_Quick_Macro_Action: TAction
      Category = 'Tools_Category'
      Caption = '&Record Quick Macro'
      ShortCut = 24658
      OnExecute = File_New_ActionExecute
    end
    object Tools_Play_Quick_Macro_Action: TAction
      Category = 'Tools_Category'
      Caption = 'P&lay Quick Macro'
      ShortCut = 24656
      OnExecute = File_New_ActionExecute
    end
    object Window_New_Window_Action: TAction
      Category = 'Window_Category'
      Caption = '&New Window'
      ImageIndex = 57
      OnExecute = File_New_ActionExecute
    end
    object Window_Spilt_Action: TAction
      Category = 'Window_Category'
      Caption = 'S&pilt'
      ImageIndex = 58
      OnExecute = File_New_ActionExecute
    end
    object Window_Docking_View_Action: TAction
      Category = 'Window_Category'
      Caption = '&Docking_View'
      ShortCut = 32885
      OnExecute = File_New_ActionExecute
    end
    object Window_Close_Action: TAction
      Category = 'Window_Category'
      Caption = 'Cl&ose'
      ImageIndex = 59
      OnExecute = Window_Close_ActionExecute
    end
    object Window_Close_All_Action: TAction
      Category = 'Window_Category'
      Caption = 'Close Al&l'
      OnExecute = Window_Close_All_ActionExecute
    end
    object Window_Next_Action: TAction
      Category = 'Window_Category'
      Caption = 'Ne&xt'
      ImageIndex = 60
      OnExecute = Window_Next_ActionExecute
    end
    object Window_Previous_Action: TAction
      Category = 'Window_Category'
      Caption = 'Pre&vious'
      ImageIndex = 61
      OnExecute = Window_Previous_ActionExecute
    end
    object Window_Cascade_Action: TAction
      Category = 'Window_Category'
      Caption = '&Cascade'
      ImageIndex = 62
      OnExecute = Window_Cascade_ActionExecute
    end
    object Window_Tile_Horizontally_Action: TAction
      Category = 'Window_Category'
      Caption = 'Tile &Horizontally'
      ImageIndex = 63
      OnExecute = Window_Tile_Horizontally_ActionExecute
    end
    object Window_Tile_Vertically_Action: TAction
      Category = 'Window_Category'
      Caption = '&Tile Vertically'
      ImageIndex = 64
      OnExecute = Window_Tile_Vertically_ActionExecute
    end
    object Window_Windows_Action: TAction
      Category = 'Window_Category'
      Caption = '&Windows'
      ImageIndex = 65
      OnExecute = File_New_ActionExecute
    end
    object Help_Contents_Action: TAction
      Category = 'Help_Category'
      Caption = '&Contents...'
      OnExecute = File_New_ActionExecute
    end
    object Help_Search_Action: TAction
      Category = 'Help_Category'
      Caption = '&Search...'
      ImageIndex = 14
      OnExecute = File_New_ActionExecute
    end
    object Help_Index_Action: TAction
      Category = 'Help_Category'
      Caption = '&Index...'
      OnExecute = File_New_ActionExecute
    end
    object Help_Use_Extension_Help_Action: TAction
      Category = 'Help_Category'
      Caption = '&Use Extension Help'
      OnExecute = File_New_ActionExecute
    end
    object Help_Tip_of_the_Day_Action: TAction
      Category = 'Help_Category'
      Caption = 'Ti&p of the Day...'
      OnExecute = File_New_ActionExecute
    end
    object Help_Keyboard_Map_Action: TAction
      Category = 'Help_Category'
      Caption = '&Keyboard Map...'
      OnExecute = File_New_ActionExecute
    end
    object Help_Technical_Support_Action: TAction
      Category = 'Help_Category'
      Caption = '&Technical Support'
      OnExecute = File_New_ActionExecute
    end
    object Help_Microsofr_on_the_Web_Action: TAction
      Category = 'Help_Category'
      Caption = 'Microsofr on the &Web'
      OnExecute = File_New_ActionExecute
    end
    object Help_About_Visual_Cpp_Action: TAction
      Category = 'Help_Category'
      Caption = '&About Visual C++'
      ImageIndex = 47
      OnExecute = File_New_ActionExecute
    end
    object Debug_Go_Action: TAction
      Category = 'Debug_Category'
      Caption = '&Go'
      ImageIndex = 27
      ShortCut = 120
      OnExecute = File_New_ActionExecute
    end
    object Debug_Restart_Action: TAction
      Category = 'Debug_Category'
      Caption = '&Restart'
      ImageIndex = 74
      ShortCut = 16497
      OnExecute = File_New_ActionExecute
    end
    object Debug_Stop_Debugging_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Stop &Debugging'
      ImageIndex = 30
      ShortCut = 8308
      OnExecute = File_New_ActionExecute
    end
    object Debug_Break_Action: TAction
      Category = 'Debug_Category'
      Caption = '&Break'
      ImageIndex = 31
      OnExecute = File_New_ActionExecute
    end
    object Debug_Apply_Code_Changes_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Appl&y Code Changes'
      ImageIndex = 32
      ShortCut = 32889
      OnExecute = File_New_ActionExecute
    end
    object Debug_Step_Into_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Step &Into'
      ImageIndex = 34
      ShortCut = 118
      OnExecute = File_New_ActionExecute
    end
    object Debug_Step_Over_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Step &Over'
      ImageIndex = 35
      ShortCut = 119
      OnExecute = File_New_ActionExecute
    end
    object Debug_Step_Out_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Step O&ut'
      ImageIndex = 36
      ShortCut = 8314
      OnExecute = File_New_ActionExecute
    end
    object Debug_Run_to_Cursor_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Run to &Cursor'
      ImageIndex = 37
      ShortCut = 16505
      OnExecute = File_New_ActionExecute
    end
    object Debug_Step_Into_Specific_Function_Action: TAction
      Category = 'Debug_Category'
      Caption = 'Ste&p Into Specific Function'
      OnExecute = File_New_ActionExecute
    end
    object Debug_Exceptions_Action: TAction
      Category = 'Debug_Category'
      Caption = '&Exceptions...'
      OnExecute = File_New_ActionExecute