Utiliser un pas dans une boucle For .. to .. do

**colorid** · 14/06/2009, 10h12

Bonjour à tous

Dans la boucle qui parcour les lignes d'une image :

Code :

for L:=0 to image.Height-1 do

Comment introduire un pas pour effectuer la boucle toutes le 2 ou 3 lignes par exemple.

Merci à tous

**colorid** · 14/06/2009, 10h24

Si PixStep est le pas déclaré en byte peut-on écrire :

Code :

for L:=0 to image.Height-1 do if L Mod PixStep = 0 then

**Just-Soft** · 14/06/2009, 10h50

salut;

ça me parait logique mais faut pas oublier de réinitialiser le pas après chaque fin de traitement !

**Paul TOTH** · 14/06/2009, 10h58

Envoyé par colorid

Bonjour à tous

Dans la boucle qui parcour les lignes d'une image :

Code :

for L:=0 to image.Height-1 do

Comment introduire un pas pour effectuer la boucle toutes le 2 ou 3 lignes par exemple.

Merci à tous

le plus simple et lisible à mon sens :

Code :

1
2
3
4
5
6
7
 
  Line := 0;
  while Line < Image.Height do
  begin
    ...
    Inc(Line, 3);
  end;

**colorid** · 14/06/2009, 11h09

C'esy en effet beaucoup plus simple
Mille Merci

Langage Delphi