12 Октябрь 2009

Как привлечь внимание пользователя к окну

Разное |

Как привлечь внимание пользователя к окну?
Мигаем заданным окном, для того, чтобы привлечь к нему внимание пользователя.

Option Explicit
Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long 

Private Sub Command1_Click()
    Call FlashWindow(Me.hwnd, -1)
End Sub

Запись опубликована on 12.10.2009 at 16:23 и размещена в рубрике: Разное. Вы можете читать комментарии, используя RSS-ленту. Вы можете оставить комментарий, или отправить трекбек с Вашего сайта.



Оставить комментарий

Я не робот.