set et get en delphi

bonjour tous le monde
est-ce que quelcun peut me donner l'equivalent de ce code (écrit en C#) en Delphi :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

get { gsCoercivity = coercivity; return coercivity; } set { if (value == "l" || value == "h") { coercivity = string.Format("\x1bPmc;{0}\x0d", value); } }

---

ou bien comment utiliser get et set en Delphi

Il s'agit d'une propriété en lecture/écriture, cf. http://laurent-dardenne.developpez.c...phiDotNet/#L10.
Je te laisse consulter la doc de Delphi.