(none)

diff --git a/ThreadControl.pas b/ThreadControl.pas
index c6ae3d4..83f3152 100644 (file)
--- a/ThreadControl.pas
+++ b/ThreadControl.pas
@@ -59,7 +59,9 @@ begin
        for i := 0 to FThreadList.Count - 1 do begin
                TDownloadThread(FThreadList[i]).Free;
        end;
+    FThreadList.Capacity := FThreadList.Count;
        FThreadList.Free;
+    FItemList.Clear;
        FItemList.Free;
        inherited;
 end;

diff --git a/gikoNavi.dpr b/gikoNavi.dpr
index 05912be..e0ed1e7 100644 (file)
--- a/gikoNavi.dpr
+++ b/gikoNavi.dpr
@@ -3,7 +3,7 @@ program gikoNavi;
 {%ToDo 'gikoNavi.todo'}
 
 uses
-  //MemCheck in 'MemCheck.pas',
+//  MemCheck in 'MemCheck.pas', {'MemCheckStackTrace'\82ð\8fð\8c\8f\82É\92Ç\89Á\81B}
   Windows,
   SysUtils,
   Forms,