Progressbar avec edit [Résolu]

ced55957 110 Messages postés dimanche 2 mars 2003Date d'inscription 19 juin 2012 Dernière intervention - 22 févr. 2005 à 20:09 - Dernière réponse : japee 1792 Messages postés vendredi 27 décembre 2002Date d'inscription 12 novembre 2016 Dernière intervention
- 22 févr. 2005 à 21:35
bonjour comment fait on pour faire avancer un progress bar en fonction d'un temps donner dans un tedit
ex:
10 seconde dans le tedit et la progress bar arrivera a 100 au bout de ces 10 seconde
merci d'avance
cordialement
Afficher la suite 

Votre réponse

3 réponses

Meilleure réponse
japee 1792 Messages postés vendredi 27 décembre 2002Date d'inscription 12 novembre 2016 Dernière intervention - 22 févr. 2005 à 21:35
3
Merci
Bon, ok...



Petit exemple simplissime : 1 ProgressBar, 1 Button, 1 Edit, 1 Label



var Cnt: Integer;



procedure TForm1.Button1Click(Sender: TObject);

begin

ProgressBar1.Max := StrToIntDef(Edit1.Text, 0);

Cnt := 0;

Timer1.Enabled := True;

end;



procedure TForm1.Timer1Timer(Sender: TObject);

begin

Label1.Caption := IntToStr(Cnt);

ProgressBar1.Position := Cnt;

Inc(Cnt);

if Cnt > ProgressBar1.Max then

Timer1.Enabled := False;

end;



Si ça te convient, n'oublie pas de cliquer sur Réponse acceptée



Bonne prog'



japee

Merci japee 3

codes-sources a aidé 82 internautes ce mois-ci

Commenter la réponse de japee
japee 1792 Messages postés vendredi 27 décembre 2002Date d'inscription 12 novembre 2016 Dernière intervention - 22 févr. 2005 à 20:34
0
Merci
Il faut utiliser les propriétés Min, Max et Position de la ProgressBar.
Commenter la réponse de japee
ced55957 110 Messages postés dimanche 2 mars 2003Date d'inscription 19 juin 2012 Dernière intervention - 22 févr. 2005 à 20:38
0
Merci
oui d'accord.
mais pouvais vous me donné un exemple de code merci!!
Commenter la réponse de ced55957

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.