Recuperar ação através do clique do mouse com o botão direito dentro do Preactor

    A ideia deste blog é organizar um conjunto de funções que, vira e mexe eu preciso, e quero te-las de fácil acesso.

A função abaixo faz parte de um API Preactor, e é chamada de dentro do quadro de gantt. Ela irá retornar o registro que foi clicado com o Botão direito do mouse, para assim executarmos a ação que o usuário deseja realizar.

Eu costumo utilizar essa função em treinamentos da API do Preactor.

    Public Function GetCustomCheckRecordNumber(ByRef pespComObject As Object) As Integer

        'Cria um novo objeto  Preactor.Interop.EventScripts.Core
        Dim PESP As New Preactor.Interop.EventScripts.Core()

        'Recebe a referência do Objeto
        PESP = CType(pespComObject, Core)

        'Retornando informações da operação alterada
        Return (PESP.CustomCheckRecordNumber)

    End Function

Segue abaixo uma imagem do gráfico de gantt do Preactor.