Tipp 0064 Systemereignisse überwachen
Autor/Einsender:
Datum:
  Michael Werner
07.12.2004
Entwicklungsumgebung:   VB.Net 2003
Framework:   1.1
SystemEvents ist eine Klasse, mit der Systemereignisse überwacht werden können. In diesem Tipp werden drei solcher Ereignisse exemplarisch herausgegriffen: Änderungen an den Einstellungen der Anzeige (Bildschirm), der System-Zeit und der Abmeldung des Benutzers. Darüber hinaus gibt es eine ganze Reihe weiterer in der Klasse SystemEvents definierter Systemereignisse, die abgefragt werden können.
 
Imports Microsoft.Win32
Public Class Form1
  Inherits System.Windows.Forms.Form

  #Region " Vom Windows Form Designer generierter Code "
    Public Sub New()
      MyBase.New()

      InitializeComponent()

      AddHandler SystemEvents.DisplaySettingsChanged, _
            AddressOf DisplayHasChanged
      AddHandler SystemEvents.TimeChanged, _
            AddressOf TimeHasChanged
      AddHandler SystemEvents.SessionEnded, _
            AddressOf SessionHasEnded
    End Sub
    '...
  #End Region

  Private Sub DisplayHasChanged(ByVal sender As Object, _
          ByVal e As EventArgs)
    Me.TopMost = True
    Label1.ForeColor = Color.Red
    Label1.Text = "Die Bildschirmeinstellungen wurden geändert!"
  End Sub

  Private Sub TimeHasChanged(ByVal sender As Object, _
          ByVal e As EventArgs)
    Me.TopMost = True
    Label2.ForeColor = Color.Red
    Label2.Text = "Die Systemzeit wurde geändert!"
  End Sub

  Private Sub SessionHasEnded(ByVal sender As Object, _
          ByVal e As SessionEndedEventArgs)
    Me.TopMost = True
    Label2.ForeColor = Color.Red
    Label3.Text = "Der Benutzer hat sich abgemeldet!"
  End Sub

  Private Sub Button1_Click(ByVal sender As System.Object, _
       ByVal e As System.EventArgs) Handles Button1.Click
    Me.Close()
  End Sub
End Class
 
Weitere Links zum Thema
Verzeichnisse (Ordner) überwachen

Windows-Version
98/SE
ME
NT
2000
XP
Vista
Win 7


Download  (6,1 kB) Downloads bisher: [ 795 ]

Vorheriger Tipp Zum Seitenanfang Nächster Tipp

Startseite | Tipps | Projekte | Tutorials | Bücherecke | VB-/VBA-Tipps | API-Referenz | Komponenten | VB.Net-Forum | VB/VBA-Forum | DirectX-Forum | Foren-Archiv | DirectX | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum

Seite empfehlen Bug-Report
Letzte Aktualisierung: Montag, 25. Januar 2012