Discussion :

[mickmix69]

Bonjour à tous

Tout d'abord meilleurs Voeux à tous !!!

Voila j'utilise ce bout de code pour minimiser mon appli totalement (u n peu comme msn) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    Private Sub Principal_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        'Me.Hide()
        Me.WindowState = FormWindowState.Minimized
        e.Cancel = True
        Me.ShowInTaskbar = False
    End Sub

- le "bouton croix" sert à minimiser totalement (uniquement visible en icone dans la systray)
- le "bouton barre "de reduction a sa fonction classique

Sauf que je voudrais pouvoir réduire mon appli avec la croix, avec le code utilisée par la barre de réduction....Car lorque on réduit avec le "bouton barre" on libère de la mémoire....il doit donc bien y avoir une action....

Merci pour vos réponses.....

[mickmix69]

En fait c'est l''évenement windowState = windowState.minimized qui permet de libérer la mémoire....

du coup j'utilise ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
    Private Sub Principal_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        Me.WindowState = FormWindowState.Minimized
        Me.Visible = False
        e.Cancel = True
        Me.ShowInTaskbar = False
        SetProcessWorkingSetSize()
    End Sub

et cette fonction pour réduire la taille mémoire du processus :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
    Private Declare Auto Function SetProcessWorkingSetSize Lib "kernel32.dll" (ByVal procHandle As IntPtr, ByVal min As Int32, ByVal max As Int32) As Boolean
    Public Sub SetProcessWorkingSetSize()
        Try
            Dim Mem As Process
            Mem = Process.GetCurrentProcess()
            SetProcessWorkingSetSize(Mem.Handle, -1, -1)
        Catch ex As Exception
            MsgBox(ex.ToString)
 
        End Try
    End Sub

voila a+