[Jcl-checkins-diff] SF.net SVN: jcl: [2246] trunk/jcl/source/common/JclContainerIntf.pas

[<ah...@us...>]

Revision: 2246
          http://jcl.svn.sourceforge.net/jcl/?rev=2246&view=rev
Author:   ahuser
Date:     2007-11-30 11:33:03 -0800 (Fri, 30 Nov 2007)

Log Message:
-----------
Added missing "default" property flag.

Modified Paths:
--------------
    trunk/jcl/source/common/JclContainerIntf.pas

Modified: trunk/jcl/source/common/JclContainerIntf.pas
===================================================================
--- trunk/jcl/source/common/JclContainerIntf.pas	2007-11-30 19:32:28 UTC (rev 2245)
+++ trunk/jcl/source/common/JclContainerIntf.pas	2007-11-30 19:33:03 UTC (rev 2246)
@@ -2031,7 +2031,7 @@
     function Remove(const Key: IInterface): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: IInterface]: IInterface read GetValue write PutValue;
+    property Items[const Key: IInterface]: IInterface read GetValue write PutValue; default;
   end;
 
   (*IJclMultiIntfIntfMap = interface(IJclIntfIntfMap)
@@ -2055,7 +2055,7 @@
     function Remove(const Key: AnsiString): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: AnsiString]: IInterface read GetValue write PutValue;
+    property Items[const Key: AnsiString]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclWideStrIntfMap = interface(IJclWideStrContainer)
@@ -2073,7 +2073,7 @@
     function Remove(const Key: WideString): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: WideString]: IInterface read GetValue write PutValue;
+    property Items[const Key: WideString]: IInterface read GetValue write PutValue; default;
   end;
 
   {$IFDEF CONTAINER_ANSISTR}
@@ -2098,7 +2098,7 @@
     function Remove(const Key: IInterface): AnsiString;
     function Size: Integer;
     function Values: IJclAnsiStrCollection;
-    property Items[const Key: IInterface]: AnsiString read GetValue write PutValue;
+    property Items[const Key: IInterface]: AnsiString read GetValue write PutValue; default;
   end;
 
   IJclIntfWideStrMap = interface(IJclWideStrContainer)
@@ -2116,7 +2116,7 @@
     function Remove(const Key: IInterface): WideString;
     function Size: Integer;
     function Values: IJclWideStrCollection;
-    property Items[const Key: IInterface]: WideString read GetValue write PutValue;
+    property Items[const Key: IInterface]: WideString read GetValue write PutValue; default;
   end;
 
   {$IFDEF CONTAINER_ANSISTR}
@@ -2143,7 +2143,7 @@
     function Size: Integer;
     function Values: IJclAnsiStrCollection;
     //Daniele Teti
-    property Items[const Key: AnsiString]: AnsiString read GetValue write PutValue;
+    property Items[const Key: AnsiString]: AnsiString read GetValue write PutValue; default;
   end;
 
   IJclWideStrWideStrMap = interface(IJclWideStrContainer)
@@ -2163,7 +2163,7 @@
     function Size: Integer;
     function Values: IJclWideStrCollection;
     //Daniele Teti
-    property Items[const Key: WideString]: WideString read GetValue write PutValue;
+    property Items[const Key: WideString]: WideString read GetValue write PutValue; default;
   end;
 
   {$IFDEF CONTAINER_ANSISTR}
@@ -2188,7 +2188,7 @@
     function Remove(const Key: Single): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: Single]: IInterface read GetValue write PutValue;
+    property Items[const Key: Single]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfSingleMap = interface(IJclSingleContainer)
@@ -2206,7 +2206,7 @@
     function Remove(const Key: IInterface): Single;
     function Size: Integer;
     function Values: IJclSingleCollection;
-    property Items[const Key: IInterface]: Single read GetValue write PutValue;
+    property Items[const Key: IInterface]: Single read GetValue write PutValue; default;
   end;
 
   IJclSingleSingleMap = interface(IJclSingleContainer)
@@ -2224,7 +2224,7 @@
     function Remove(const Key: Single): Single;
     function Size: Integer;
     function Values: IJclSingleCollection;
-    property Items[const Key: Single]: Single read GetValue write PutValue;
+    property Items[const Key: Single]: Single read GetValue write PutValue; default;
   end;
 
   IJclDoubleIntfMap = interface(IJclDoubleContainer)
@@ -2242,7 +2242,7 @@
     function Remove(const Key: Double): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: Double]: IInterface read GetValue write PutValue;
+    property Items[const Key: Double]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfDoubleMap = interface(IJclDoubleContainer)
@@ -2260,7 +2260,7 @@
     function Remove(const Key: IInterface): Double;
     function Size: Integer;
     function Values: IJclDoubleCollection;
