uses TypInfo;
for Theme := Low(TSmoothColor) to High(TSmoothColor) do
CB1.Items.Add(GetEnumName(TypeInfo(TSmoothColor), ord(Theme)));
L'inverse est juste un transtypage : Theme :=...
Type: Messages; Utilisateur: Andnotor
uses TypInfo;
for Theme := Low(TSmoothColor) to High(TSmoothColor) do
CB1.Items.Add(GetEnumName(TypeInfo(TSmoothColor), ord(Theme)));
L'inverse est juste un transtypage : Theme :=...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.