* Applied bugfix for bug #1330

fcl/inc/compon.inc

@@ -261,7 +261,7 @@ begin
   else
     Exclude(FComponentSTate,csDesigning);
   if Assigned(FComponents) then
-    For Runner:=0 To FComponents.Count do
+    For Runner:=0 To FComponents.Count - 1 do
       TComponent(FComponents.items[Runner]).SetDesigning(Value);
 end;
 
@@ -488,7 +488,35 @@ end;
 
 {
   $Log$
-  Revision 1.2  2000-07-13 11:32:59  michael
-  + removed logs
- 
+  Revision 1.1.2.1  2001-01-08 18:35:20  sg
+  * Applied bugfix for bug #1330
+
+  Revision 1.1  2000/07/13 06:31:30  michael
+  + Initial import
+
+  Revision 1.12  2000/06/29 16:29:23  sg
+  * Implemented streaming. Note: The writer driver interface is stable, but
+    the reader interface is not final yet!
+
+  Revision 1.11  2000/01/07 01:24:33  peter
+    * updated copyright to 2000
+
+  Revision 1.10  2000/01/06 01:20:32  peter
+    * moved out of packages/ back to topdir
+
+  Revision 1.2  2000/01/04 18:07:16  michael
+  + Streaming implemented
+
+  Revision 1.1  2000/01/03 19:33:07  peter
+    * moved to packages dir
+
+  Revision 1.8  1999/04/12 14:41:00  michael
+  + Fixed TComponent methods where defaults are used
+
+  Revision 1.7  1999/04/12 08:02:48  michael
+  + Fixed bug in ValidateRename
+
+  Revision 1.6  1999/04/08 10:18:51  peter
+    * makefile updates
+
 }