ハ゛タ55以前からアップデートすると、レスポップアップ位置の左右が逆転する不具合の修正

[gikonavigoeson/gikonavi.git] / ToolBarUtil.pas

diff --git a/ToolBarUtil.pas b/ToolBarUtil.pas
index 3640177..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
@@ -63,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',
@@ -122,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