anchor.diff:    {$DEFINE UNICODE_URL}
   {$ENDIF}
   
  +{$IFDEF UNICODE}
  +WChar = Char;
  +PWChar = PChar;
  +{$ELSE}
  +WChar = WideChar;
  +PWChar = PWideChar;
  +{$ENDIF}
  +
   
   /// <summary>
   ///   ַ
  
positive.code: function URLEncode(S: string; pvIsPostData: Boolean = true): URLString;
  
  
  /// <summary>procedure ValueOfName
  /// </summary>
  /// <returns> String
  /// </returns>
  /// <param name="pvStrings"> (TStrings) </param>
  /// <param name="pvName"> (string) </param>
  /// <param name="pvSpliters"> ֵֺķָ </param>
  function ValueOfName(pvStrings: TStrings; const pvName: string; pvSpliters:
      TSysCharSet; pvTrim: Boolean): String;
  
  
  
  implementation
  
  {$if CompilerVersion < 20}
  function CharInSet(C: Char; const CharSet: TSysCharSet): Boolean;
  
negative.code:   {$ENDIF}
  end;
  
  function StringsValueOfName(pvStrings: TStrings; const pvName: string;
      pvSpliters: TSysCharSet; pvTrim: Boolean): String;
  var
    i : Integer;
    s : string;
  