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