UserPreferenceChangingEventArgs Class
Provides data for the UserPreferenceChanging event.
Assembly: System (in System.dll)
'Declaration <PermissionSetAttribute(SecurityAction.LinkDemand, Name := "FullTrust")> _ <HostProtectionAttribute(SecurityAction.LinkDemand, MayLeakOnAbort := True)> _ <PermissionSetAttribute(SecurityAction.InheritanceDemand, Name := "FullTrust")> _ Public Class UserPreferenceChangingEventArgs _ Inherits EventArgs 'Usage Dim instance As UserPreferenceChangingEventArgs
Note: |
|---|
The HostProtectionAttribute attribute applied to this type or member has the following Resources property value: MayLeakOnAbort. The HostProtectionAttribute does not affect desktop applications (which are typically started by double-clicking an icon, typing a command, or entering a URL in a browser). For more information, see the HostProtectionAttribute class or SQL Server Programming and Host Protection Attributes. |
A UserPreferenceChanging event occurs when a change to a user preference is about to be applied.
The following code example demonstrates how to use the UserPreferenceChangingEventArgs type to monitor the UserPreferenceChanging event. This code example is part of a larger example provided for the SystemEvents class.
Imports System Imports Microsoft.Win32 Imports System.Windows.Forms Friend Class Form1 Inherits System.Windows.Forms.Form Public Sub New() MyBase.New() 'This call is required by the Windows Form Designer. InitializeComponent() 'Set the SystemEvents class to receive event notification 'when a user preference changes, the palette changes, or 'when display settings change. AddHandler SystemEvents.UserPreferenceChanging, _ AddressOf SystemEvents_UserPreferenceChanging AddHandler SystemEvents.PaletteChanged, _ AddressOf SystemEvents_PaletteChanged AddHandler SystemEvents.DisplaySettingsChanged, _ AddressOf SystemEvents_DisplaySettingsChanged End Sub 'Form overrides dispose to clean up the component list. Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean) If disposing Then If (components IsNot Nothing) Then components.Dispose() End If End If MyBase.Dispose(disposing) End Sub Private components As System.ComponentModel.IContainer <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent() Me.SuspendLayout() ' 'Form1 ' Me.ClientSize = New System.Drawing.Size(648, 398) Me.Name = "Form1" Me.Text = "Form1" Me.ResumeLayout(False) End Sub ' This method is called when a user preference changes. Private Sub SystemEvents_UserPreferenceChanging( _ ByVal sender As Object, _ ByVal e As UserPreferenceChangingEventArgs) MessageBox.Show("UserPreferenceChanging: " & _ e.Category.ToString()) End Sub ' This method is called when the palette changes. Private Sub SystemEvents_PaletteChanged( _ ByVal sender As Object, _ ByVal e As EventArgs) MessageBox.Show("PaletteChanged") End Sub ' This method is called when the display settings change. Private Sub SystemEvents_DisplaySettingsChanged( _ ByVal sender As Object, _ ByVal e As EventArgs) MessageBox.Show("The display settings changed.") End Sub End Class
Windows 7, Windows Vista, Windows XP SP2, Windows XP Media Center Edition, Windows XP Professional x64 Edition, Windows XP Starter Edition, Windows Server 2008 R2, Windows Server 2008, Windows Server 2003, Windows Server 2000 SP4, Windows Millennium Edition, Windows 98
The .NET Framework and .NET Compact Framework do not support all versions of every platform. For a list of the supported versions, see .NET Framework System Requirements.
Note: