Interdire la combinaison de touches Alt F4

Isa a écrit :

Bonjour,

Est ce que quelqu'un connaîtrait un moyen d'interdire la sortie d'une
application par Alt F4 ?

Merci d'avance

Isa

Bonjour,

1 ere posibilité :

Dans l'événement QueryUnload :

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
If UnloadMode = vbFormControlMenu Then Cancel = 1
End Sub

Pour info, UnloadMode peut avoir les valeurs :

vbFormControlMenu = 0
vbFormCode = 1
vbAppWindows = 2
vbAppTaskManager = 3
vbFormMDIForm = 4
vbFormOwner = 5

2 eme possibilité :

Mettre la propriété 'ControlBox' de la Form à 'False'

Cordialement,

Jacques

alt f4 sur toutes les applis? ou la tienne?

--
-----
http://dark.freezee.org/
- Dark Update v2.0
- Dark Emule v0.44b r4
- Dark 3D-X 0.7beta
- Dark Shell 1.20

sur la mienne uniquement.

"dark poulpo" a écrit :

alt f4 sur toutes les applis? ou la tienne?

--
-----
http://dark.freezee.org/
- Dark Update v2.0
- Dark Emule v0.44b r4
- Dark 3D-X 0.7beta
- Dark Shell 1.20

alors la reponse est deja donné, si ca te convient pas, essaye en
enregistrant le raccourcis clavier alt f4 avec l'api

RegisterHotKey (hWnd, VK_F4i, MOD_ALT, VK_F4)
peut etre que ca va stopper le sien pour donner priorité au tient, va
savoir.



--
-----
http://dark.freezee.org/
- Dark Update v2.0
- Dark Emule v0.44b r4
- Dark 3D-X 0.7beta
- Dark Shell 1.20

Merci pour vous réponses, je l'ai codé et ça fonctionne.

"dark poulpo" a écrit :

alors la reponse est deja donné, si ca te convient pas, essaye en
enregistrant le raccourcis clavier alt f4 avec l'api

RegisterHotKey (hWnd, VK_F4i, MOD_ALT, VK_F4)
peut etre que ca va stopper le sien pour donner priorité au tient, va
savoir.



--
-----
http://dark.freezee.org/
- Dark Update v2.0
- Dark Emule v0.44b r4
- Dark 3D-X 0.7beta
- Dark Shell 1.20