Recuperare la risoluzione video in WPF

Scritto da  Massimo Bonanni il lunedì 26 settembre 2011  •  Linguaggio: VB   • Livello: 100


La seguente funzione recupera i dpi dello schermo.

VB.NET

Public Sub GetVideoResulution(ByRef xDpi As Double, ByRef yDpi As Double)
    xDpi = 0
    yDpi = 0
    If Application.Current.MainWindow IsNot Nothing Then
        Dim MainWnd = PresentationSource.FromVisual(Application.Current.MainWindow)
        If MainWnd IsNot Nothing Then
            Dim transMatrix = MainWnd.CompositionTarget.TransformToDevice
            xDpi = transMatrix.M11 * 96D
            yDpi = transMatrix.M22 * 96D
        End If
    End If
End Sub

 


Tags: WPF,presentation framework

 
x