[VB.net] Plein ecran ?Résolu

Question

Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Integer, ByVal hWndInsertAfter As Integer, ByVal x As Integer, ByVal y As Integer, ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer) As Integer
    Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
    Public SW, SH As Int16

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        SetWindowPos(FindWindow("shell_traywnd", ""), 0, 0, 0, 0, 0, &H80)
        SW = Screen.PrimaryScreen.WorkingArea.Width
        SH = Screen.PrimaryScreen.WorkingArea.Height

        Me.Width = SW
        Me.Height = SH
        Me.Top = 0
        Me.Left = 0
    End Sub

Comment faire pour que ma fentre prenne meme l'espce de la defunte barre des taches snas laisser ce vide ?

 MErci

cs_labout · Accepted Answer

labout

me.width=screen.width
me.height=screen.Height
devrait le faire

@+

cs_Oueb · Answer

J'ai fait ca comme ca :


        SW = Screen.PrimaryScreen.Bounds.Width
        SH = Screen.PrimaryScreen.Bounds.Height


 Mais merci kd meme :)

[VB.net] Plein ecran ?

2 réponses

Discussions similaires