Explorar o código

* ValidateContainer should call ValidateInsert

git-svn-id: trunk@12935 -
michael %!s(int64=16) %!d(string=hai) anos
pai
achega
2abc422035
Modificáronse 1 ficheiros con 1 adicións e 0 borrados
  1. 1 0
      rtl/objpas/classes/compon.inc

+ 1 - 0
rtl/objpas/classes/compon.inc

@@ -388,6 +388,7 @@ end;
 Procedure TComponent.ValidateContainer(AComponent: TComponent);
 
 begin
+  AComponent.ValidateInsert(Self);
 end;