Bonjour,
comment traduire cette boucle car j'ai reçu un message d'erreur du compilateur delphi "Opérateur non applicable à ce type d'opérande" :
Merci.Code:
1
2
3
4
5
6
7
8
9
10 var liste : TStringList; s : string; begin for s in liste do ... end;
Version imprimable
Bonjour,
comment traduire cette boucle car j'ai reçu un message d'erreur du compilateur delphi "Opérateur non applicable à ce type d'opérande" :
Merci.Code:
1
2
3
4
5
6
7
8
9
10 var liste : TStringList; s : string; begin for s in liste do ... end;
Code:
1
2
3
4
5
6
7
8
9
10 var liste: TStringList; s: String; i: Integer; begin for i := 0 to High(liste) do begin s := liste[i]; ... end; end;
toujours erreur "Type imcompatibles" au niveau de :
Code:
1
2 for i := 0 to High(liste) do begin
Code:for i:=0 to Liste.Count-1
Bien sûr l'objet "liste" a été créé et peuplé avant ?
Code:liste := TStringList.Create;
Question N°1 : Utilises-tu Delphi 2006 au minimum ?
tu peux écrire cela (il me semble)
La TStringList implémente l'interface IEnumerator, comme le souligne GoustiFruit, ta liste est correctement instanciée ?Code:
1
2
3
4
5
6
7
8 var liste : Array[1..3] of string = ('Delphi', 'C++', 'Java'); s : string; begin for s in liste do ShowMessage(s); ... end;
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 var liste : TStrings; s : string; begin liste := TStringList.Create(); try liste.Add('Delphi'); liste.Add('C++'); liste.Add('Java'); for s in liste do ShowMessage(s); finally liste.Free(); end; ... end;