Hello,

je suis nouveau nouveau a delphi, et j'ai un soucis avec une progressbar :

je fais
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
    Prgbar.Max :=10;
    prgbar.Position := 0;
 while not mydataset.eof do
      begin
         Prgbar.position := prgbar.Position + 1;
          mydataset.next;
      end;
Ceci ne fonctionne pas ma progressbar n'avance pas !
en faisant des tests j'ai réussi a en faire fonctionner une :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
 
prgbar.Position := 0;
Prgbar.Max := 1000;
    for i:=0 to 999 do
    begin
             prgbar.Position :=prgbar.Position+1;
      update;
    end;
Mais le même code avec 10 éléments ne marche pas, et en plus la fonction update de la form fait vraiment ralentir énormément l'exécution.
Je me dis donc que je fait mal qqchose.

??
Thx