btnDuplicate added

diff --git a/bottleclient/SettingForm.dfm b/bottleclient/SettingForm.dfm
index e7af866..0340148 100755 (executable)
--- a/bottleclient/SettingForm.dfm
+++ b/bottleclient/SettingForm.dfm
@@ -36,7 +36,7 @@ object frmSetting: TfrmSetting
     Top = 32
     Width = 440
     Height = 291
-    ActivePage = tstPlayTime
+    ActivePage = tstRule
     Anchors = [akLeft, akTop, akRight, akBottom]
     MultiLine = True
     TabOrder = 0
@@ -423,31 +423,37 @@ object frmSetting: TfrmSetting
         Width = 421
         Height = 260
         TabOrder = 0
+        DesignSize = (
+          421
+          260)
         inherited lstRules: TCheckListBox
-          Width = 348
+          Width = 345
         end
         inherited btnDelete: TButton
-          Left = 353
+          Left = 350
           Hint = #12523#12540#12523#12434#21066#38500
         end
         inherited btnAdd: TButton
-          Left = 353
+          Left = 350
           Hint = #26032#12375#12356#12523#12540#12523#12434#36861#21152
           Caption = #36861#21152'(&I)'
         end
         inherited btnDown: TButton
-          Left = 353
+          Left = 350
           Hint = #19979#12395#31227#21205
           Caption = #19979#12408'(&O)'
         end
         inherited btnUp: TButton
-          Left = 353
+          Left = 350
           Hint = #19978#12395#31227#21205
         end
         inherited btnEdit: TButton
-          Left = 353
+          Left = 350
           Hint = #29694#22312#12398#12523#12540#12523#12434#32232#38598
         end
+        inherited btnDuplicate: TButton
+          Left = 350
+        end
       end
     end
     object tstPlayTime: TTabSheet