Bonjour à tous, je viens vers vous afin d'optimiser mon code, car je le trouve très répétitif et je pense que l'on doit pouvoir le réduire très fortement avec un switch ou autre mais je ne vois pas comment le mettre en place.

Voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("3 KVA ST"))
      {
            PrixAbo = Abo3KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP3;
            EditPrixHC->Enabled=false;
 
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("6 KVA ST"))
      {
            PrixAbo = Abo6KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("9 KVA ST"))
      {
            PrixAbo = Abo9KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("12 KVA ST"))
      {
            PrixAbo = Abo12KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("15 KVA ST"))
      {
            PrixAbo = Abo15KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("18 KVA ST"))
      {
            PrixAbo = Abo18KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("24 KVA ST"))
      {
            PrixAbo = Abo24KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("30 KVA ST"))
      {
            PrixAbo = Abo30KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("36 KVA ST"))
      {
            PrixAbo = Abo36KVA;
            TarifHC = PrixHC3;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=false;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("6 KVA DT"))
      {
            PrixAbo = Abo6KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("9 KVA DT"))
      {
            PrixAbo = Abo9KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("12 KVA DT"))
      {
            PrixAbo = Abo12KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("15 KVA DT"))
      {
            PrixAbo = Abo15KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("18 KVA DT"))
      {
            PrixAbo = Abo18KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("24 KVA DT"))
      {
            PrixAbo = Abo24KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("30 KVA DT"))
      {
            PrixAbo = Abo30KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
      if (ComboPuissance->ItemIndex == ComboPuissance->Items->IndexOf("36 KVA DT"))
      {
            PrixAbo = Abo36KVADT;
            TarifHC = PrixHC;
            TarifHP = PrixHP;
            EditPrixHC->Enabled=true;
      }
Merci par avance de votre aide