Comment créer un TShiftState

Bonjour,

J'ai besoin de créer un objet de type "TShiftState" qui contienne la valeur "ssCtrl" pour ensuite le passer en paramètre à une fonction qui demande un TShiftState.

Mais impossible de trouver comment faire...

c'est un ensemble (set of) =>

Code:

---

MyShiftState:=[ssCtrl];

---

Merci 8-)