Delphi 7: Instruction du style ForEach [Résolu]

macpc 12 Messages postés jeudi 9 octobre 2003Date d'inscription 2 juin 2006 Dernière intervention - 15 juin 2005 à 22:58 - Dernière réponse : macpc 12 Messages postés jeudi 9 octobre 2003Date d'inscription 2 juin 2006 Dernière intervention
- 17 juin 2005 à 23:50
Bonjour,

Je cherche une astuce pour remplacer ForEach qui n'existe a priori pas sous D7

pour faire qq chose du style: ForEach toto in [toto1.. toto2] do ......

Merci d'avance

Bruno
Afficher la suite 

Votre réponse

4 réponses

Meilleure réponse
cs_Kenavo 759 Messages postés vendredi 21 mars 2003Date d'inscription 1 octobre 2009 Dernière intervention - 17 juin 2005 à 08:12
3
Merci
Le type Set of String n'est guère correct, mais si c'est un array of String, (tableau dynamique) tu peux écrire



type

TTabArticle = array of string ;

var

TabArticle : TTabArticle




.../...



for i: =0 to Length(TabArticle)-1 do

begin

s := TabArticle[i];

.....

end ;



Ken@vo
<hr size ="2" width="100%">Code, Code, Codec !

[%3C/body ]

Merci cs_Kenavo 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 120 internautes ce mois-ci

Commenter la réponse de cs_Kenavo
cs_Kenavo 759 Messages postés vendredi 21 mars 2003Date d'inscription 1 octobre 2009 Dernière intervention - 16 juin 2005 à 15:54
0
Merci
Au débotté, je dirais :



for toto := toto1 to toto2 do ...




mais visiblement, il doit y avoir un piège ! [toto1..toto2] c'est quoi ?





Ken@vo
<hr size ="2" width="100%">Code, Code, Codec !

[%3C/body ]
Commenter la réponse de cs_Kenavo
macpc 12 Messages postés jeudi 9 octobre 2003Date d'inscription 2 juin 2006 Dernière intervention - 16 juin 2005 à 21:12
0
Merci
Dans mon cas, [toto1..toto2] c'est un ensemble de string: ['de','le','du','la'] par exemple

Bruno
Commenter la réponse de macpc
macpc 12 Messages postés jeudi 9 octobre 2003Date d'inscription 2 juin 2006 Dernière intervention - 17 juin 2005 à 23:50
0
Merci
Merci
C'est effectivement le style de solution que j'ai adopté

Bruno
Commenter la réponse de macpc

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.