проблема решилась заменой мест слогаемых в dtInteger(dtpos, pos.x shl 16 + pos.y); спасибо что подсказали про X и Y, я бы долго думал что там одно и тоже написано