Index: trunk/TestCase/SimpleTestCase/DelegateTest.ab
===================================================================
--- trunk/TestCase/SimpleTestCase/DelegateTest.ab	(revision 343)
+++ trunk/TestCase/SimpleTestCase/DelegateTest.ab	(revision 352)
@@ -15,4 +15,5 @@
 	proc5Flag As Boolean
 	proc6Flag As Boolean
+	proc8Flag As Boolean
 
 	Static staticProc1Flag = False As Boolean
@@ -30,7 +31,8 @@
 		proc5Flag = False
 		proc6Flag = False
+		proc8Flag = True
 	End Sub
 	Function CheckFlags() As Boolean
-		Return proc1Flag and proc2Flag and proc3Flag and proc4Flag and proc5Flag and proc6Flag
+		Return proc1Flag and proc2Flag and proc3Flag and proc4Flag and proc5Flag and proc6Flag and proc8Flag
 	End Function
 
@@ -62,4 +64,8 @@
 		Return "Proc7 result[" + str + "]"
 	End Function
+
+	Sub Proc8( a As String )
+		proc8Flag = False
+	End Sub
 End Class
 
@@ -72,4 +78,6 @@
 	dg4 += AddressOf(testObj.Proc5)
 	dg4 += AddressOf(testObj.Proc6)
+	dg4 += AddressOf(testObj.Proc8)
+	dg4 -= AddressOf(testObj.Proc8)
 
 	dg1()
Index: trunk/TestCase/SimpleTestCase/SimpleTestCase.idx
===================================================================
--- trunk/TestCase/SimpleTestCase/SimpleTestCase.idx	(revision 343)
+++ trunk/TestCase/SimpleTestCase/SimpleTestCase.idx	(revision 352)
@@ -26,6 +26,2 @@
 #include "DelegateTest.ab"
 _ClearNamespaceImported
-
-'リソースファイル
-#include "resource.ab"
-#resource "SimpleTestCase.rc"
Index: trunk/TestCase/SimpleTestCase/SimpleTestCase.pj
===================================================================
--- trunk/TestCase/SimpleTestCase/SimpleTestCase.pj	(revision 343)
+++ trunk/TestCase/SimpleTestCase/SimpleTestCase.pj	(revision 352)
@@ -7,5 +7,5 @@
 #NAME=SimpleTestCase
 
-#PLATFORM=32
+#PLATFORM=64
 
 #USEWINDOW=0
@@ -23,5 +23,5 @@
 #DEBUG_EXE_PATH=
 
-#RESOURCE=SimpleTestCase.rc
+#RESOURCE=0
 
 #SOURCE