-    property Items[const Key: IInterface]: Double read GetValue write PutValue;
+    property Items[const Key: IInterface]: Double read GetValue write PutValue; default;
   end;
 
   IJclDoubleDoubleMap = interface(IJclDoubleContainer)
@@ -2278,7 +2278,7 @@
     function Remove(const Key: Double): Double;
     function Size: Integer;
     function Values: IJclDoubleCollection;
-    property Items[const Key: Double]: Double read GetValue write PutValue;
+    property Items[const Key: Double]: Double read GetValue write PutValue; default;
   end;
 
   IJclExtendedIntfMap = interface(IJclExtendedContainer)
@@ -2296,7 +2296,7 @@
     function Remove(const Key: Extended): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: Extended]: IInterface read GetValue write PutValue;
+    property Items[const Key: Extended]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfExtendedMap = interface(IJclExtendedContainer)
@@ -2314,7 +2314,7 @@
     function Remove(const Key: IInterface): Extended;
     function Size: Integer;
     function Values: IJclExtendedCollection;
-    property Items[const Key: IInterface]: Extended read GetValue write PutValue;
+    property Items[const Key: IInterface]: Extended read GetValue write PutValue; default;
   end;
 
   IJclExtendedExtendedMap = interface(IJclExtendedContainer)
@@ -2332,7 +2332,7 @@
     function Remove(const Key: Extended): Extended;
     function Size: Integer;
     function Values: IJclExtendedCollection;
-    property Items[const Key: Extended]: Extended read GetValue write PutValue;
+    property Items[const Key: Extended]: Extended read GetValue write PutValue; default;
   end;
 
   {$IFDEF MATH_EXTENDED_PRECISION}
@@ -2366,7 +2366,7 @@
     function Remove(Key: Integer): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[Key: Integer]: IInterface read GetValue write PutValue;
+    property Items[Key: Integer]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfIntegerMap = interface(IJclContainer)
@@ -2384,7 +2384,7 @@
     function Remove(const Key: IInterface): Integer;
     function Size: Integer;
     function Values: IJclIntegerCollection;
-    property Items[const Key: IInterface]: Integer read GetValue write PutValue;
+    property Items[const Key: IInterface]: Integer read GetValue write PutValue; default;
   end;
 
   IJclIntegerIntegerMap = interface(IJclContainer)
@@ -2402,7 +2402,7 @@
     function Remove(Key: Integer): Integer;
     function Size: Integer;
     function Values: IJclIntegerCollection;
-    property Items[Key: Integer]: Integer read GetValue write PutValue;
+    property Items[Key: Integer]: Integer read GetValue write PutValue; default;
   end;
 
   IJclCardinalIntfMap = interface(IJclContainer)
@@ -2420,7 +2420,7 @@
     function Remove(Key: Cardinal): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[Key: Cardinal]: IInterface read GetValue write PutValue;
+    property Items[Key: Cardinal]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfCardinalMap = interface(IJclContainer)
@@ -2438,7 +2438,7 @@
     function Remove(const Key: IInterface): Cardinal;
     function Size: Integer;
     function Values: IJclCardinalCollection;
-    property Items[const Key: IInterface]: Cardinal read GetValue write PutValue;
+    property Items[const Key: IInterface]: Cardinal read GetValue write PutValue; default;
   end;
 
   IJclCardinalCardinalMap = interface(IJclContainer)
@@ -2456,7 +2456,7 @@
     function Remove(Key: Cardinal): Cardinal;
     function Size: Integer;
     function Values: IJclCardinalCollection;
-    property Items[Key: Cardinal]: Cardinal read GetValue write PutValue;
+    property Items[Key: Cardinal]: Cardinal read GetValue write PutValue; default;
   end;
 
   IJclInt64IntfMap = interface(IJclContainer)
@@ -2474,7 +2474,7 @@
     function Remove(const Key: Int64): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[const Key: Int64]: IInterface read GetValue write PutValue;
+    property Items[const Key: Int64]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfInt64Map = interface(IJclContainer)
@@ -2492,7 +2492,7 @@
     function Remove(const Key: IInterface): Int64;
     function Size: Integer;
     function Values: IJclInt64Collection;
-    property Items[const Key: IInterface]: Int64 read GetValue write PutValue;
+    property Items[const Key: IInterface]: Int64 read GetValue write PutValue; default;
   end;
 
   IJclInt64Int64Map = interface(IJclContainer)
@@ -2510,7 +2510,7 @@
     function Remove(const Key: Int64): Int64;
     function Size: Integer;
     function Values: IJclInt64Collection;
