Discussion :

[FranckAlain]

Je suis programmateur novice en Delphi 6.

Ce matin j'ai créé un programme simple de mise à zero d'une variable de type array (voir fichier zip joint).
Projectessai.zip

Je peux arrêter le programme au niveau du curseur via la touche de compilation F4 au niveai de at[i,j] := ''.

A ce moment j'utilise les touches Ctrl F7 pour pouvoir afficher le contenu des variables et je remarque que l'indice i ne commence pas par 1 mais par 200 et j par 91

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
procedure TForm1.Button1Click(Sender: TObject);
var i, j : integer;
begin
For i := 1 to 200 do begin
   for j := 10 to 100 do begin
      at[i,j] := '';
      end;
    end;
end;

Quelqu'un a-t-il une idée pour le faire fonctionner correctement et dans l'ordre pour i 1 => 200 et j de 10 => 100.

Merci

[Paul TOTH]

cela a-t-il une importance ?

car le compilateur préfère les boucles décroissantes pour des raisons d'optimisation. quand il estime qu'il peut changer le sens de parcours de la boucle sans perturber le code, il le fait

ça se désactive dans les options de compilation

[kaouane]

si tu ajoute quelque chose avec a[i,j]:='' tu va voir que le sens est respecté.
par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
For i := 1 to 200 do
    for j := 10 to 100 do
      begin
        at[i,j] := '';
        Memo1.Lines.Add(inttostr(i)+'   '+inttostr(j));
      end;

[FranckAlain]

Merci beaucoup pour ces réponses. Mon problème est résolu.