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

* ValidateContainer should call ValidateInsert

git-svn-id: trunk@12935 -
michael пре 16 година
родитељ
комит
2abc422035
1 измењених фајлова са 1 додато и 0 уклоњено
  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;