anchor.diff:   *                                                        *
    * hprose common unit for delphi.                         *
    *                                                        *
  - * LastModified: May 24, 2014                             *
  + * LastModified: May 25, 2014                             *
    * Author: Ma Bingyao <andot@hprose.com>                  *
    *                                                        *
   \**********************************************************/
  
positive.code:     property Position: Integer read FPosition write SetPosition;
      property Length: Integer read FLength;
      property Capacity: Integer read FCapacity write SetCapacity;
      property DataString: string read FDataString;
    end;
  
    ISmartObject = interface
  
negative.code:     function ContainsValue(const Value: Variant): Boolean;
      function Delete(const Key: Variant): Variant;
      function GetEnumerator: IMapEnumerator;
      function Join(const ItemGlue, KeyValueGlue, LeftPad, RightPad: string): string;
      procedure InitLock;
      procedure InitReadWriteLock;
      procedure Lock;
  