[Tween-svn] [1588] SplitContainer4_ResizeでDistanceにマイナス値設定して例外発生するバグ修正

Back to archive index

svnno****@sourc***** svnno****@sourc*****
2011年 9月 12日 (月) 13:39:42 JST


Revision: 1588
          http://sourceforge.jp/projects/tween/svn/view?view=rev&revision=1588
Author:   kiri_feather
Date:     2011-09-12 13:39:42 +0900 (Mon, 12 Sep 2011)

Log Message:
-----------
SplitContainer4_ResizeでDistanceにマイナス値設定して例外発生するバグ修正

Modified Paths:
--------------
    trunk/Tween/Tween.vb


-------------- next part --------------
Modified: trunk/Tween/Tween.vb
===================================================================
--- trunk/Tween/Tween.vb	2011-09-12 04:34:41 UTC (rev 1587)
+++ trunk/Tween/Tween.vb	2011-09-12 04:39:42 UTC (rev 1588)
@@ -10637,10 +10637,13 @@
 
     Private Sub SplitContainer4_Resize(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SplitContainer4.Resize
         If Me.WindowState = FormWindowState.Minimized Then Exit Sub
-        If SplitContainer4.Height < SplitContainer4.SplitterWidth + SplitContainer4.Panel2MinSize + SplitContainer4.SplitterDistance Then
+        If SplitContainer4.Panel2Collapsed Then Exit Sub
+        If SplitContainer4.Height < SplitContainer4.SplitterWidth + SplitContainer4.Panel2MinSize + SplitContainer4.SplitterDistance AndAlso
+            SplitContainer4.Height - SplitContainer4.SplitterWidth - SplitContainer4.Panel2MinSize > 0 Then
             SplitContainer4.SplitterDistance = SplitContainer4.Height - SplitContainer4.SplitterWidth - SplitContainer4.Panel2MinSize
         End If
-        If SplitContainer4.Panel2.Height > 90 Then
+        If SplitContainer4.Panel2.Height > 90 AndAlso
+            SplitContainer4.Height - SplitContainer4.SplitterWidth - 90 > 0 Then
             SplitContainer4.SplitterDistance = SplitContainer4.Height - SplitContainer4.SplitterWidth - 90
         End If
     End Sub



Tween-svn メーリングリストの案内
Back to archive index