瀏覽代碼

* 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;