[RESOLU]Utilisation d'une progressbar ?
Hello,
je suis nouveau nouveau a delphi, et j'ai un soucis avec une progressbar :
je fais
Code:
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:
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 :)
