Bonjour,
J'utilise ce bout de code dans une fenêtre :
Mais je ne passe jamais dedans lorsque je mets un point d'arrêt...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 procedure TConfirmation.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); begin if Key = VK_ESCAPE then Close; end;
Merci pour votre aide,
ZiP
Partager