Показывать курсор песочных часов на уровне приложения во время загрузки события, пока ShowDialog - PullRequest
0 голосов
/ 26 сентября 2019

У меня есть следующий код:

Private Sub btnNew_Click(sender As Object, e As EventArgs) Handles btnNew.Click

    Dim f As New frmStyle
    f.ShowDialog()

End Sub

frmStyle делает много вещей во время события Load, поэтому он не появляется сразу.Вместо этого требуется около 1 секунды, чтобы отобразиться.

Из-за этого я хочу показать курсор в виде песочных часов во время события загрузки формы.

В VB6 это было очень легко.Я мог бы просто использовать "Screen.Cursor = vbHourglass".Затем вы можете вернуть курсор к значению по умолчанию от того, которое вам нужно, например, в конце события Form_Load.

Как это можно сделать в VB.NET сейчас?

Я хочупоказывать курсор в приложении, а не только для одного элемента управления.И ТАКЖЕ (что делает мой вопрос уникальным и НЕ отвеченным до сих пор в другом вопросе), мне нужно сбросить его, но он должен быть сброшен в конце Form_Load (который НЕ является элементом инициализации. Вместо этого кнопка является «инициализирующим»)элемент, но я не могу установить курсор по умолчанию в конце нажатия кнопки, потому что ShowDialog отображается модально. Это означает, что курсор будет изменен только в том случае, если форма была снова закрыта).

Спасибо!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...