Ежик_из_тумана1) Размер квадрата 1x1см. Его Height и Width равны 567.Откуда берётся 567:
1 см = 1/2,54 дюйма, 1 дюйм (inch) = 72 пункта (point), 1 пункт = 20 твипов (twip) => 1 см = 72 * 20 / 2,54 = ~566,929 твипов. Округляем до целого (Integer), получаем 567 твипов.Ежик_из_туманаНо координаты X и Y выводятся всегда кратными 5.Не 5, а 15. И не всегда, кстати. Откуда берётся 15:
существует такое понятие как логическое разрешение (растрового) устройства отображения по осям координат, выражается в DPI (точек растра (пикселей) на "логический" дюйм). Курсор мыши двигается по (растровому) устройству отображения - экрану с шагом 1 пиксель. Логическое разрешение экрана можно для пользователя узнать через панель управления, для программиста - функцией GetDeviceCaps с параметром LOGPIXELSX или LOGPIXELSY. Обычно (изредка попадаются другие значения, например, 120) это 96 DPI. Получается: 1 пиксель = 1 дюйм / DPI = 72 * 20 / 96 = 15 твипов.Ежик_из_туманаМожет есть возможность узнавать координаты более точно (именно в самой фигуре)Нет, если не лезть в дебри. И незачем.Ежик_из_тумана2) Хоть размер указан 567, но при выведении координат максимальный X (и Y) на котором выходит курсор (то есть последнее значение) является 555. Получается что фигура обрезана на 12. Если учесть то что шагом является 5 и координаты всегда кратны им то последнее значение должно быть 565, а не 555. Куда деваются эти (?пиксели?).По существу ответил выше. Практический же выход из положения - выравнивание положения (Left, Top) и размеров (Width, Height) элемента управления программно по границе экранных пикселей. См. AlignControlToPixelBound2 в 13530661 .Ежик_из_тумана3) Иногда происходит ошибочное срабатывание, тогда count увеличивается на 3 или же вообще не срабатывает. В чём может быть причина ?MouseMove не даёт полный контроль за выходом курсора за область. "По-взрослому " эта задача решается через subclassing, но обычно программист на VBA от этого слова шарахается.