VB-Homepage Tipp 035

Aufmerksamkeit durch blinkende Menüzeile

Bei besonderen Aktionen ist es günstig, den Anwender auf das Programm aufmerksam zu machen. Gerade, wenn das Programm minimiert abgelegt wurde, ist der folgende Tipp nützlich. Dies geht aber nicht unter Windows 3.1 oder Windows NT 3.51. Die ganze Prozedur ist sehr schnell erstellt, sie sollte aber sehr sorgfältig eingesetzt werden, denn wenn jeder dies bei jedem Programm nutzt, haben wir bald nur noch blinkende Menüleisten und hin ist die besondere Aufmerksamkeit. Wenn Sie nicht sowieso schon ein Modul in Ihr Projekt eingebunden haben, können Sie die nachfolgende Anweisung auch in den Allgemein/Deklarationen Abschnitt der Form eingeben. (Ansonsten Private weglassen) Private Declare Function FlashWindow Lib "user32" (ByVal hwnd As Long, ByVal bInvert As Long) As Long Als nächstes fügen Sie Ihrer Form einen Timer hinzu und geben ihm folgendes auf den Weg. Call FlashWindow(Form1.hwnd, True) Über den Timer.Interval können Sie nun noch die Blinkfrequenz festlegen. 1000 = 1 Sek.

Tipp-Download

Quelle :