anchor.diff:    Result := Self;
   end;
   
  -function TAnsiSQLBuilder.Values(const AValue: string): ISQLBuilder;
  -begin
  -  FValues.Add(AValue);
  +function TAnsiSQLBuilder.Values(const AValue: string; AIncludeQuotes: Boolean): ISQLBuilder;
  +begin
  +  FValues.Add(TSQLValue.Create(AValue, AIncludeQuotes));
     Result := Self;
   end;
   
  
positive.code:     function Union(const AUnionSQL: ISQLBuilder): ISQLBuilder; overload; virtual;
      function UnionAll(const AUnionSQL: ISQLBuilder): ISQLBuilder; overload; virtual;
      function Into(const ATableName: string): ISQLBuilder; virtual;
      function Values(const AValue: string): ISQLBuilder; virtual;
      function Table(const ATablename: string): ISQLBuilder; virtual;
    end;
  
  
negative.code:   TJoinType = (jtNone, jtInner, jtLeftOuter, jtRightOuter);
  
    TSQLUnionType = (utUnion, utUnionAll);
  
    TSQLValue = class
    private
      FValue: string;
      FIncludeQuotes: Boolean;
      function GetValue: string;
    public
      constructor Create(const AValue: string; AIncludeQuotes: Boolean = True); virtual;
  
      property Value: string read GetValue;
    end;
  
    TSQLTable = class
    private
  