j'ai créer une application qui se réduis automatiquement dans la barre des tâches avec un notify icon.
savez vous comment agrandir ma fenêtre quand on presse la combinaison de touche ctrl+shift+t ?
merci d'avance pour vos réponses
variable_X = Me.WindowState
If (variable_X = "0") Then
Me.WindowState = "2"
End If
If (variable_X = "2") Then
Me.WindowState = "0"
End If
Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Int32) _
As Short
Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
If GetAsyncKeyState(Keys.F12) And Me.WindowState = FormWindowState.Minimized Then Me.WindowState = FormWindowState.Normal
If GetAsyncKeyState(Keys.F12) And (Me.WindowState = FormWindowState.Normal Or Me.WindowState = FormWindowState.Maximized) Then Me.WindowState = FormWindowState.Minimized
End Sub
Private Sub Form1_Load(sender As System.Object, e As System.EventArgs) Handles MyBase.Load
Timer1.Start()
End Sub
End Class
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Int32) As Short
If GetAsyncKeyState(Keys.F12) And Me.WindowState = FormWindowState.Minimized Then Me.WindowState = FormWindowState.Normal
If GetAsyncKeyState(Keys.F12) And (Me.WindowState = FormWindowState.Normal Or Me.WindowState = FormWindowState.Maximized) Then Me.WindowState = FormWindowState.Minimized