Discussion :

[delphi5user]

Bonjour.
D'après votre expérience, qu'elle est le meilleur moyen d'optimer la boucle suivante :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
 trouve:=true;
 while ( trouve ) do begin
  if ( query.Eof ) then
    trouve := false
  else begin
    vtmp := query.fieldbyname('code').asstring;
    if ( vtmp = 'TOTO' ) and ( bool1=false ) then begin
    	query.Next;
        continue;
    end;
    {* Traitement *}
   end;
   query.Next;
  end;

Peut-on éviter d'avoir 2 fois query.Next??

Merci d'avance.