Преглед изворни кода

Reference removed also of fDependencyOrder, because had occured error of "invalid pointer operation" on destroy do IOC.

Diogo Aires пре 11 месеци
родитељ
комит
f1c2799515
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      Quick.IOC.pas

+ 3 - 0
Quick.IOC.pas

@@ -634,10 +634,13 @@ begin
   begin
     if (vValue.IntfInfo = aTypeInfo) and (vValue.Name = aName) then
     begin
+      if fDependencyOrder.Contains(vValue) then
+        fDependencyOrder.Remove(vValue);
       fDependencies.Remove(key);
       vValue.Free;
     end;
   end;
+
 end;
 
 { TIocResolver }