Discussion :

[tarmo57]

salut tous comment faire une remise a zero d'un progressBar svp ?

Code :

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

1
2
3
4
5
6
7
8
9
procedure TForm16.Timer1Timer(Sender: TObject);
begin
 ProgressBar1.Position:=ProgressBar1.Position+10
end;
 
procedure TForm16.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 ProgressBar1.Position:=ProgressBar1.Position+10
end;

voici mon code je fais juste patienter
mais si j ouvre une nouvelle foi la form avec le progressBarl .le progressBar est deja activé

merci de votre aide

[dragonno]

Code :

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

1
2
3
4
5
 
procedure TForm16.FormClose(Sender: TObject; var Action: TCloseAction);
begin
 ProgressBar1.Position:=0;
end;

Teste et quand c'est OK clique sur Resolu sinon tu rappelle ^^

[zemeilleurofgreg]

Bonjour tarmo57,

tout simplement comme ceci :

Code :

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

ProgressBar1.Position:=0

[zemeilleurofgreg]

t'as été plus rapide que moi Dragonno

[dragonno]

ça a tenu à peu

[tarmo57]

bravo grand merci les gars