Bonjour, j'aimerais simplement faire un double incrément de ma variable j dans une boucle FOR.
J'ai essayé un j := j + 2 mais le compilateur me refuse cette commande

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
    SetKeyCode(EdtKeyCode.Text);
    LibraryList := Decode(CryptCode.Text);
    for j := 1 to Length(LibraryList) do
    begin
      if (StrScan(Alphanum2,LibraryList[j]) <> nil) and 
         (StrScan(Alphanum2,LibraryList[j+1]) <> nil) and 
         (not (j+1) <= Length(LibraryList)) then
      begin
        SetLength(LibOFML,j);
        LibOFML[j-1] := LibraryList[j] + LibraryList[j+1];
//        inc(j);
//        j := j +2;
      end;
Existe il une solution autre que de mettre une variable additionnelle dans ma boucle?