THashedStringList[Format('%d,%d', [x,y])]で十分