Bonjour,
Je m'interesse depuis peut à la manipulation des ensemble et me demandait si il était prévu de pourvoir faire une boucle qui execute du code pour chaque élément d'un ensemble.
Bien sur, il est possible de se débrouiller :
Je peux fonctionner comme ca mais je me demandait simplement si il n'y avait pas des solutions prévues. du genre :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 procedure TForm1.Button4Click(Sender: TObject); type Ttruc=(bla,blabla,blablabla); Ttrucs=set of Ttruc; var truc:Ttruc; E:Ttrucs; begin E:=[bla,blablabla]; for truc:= bla to blablabla do if truc in E then begin //code ..... end;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 //code qui ne fonctionne pas: for truc in E do .....
Partager