Такая задача:
есть обьект TImage который отображет рисунок (Stretch = Proportional = true). Пользователь помечает на рисунке прямоугольную область, которую необходимо скопировать в другой объект TImage.
Как получить координаты прямоугольника для копирования (координаты для копирования с помощью CopyRect) ?
В TImage->Picture и в TImage->Picture->Bitmap находятся размеры оригинальной (не Stretch) картинки.
Пробовал экранные координаты переводить в координаты картинки с помощью соотношения TImage->Picture->Height/TImage->Height но там приходится использовать операции округления — теряется точность (я так и не смог подобрать алгоритм для правильного перевода :( вроде всё просто, но...).
Сейчас делаю копирование через дескриптор экрана но теряю всё качество и разрешение ресунка :(
