Discussion :

[petitprince]

Salut!
Voilà mon souci: j'essaie de faire, dans une boucle for, une pause, et de la reprendre dès qu'une condition est remplis.
Je fais:

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
16
17
var
  AlerteSuivante: boolean;
 
procedure Traitement;
var
  i: Integer;
begin
  for i:=1 to StringList.Count-1 do 
  begin
    AlerteSuivante:= true;
 
    // Traitement
 
    while AlerteSuivante do
      Application.ProcessMessages;
  end;
end;

Mais voilà, ce code bouffe à lui seul 50% du CPU!!
Peut-on faire plus simple pour alléger le tout ?
Merci...