Différences
Ci-dessous, les différences entre deux révisions de la page.
| Les deux révisions précédentes Révision précédente Prochaine révision | Révision précédente | ||
|
prog:lazarus:types:enum [16/03/2021 14:58] thierry [Déclaration d'une énumération + Set Of] |
prog:lazarus:types:enum [15/09/2024 13:15] (Version actuelle) thierry [Opérateur * pour verifier plusieurs membres du Set] |
||
|---|---|---|---|
| Ligne 55: | Ligne 55: | ||
| x:= GetEnumName(TypeInfo(TMonthType), Ord(i)); | x:= GetEnumName(TypeInfo(TMonthType), Ord(i)); | ||
| end; | end; | ||
| + | </code> | ||
| + | |||
| + | <code pascal> | ||
| + | var | ||
| + | vHandlerType: TDragManagerHandlerType; | ||
| + | begin | ||
| + | for vHandlerType := Low(TDragManagerHandlerTypee) to High(TDragManagerHandlerType) do | ||
| + | FreeThenNil(FDragManHandlers[vHandlerType]); | ||
| + | end; | ||
| </code> | </code> | ||
| == Passer d'un Type énuméré a un ordinale et réciproquement == | == Passer d'un Type énuméré a un ordinale et réciproquement == | ||
| Ligne 89: | Ligne 98: | ||
| if January in Months then... | if January in Months then... | ||
| </code> | </code> | ||
| + | |||
| + | ==== Opérateur * pour verifier plusieurs membres du Set ==== | ||
| + | <code pascal> | ||
| + | if [csLoading,csDestroying,csDesigning]*ComponentState=[] then ... | ||
| + | </code> | ||
| + | |||
| + | ==== Include / Exclude ==== | ||
| + | <code pascal> | ||
| + | Include (FComponentState,csUpdating); | ||
| + | ... | ||
| + | Exclude(FComponentState,csUpdating); | ||
| + | |||
| + | </code> | ||
| + | |||
| + | |||
| ==== Comprendre les sets ==== | ==== Comprendre les sets ==== | ||