FlashWindow on ehkä yksi WinApin hauskimmista komennoista: se välkyttää ikkunan otsikkopalkkia. Tällä voidaan terästää käyttäjän huomiota, sillä vaikka ikkuna ei olisikaan päällimmäisenä, sen välkkyminen näkyy myös tehtäväpalkissa.
Esimerkissä välkyntä tapahtuu puolen sekunnin välein. Tämän takia Formille on laitettava yksi Timer-kontrolli nimeltä Timer1 ja sen Interval-arvoksi on asetettava 500 (500 ms=0.5 s). Timer1:n koodissa taas kutsutaan FlashWindowia, jonka parametreina on hwnd, ikkunan tunniste, ja True, välkyntä tapahtuu.
Moduuli
Public Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long
Formi
Private Sub Timer1_Timer() Dim X As Long X = FlashWindow(hwnd, True) End Sub
Ei toimi ainakaan windows xp home editionissa ja vb 6.0 :lassa
no on kyl aika tönttö ei toimi XPssäkään!
intervalliks 10 ni o hiano :)
aika kätevä toimii 98:ssa mut ei xp:ssä aika hassuu!
lainaus:
aika kätevä toimii 98:ssa mut ei xp:ssä aika hassuu!
Kyllä mulla toimii xp:ssä
mikseeitoimi
Aihe on jo aika vanha, joten et voi enää vastata siihen.