GESTION D'UN TYPE ENUMÉRÉ DANS TLISTBOX
f0xi
Messages postés
4205
Date d'inscription
samedi 16 octobre 2004
Statut
Modérateur
Dernière intervention
12 mars 2022
-
19 oct. 2012 à 15:35
f0xi Messages postés 4205 Date d'inscription samedi 16 octobre 2004 Statut Modérateur Dernière intervention 12 mars 2022 - 19 oct. 2012 à 15:35
f0xi Messages postés 4205 Date d'inscription samedi 16 octobre 2004 Statut Modérateur Dernière intervention 12 mars 2022 - 19 oct. 2012 à 15:35
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/54371-gestion-d-un-type-enumere-dans-tlistbox
https://codes-sources.commentcamarche.net/source/54371-gestion-d-un-type-enumere-dans-tlistbox
19 oct. 2012 à 15:35
type
TQuelquechose = (qcA, qcB, qcC);
const
CQuelqueschoseNames : array[TQuelquechose] of string = ('A','B','C');
Est une approche déjà plus rapide pour éviter les longues prise de tête avec les case*of
Il n'y a pas de vraiment de limite à l'imbrication de type énumérés en index de tableau, exemple :
type
TEnumNamesType = (entOrd, entShort, entLong, entCustom);
TEnumeration = (eA, eB, eC);
const CEnumerationNames array[TEnumNamesType, TEnumeration] of string (
(ord(eA), 'A', 'ElementA', 'rouge'),
(ord(eB), 'B', 'ElementB', 'bleu'),
(ord(eC), 'C', 'ElementC', 'vert')
);
Il existes pleins d'autres trucs intéréssant à découvrir dans les unités de base de Delphi.