Olá,

Gostaria de exibir uma mensagem (Info_Box ou Stop_Box) no Exiting() de um Form, mas quando faço isso o cursor do mouse fica como "seleção" (se mover o mouse ele vai selecionando o valor) ao sair do Form com o click esquerdo do mouse.
Quando removo a mensagem, o Exiting não deixa cursor no modo de "seleção" e funciona normalmente. Também funciona normal ao sair com um TAB.

Code:
    // Mesmo comportamento com a mensagem antes ou depois do Forward Get
    Procedure Exiting Integer iObject Returns Integer
        Integer isCanceled
        Forward Get msg_Exiting iObject to isCanceled

        Send Info_Box "O cursor fica como 'seleção'" ":("

        If ( isCanceled ) ;
            Procedure_Return isCanceled

        // Send Info_Box "O cursor fica como 'seleção' aqui também" ":("

        Procedure_Return isCanceled
    End_Procedure
Do que preciso para ele não ter esse comportamento?
Click image for larger version. 

Name:	ExitingClickEsquerdoMouse.png 
Views:	101 
Size:	51.1 KB 
ID:	14320