1.55.0.697

[gikonavigoeson/gikonavi.git] / ToolBarUtil.pas

diff --git a/ToolBarUtil.pas b/ToolBarUtil.pas
index 743477b..e743c73 100644 (file)
--- a/ToolBarUtil.pas
+++ b/ToolBarUtil.pas
@@ -4,8 +4,7 @@ interface
 
 uses
        Windows, Messages, SysUtils, Classes, Controls,
-       StdCtrls, ExtCtrls, ComCtrls, ActnList, IniFiles,
-       GikoSystem, MojuUtils;
+       StdCtrls, ExtCtrls, ComCtrls, ActnList;
 
 const
        //\95W\8f\80\83c\81[\83\8b\83o\81[\83f\83t\83H\83\8b\83g
@@ -22,13 +21,15 @@ const
                                                                                                                                                                        'MuteAction',
                                                                                     'BeLogInOutAction');
        //\83\8a\83X\83g\83c\81[\83\8b\83o\81[\83f\83t\83H\83\8b\83g
-       DEF_LIST:       array[0..16] of string = ('ListNumberVisibleAction',
+       DEF_LIST:       array[0..18] of string = ('ListNumberVisibleAction',
                                                                                                                                                                        'IconStyle',
                                                                                                                                                                        'UpFolderAction',
                                                                                                                                                                        '',
                                                                                                                                                                        'AllItemAction',
                                                                                                                                                                        'LogItemAction',
                                                                                                                                                                        'NewItemAction',
+                                                                                                                                                                       'LiveItemAction',
+                                                                                                                                                                       'ArchiveItemAction',
                                                                                                                                                                        'SelectItemAction',
                                                                                                                                                                        '',
                                                                                                                                                                        'ThreadEditorAction',
@@ -61,12 +62,14 @@ const
 
 
        /// \83{\83^\83\93\83X\83^\83C\83\8b\82ª"tbsCheck"\83{\83^\83\93\82Ì\83A\83N\83V\83\87\83\93
-       CHECK_STYLE:   array[0..35] of string = ('CabinetVisibleAction',
+       CHECK_STYLE:   array[0..37] of string = ('CabinetVisibleAction',
                                                                                     'MuteAction',
                                                                                                                                                                        'ArrangeAction',
                                                                                                                                                                        'AllItemAction',
                                                                                                                                                                        'LogItemAction',
                                                                                                                                                                        'NewItemAction',
+                                                                                                                                                                       'LiveItemAction',
+                                                                                                                                                                       'ArchiveItemAction',
                                                                                                                                                                        'SelectItemAction',
 
                                                                                                                                                                        'StdToolBarVisibleAction',
@@ -120,8 +123,12 @@ const
        procedure ReadToolBarSetting(ActionList: TActionList; ToolBar: TToolBar);
        procedure SaveToolBarSetting(ToolBar: TToolBar);
        procedure MakeDefaultINIFile();
+
 implementation
 
+uses
+       IniFiles,       GikoSystem, MojuUtils;
+
 function ConvertToolButton( setting : string ) : string;
 begin