Главная страницаОбратная связьКарта сайта

Скрыть/показать курсор мыши



'Добавьте 1 CommandButton на форму. Вызов функции как ShowCursor& 0 -
'скроет курсор, вызов как ShowCursor& 1 - покажет курсор. Данная API-функция
'не всегда срабатывает. Я не знаю, почему. Если у вас есть объяснение,
'напишите.

Private Declare Function ShowCursor Lib "user32" (ByVal bShow As Long) As Long

Private Sub Command1_Click()
ShowCursor 0 'Скрыть курсор
End Sub

Private Sub Form_Unload(Cancel As Integer)
ShowCursor 1 'Показать курсор
End Sub


Обсудить статью на форуме


Если Вас заинтересовала или понравилась информация программирование на Visual Basic - "Скрыть/показать курсор мыши", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу:

Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!
   


Copyright © 2008 - 2017 Дискета.info