2
0
Эх сурвалжийг харах

* fixed setting wrong component state. csDesignInstance and csInline were set inversed.

git-svn-id: trunk@13916 -
ivost 16 жил өмнө
parent
commit
0c725eae43

+ 4 - 4
rtl/objpas/classes/compon.inc

@@ -301,18 +301,18 @@ Procedure TComponent.SetDesignInstance(Value: Boolean);
 
 begin
   If Value then
-    Exclude(FComponentState, csDesignInstance)
+    Include(FComponentState, csDesignInstance)
   else
-    Include(FComponentState, csDesignInstance);
+    Exclude(FComponentState, csDesignInstance);
 end;
 
 Procedure TComponent.SetInline(Value: Boolean);
 
 begin
   If Value then
-    Exclude(FComponentState, csInline)
+    Include(FComponentState, csInline)
   else
-    Include(FComponentState, csInline);
+    Exclude(FComponentState, csInline);
 end;