anchor.diff:      Integer;
   
   
  +
  +
   /// <summary>
   ///   ǷpvStartͷ
   /// </summary>
  
positive.code:   l := Length(s);
    SetLength(lvStr, l);
    times := 0;
    for i := Low(s) to high(s) do
    begin
      if not CharInSet(s[i], pvCharSets) then
      begin
  
negative.code: function SkipChars(var p:PChar; pvChars: TSysCharSet): Integer;
  
  /// <summary>
  ///   Nַ
  /// </summary>
  function SkipN(p: PChar; n: Integer): PChar;
  
  
  /// <summary>
  ///   ַ
  /// </summary>
  function StrSkipChars(const src :String; pvChars:TSysCharSet): String;
  
  
  /// <summary>
  ///   ߿ʼȡַ
  /// </summary>
  function LeftStr(const s:string; count:Integer): String;
  
  /// <summary>
  ///   ұ߿ʼȡַ
  /// </summary>
  function RightStr(const s:string; count:Integer): String;
  
  /// <summary>
  ///   ַ
  ///   // p = pchar("abcabcefggg");
  ///   // ִк p = "efgg"
  