Здравствуйте.

На форме есть элемент рисунок в нём отсутствует картинка, вместо этого в свойствах тип фона указан обычный и задан цвет. В итоге получается квадрат. (можно конечно использовать элемент прямоугольник, но желательно всёже изображение).
Суть в том что мне нужно увеличивать глобальную переменную на 1 когда курсор входит в область изображения и на 1 когда уходит. Пока курсор внутри рисунка переменная не меняется.
Использую для этого событие "перемещение указателя" (MouseMove) элемента.

Private Sub Рисунок1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
        If (X = 0) Or (Y = 0) Or (X = 550) Or (Y = 550) Then
            count = count + 1
        End If

    Me.Поле1.Value = count ' выводит в поле 1 значение глобальной переменной
    Me.Поле2.Value = X       ' выводит в поле 2 значение X
    Me.Поле3.Value = Y       ' выводит в поле 3 значение Y

End Sub

Но возникли проблемы/вопросы:

1) Размер квадрата 1x1см. Его Height и Width равны 567. Но координаты X и Y выводятся всегда кратными 5. Поэтому немогу прописать условие If (X = Me.Рисунок1.Width) Or (Y = Me.Рисунок1.Height) Or (X = 0) Or (Y = 0) Then
Может есть возможность узнавать координаты более точно (именно в самой фигуре)

2) Хоть размер указан 567, но при выведении координат максимальный X (и Y) на котором выходит курсор (то есть последнее значение) является 555. Получается что фигура обрезана на 12. Если учесть то что шагом является 5 и координаты всегда кратны им то последнее значение должно быть 565, а не 555. Куда деваются эти (?пиксели?).

3) Иногда происходит ошибочное срабатывание, тогда count увеличивается на 3 или же вообще не срабатывает. В чём может быть причина ?

http://www.sql.ru/forum/1212772/koordinaty-kursora-na-elemente