anchor.diff:    DeclaredColType: PChar;
     ActualColType: integer;
     ptrValue: PChar;
  +  sColType: string;
  +  iColType: Integer;
   begin
     inherited create;
     try
  
positive.code:                   thisColType^ := Sqlite3_ColumnType(stmt, i) //use the actual column type instead
                  //seems to be needed for last_insert_rowid
                  else
                    if (DeclaredColType = 'INTEGER') or (DeclaredColType = 'BOOLEAN') then
                      thisColType^ := dtInt
                    else
                      if (DeclaredColType = 'NUMERIC') or
  
negative.code:                       if DeclaredColType = 'BLOB' then
                          thisColType^ := dtBlob
                        else
                          thisColType^ := dtStr; }
                  fColTypes.Add(thiscoltype);
                end;
                fResults := TList.Create;
  