-    property Items[const Key: Int64]: Int64 read GetValue write PutValue;
+    property Items[const Key: Int64]: Int64 read GetValue write PutValue; default;
   end;
 
   {$IFNDEF CLR}
@@ -2529,7 +2529,7 @@
     function Remove(Key: Pointer): IInterface;
     function Size: Integer;
     function Values: IJclIntfCollection;
-    property Items[Key: Pointer]: IInterface read GetValue write PutValue;
+    property Items[Key: Pointer]: IInterface read GetValue write PutValue; default;
   end;
 
   IJclIntfPtrMap = interface(IJclContainer)
@@ -2547,7 +2547,7 @@
     function Remove(const Key: IInterface): Pointer;
     function Size: Integer;
     function Values: IJclPtrCollection;
-    property Items[const Key: IInterface]: Pointer read GetValue write PutValue;
+    property Items[const Key: IInterface]: Pointer read GetValue write PutValue; default;
   end;
 
   IJclPtrPtrMap = interface(IJclContainer)
@@ -2565,7 +2565,7 @@
     function Remove(Key: Pointer): Pointer;
     function Size: Integer;
     function Values: IJclPtrCollection;
-    property Items[Key: Pointer]: Pointer read GetValue write PutValue;
+    property Items[Key: Pointer]: Pointer read GetValue write PutValue; default;
   end;
   {$ENDIF ~CLR}
 
@@ -2585,7 +2585,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: IInterface]: TObject read GetValue write PutValue;
+    property Items[const Key: IInterface]: TObject read GetValue write PutValue; default;
   end;
 
   IJclAnsiStrMap = interface(IJclAnsiStrContainer)
@@ -2604,7 +2604,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: AnsiString]: TObject read GetValue write PutValue;
+    property Items[const Key: AnsiString]: TObject read GetValue write PutValue; default;
   end;
 
   IJclWideStrMap = interface(IJclWideStrContainer)
@@ -2623,7 +2623,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: WideString]: TObject read GetValue write PutValue;
+    property Items[const Key: WideString]: TObject read GetValue write PutValue; default;
   end;
 
   {$IFDEF CONTAINER_ANSISTR}
@@ -2649,7 +2649,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: Single]: TObject read GetValue write PutValue;
+    property Items[const Key: Single]: TObject read GetValue write PutValue; default;
   end;
 
   IJclDoubleMap = interface(IJclDoubleContainer)
@@ -2668,7 +2668,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: Double]: TObject read GetValue write PutValue;
+    property Items[const Key: Double]: TObject read GetValue write PutValue; default;
   end;
 
   IJclExtendedMap = interface(IJclExtendedContainer)
@@ -2687,7 +2687,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: Extended]: TObject read GetValue write PutValue;
+    property Items[const Key: Extended]: TObject read GetValue write PutValue; default;
   end;
 
   {$IFDEF MATH_EXTENDED_PRECISION}
@@ -2716,7 +2716,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[Key: Integer]: TObject read GetValue write PutValue;
+    property Items[Key: Integer]: TObject read GetValue write PutValue; default;
   end;
 
   IJclCardinalMap = interface(IJclContainer)
@@ -2735,7 +2735,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[Key: Cardinal]: TObject read GetValue write PutValue;
+    property Items[Key: Cardinal]: TObject read GetValue write PutValue; default;
   end;
 
   IJclInt64Map = interface(IJclContainer)
@@ -2754,7 +2754,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[const Key: Int64]: TObject read GetValue write PutValue;
+    property Items[const Key: Int64]: TObject read GetValue write PutValue; default;
   end;
 
   {$IFNDEF CLR}
@@ -2774,7 +2774,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[Key: Pointer]: TObject read GetValue write PutValue;
+    property Items[Key: Pointer]: TObject read GetValue write PutValue; default;
   end;
   {$ENDIF ~CLR}
 
@@ -2794,7 +2794,7 @@
     function Size: Integer;
     function Values: IJclCollection;
     //Daniele Teti
-    property Items[Key: TObject]: TObject read GetValue write PutValue;
+    property Items[Key: TObject]: TObject read GetValue write PutValue; default;
   end;
 
   {$IFDEF SUPPORTS_GENERICS}
@@ -2818,7 +2818,7 @@
     function Size: Integer;
     function Values: IJclCollection<TValue>;
 
-    property Items[const Key: TKey]: TValue read GetValue write PutValue;
+    property Items[const Key: TKey]: TValue read GetValue write PutValue; default;
   end;
   {$ENDIF SUPPORTS_GENERICS}
 


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.