From: h677 <h677>
Date: Tue, 30 Mar 2004 14:18:58 +0000 (+0000)
Subject: (none)
X-Git-Tag: v1_64_1_820~1343
X-Git-Url: http://git.osdn.net/view?a=commitdiff_plain;h=1b2959cad53beb8917583092d06901b855770190;p=gikonavigoeson%2Fgikonavi.git

(none)
---

diff --git a/ThreadControl.pas b/ThreadControl.pas
index c6ae3d4..83f3152 100644
--- 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
--- 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'‚ððŒ‚ɒljÁB}
   Windows,
   SysUtils,
   Forms,