GetCursorPos

<< Clique para Mostrar o Sumário >>

 

GetCursorPos

GetCursorPos(X, Y)

Retorna a posição em que o cursor interceptou a Pena no E3Chart. Este método possui os parâmetros X e Y, que correspondem às coordenadas x e y do cursor. Se este método é bem-sucedido retorna Verdadeiro, caso contrário retorna Falso. O script a seguir contém um exemplo de uso deste método.

Sub CommandButton1_Click()
  For Each pen In Chart.Pens
    If pen.GetCursorPos(aa, bb) Then
      strResult = strResult & pen.Name_
        & " := " & CSTr(CDate(aa)) + _
        "y " + CStr(bb) + vbNewLine
    End If
  Next
  MsgBox strResult
End Sub

Esta página foi útil?