デバッグの為、Image.FromFileに失敗したときの一時ファイルをTweenのディレクトリに保存するコードを追加。

git-svn-id: http://svn.sourceforge.jp/svnroot/tween/trunk@843 e39ad16e-3079-482e-bb30-4b4d378143b6

diff --git a/Tween/ImageCacheDictionary.vb b/Tween/ImageCacheDictionary.vb
index 6188122..34bd38a 100644 (file)
--- a/Tween/ImageCacheDictionary.vb
+++ b/Tween/ImageCacheDictionary.vb
@@ -181,7 +181,8 @@ Public Class ImageCacheDictionary
                     Try
                         Me.img = Image.FromFile(Me.tmpFilePath)
                     Catch ex As OutOfMemoryException
-                        File.Copy(Me.tmpFilePath, Path.Combine(Path.Combine(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory), "TweenCache"), Path.GetFileName(Me.tmpFilePath)))
+                        Dim filePath As String = Path.Combine(Application.StartupPath, Path.GetFileName(Me.tmpFilePath))
+                        File.Copy(Me.tmpFilePath, filePath)
                         Throw ex
                     End Try
                 End If

diff --git a/Tween/Tween.vb b/Tween/Tween.vb
index 7fab3e8..9e19ada 100644 (file)
--- a/Tween/Tween.vb
+++ b/Tween/Tween.vb
@@ -981,7 +981,7 @@ Public Class TweenMain
         End If
 
         'アイコンリスト作成
-        TIconDic = New ImageCacheDictionary(50)
+        TIconDic = New ImageCacheDictionary(3000)
 
         tw.DetailIcon = TIconDic