voici la solution
Public Class Main
Inherits System.Windows.Forms.Form
Implements IMessageFilter
Const WM_KEYDOWN As Integer = &H100
Public Sub New()
Application.AddMessageFilter(Me)
Application.DoEvents()
Try
Dim temp As New Form1(True)
temp.Owner = Me
Application.Run(temp)
Try
temp.NotifyIcon1.Visible = False
Catch
End Try
Catch ex As Exception
Dim temp As New frmErreur
temp.Erreur = ex
temp.ShowDialog()
End Try
End
End Sub
Public Function PreFilterMessage(ByRef m As System.Windows.Forms.Message) As Boolean Implements System.Windows.Forms.IMessageFilter.PreF<wbr>ilterMessa<wbr>ge
Select Case m.Msg
Case WM_KEYDOWN
Dim keyCode As Keys = m.WParam
If keyCode = Keys.F12 Then
VerifActivation.securityBypass = True
End If
End Select
End Function
End Class
-------------------------------------------------
Dragon alias aussi
Waxime mais bon, pas le gout de refaire un nouveau profil lol
-------------------------------------------------
</wbr></wbr>