OSDN Git Service

更新間隔の最低値を30秒から15秒に(テスト実装)
authorsyo68k <syo68k@users.sourceforge.jp>
Sun, 2 May 2010 08:10:37 +0000 (08:10 +0000)
committerKimura Youichi <kim.upsilon@bucyou.net>
Sat, 18 Feb 2012 14:11:54 +0000 (23:11 +0900)
git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@233 e39ad16e-3079-482e-bb30-4b4d378143b6

Tween/My Project/Resources.resx
Tween/Setting.vb
Tween/Tween.vb

index 0f53d87..14641fe 100644 (file)
     <value>削除成功</value>
   </data>
   <data name="DMPeriod_ValidatingText1" xml:space="preserve">
-    <value>更新間隔には数値(0または30~6000)を指定してください。</value>
+    <value>更新間隔には数値(0または15~6000)を指定してください。</value>
   </data>
   <data name="DMPeriod_ValidatingText2" xml:space="preserve">
-    <value>更新間隔には数値(0または30~6000)を指定してください。</value>
+    <value>更新間隔には数値(0または15~6000)を指定してください。</value>
   </data>
   <data name="DoTabSearchText1" xml:space="preserve">
     <value>正規表現パターンが間違っています。</value>
     <value>ポート番号には0~65535を指定してください。</value>
   </data>
   <data name="TimelinePeriod_ValidatingText1" xml:space="preserve">
-    <value>更新間隔には数値(0または30~6000)を指定してください。</value>
+    <value>更新間隔には数値(0または15~6000)を指定してください。</value>
   </data>
   <data name="TimelinePeriod_ValidatingText2" xml:space="preserve">
-    <value>更新間隔には数値(0または30~6000)を指定してください。</value>
+    <value>更新間隔には数値(0または15~6000)を指定してください。</value>
   </data>
   <data name="TimerDM_TickText1" xml:space="preserve">
     <value>DMRcv更新中...</value>
index 984b4c3..7d97176 100644 (file)
@@ -553,7 +553,7 @@ Public Class Setting
             Exit Sub
         End Try
 
-        If prd <> 0 AndAlso (prd < 30 OrElse prd > 6000) Then
+        If prd <> 0 AndAlso (prd < 15 OrElse prd > 6000) Then
             MessageBox.Show(My.Resources.TimelinePeriod_ValidatingText2)
             e.Cancel = True
         End If
@@ -569,7 +569,7 @@ Public Class Setting
             Exit Sub
         End Try
 
-        If prd <> 0 AndAlso (prd < 30 OrElse prd > 6000) Then
+        If prd <> 0 AndAlso (prd < 15 OrElse prd > 6000) Then
             MessageBox.Show(My.Resources.TimelinePeriod_ValidatingText2)
             e.Cancel = True
         End If
@@ -617,7 +617,7 @@ Public Class Setting
             Exit Sub
         End Try
 
-        If prd <> 0 AndAlso (prd < 30 OrElse prd > 6000) Then
+        If prd <> 0 AndAlso (prd < 15 OrElse prd > 6000) Then
             MessageBox.Show(My.Resources.DMPeriod_ValidatingText2)
             e.Cancel = True
         End If
@@ -633,7 +633,7 @@ Public Class Setting
             Exit Sub
         End Try
 
-        If prd <> 0 AndAlso (prd < 30 OrElse prd > 6000) Then
+        If prd <> 0 AndAlso (prd < 15 OrElse prd > 6000) Then
             MessageBox.Show(My.Resources.DMPeriod_ValidatingText2)
             e.Cancel = True
         End If
@@ -649,7 +649,7 @@ Public Class Setting
             Exit Sub
         End Try
 
-        If prd <> 0 AndAlso (prd < 30 OrElse prd > 6000) Then
+        If prd <> 0 AndAlso (prd < 15 OrElse prd > 6000) Then
             MessageBox.Show(My.Resources.DMPeriod_ValidatingText2)
             e.Cancel = True
         End If
index 78dcf5c..5693d93 100644 (file)
@@ -559,11 +559,11 @@ Public Class TweenMain
         SettingDialog.MaxPostNum = _cfgCommon.MaxPostNum
         '不正値チェック
         If Not My.Application.CommandLineArgs.Contains("nolimit") Then
-            If SettingDialog.TimelinePeriodInt < 30 AndAlso SettingDialog.TimelinePeriodInt > 0 Then SettingDialog.TimelinePeriodInt = 30
-            If SettingDialog.ReplyPeriodInt < 30 AndAlso SettingDialog.ReplyPeriodInt > 0 Then SettingDialog.ReplyPeriodInt = 30
-            If SettingDialog.DMPeriodInt < 30 AndAlso SettingDialog.DMPeriodInt > 0 Then SettingDialog.DMPeriodInt = 30
-            If SettingDialog.PubSearchPeriodInt < 30 AndAlso SettingDialog.PubSearchPeriodInt > 0 Then SettingDialog.PubSearchPeriodInt = 30
-            If SettingDialog.ListsPeriodInt < 30 AndAlso SettingDialog.ListsPeriodInt > 0 Then SettingDialog.ListsPeriodInt = 30
+            If SettingDialog.TimelinePeriodInt < 15 AndAlso SettingDialog.TimelinePeriodInt > 0 Then SettingDialog.TimelinePeriodInt = 15
+            If SettingDialog.ReplyPeriodInt < 15 AndAlso SettingDialog.ReplyPeriodInt > 0 Then SettingDialog.ReplyPeriodInt = 15
+            If SettingDialog.DMPeriodInt < 15 AndAlso SettingDialog.DMPeriodInt > 0 Then SettingDialog.DMPeriodInt = 15
+            If SettingDialog.PubSearchPeriodInt < 15 AndAlso SettingDialog.PubSearchPeriodInt > 0 Then SettingDialog.PubSearchPeriodInt = 15
+            If SettingDialog.ListsPeriodInt < 15 AndAlso SettingDialog.ListsPeriodInt > 0 Then SettingDialog.ListsPeriodInt = 15
         End If
         '起動時読み込みページ数
         'SettingDialog.ReadPages = _cfgCommon.ReadPages