Suivre l'exécution d'une fonction par un Progress barRésolu

Question

Bonjour,
j'ai une fonction qui consulte une table volumineuse. Elle prend su temps. je voulais demander commen suivre son avnacement par un progress bar?
Merci.

Bacterius · Accepted Answer

Bonjour,
il te suffit d'incrémenter la progressbar à chaque fois qu'une action est faite dans ta fonction.

Exemple : une fonction qui divise sans arrêt un chiffre par 2 pour un nombre d'iterations défini, et qui donne le résultat (bon c'est bidon mais c'est un exemple) : 

function LoopDivByTwo(Num: Integer, Iters: Integer): Integer;
Var
   I: Integer;
begin
        ProgressBar.Max := Iters;
         ProgressBar.Position := 0;
         for I := 1 to Iters do
            begin
                     ProgressBar.Position := ProgressBar.Position + 1;
                     Num := Num div 2;
            end;
        Result := Num;
end;

ProgressBar est bien sûr ta progressbar (trop fort l'humour ...).
N'oublie pas de déclarer la fonction dans Interface, et de noter la fonction dans implémentation de cette façon : 

function TaForm.LoopDivByTwo(Num: Integer, Iters: Integer): Integer;

Tu vois la prog' c'est simple quand on sait comment procéder 

Allez bonne continuation ! 

Cordialement, Bacterius !

PS : pense réponse acceptée

BernieNoel68 · Answer

A quoi ressemble ta fonction?

Caribensila · Answer

Schalute !!!

«Elle prend su temps» ???
Oué... mais avec le "progress bar", elle richque de rentrer au p'tit matin compléchement schlass!
Ché moi qui te le dit!
 Avnacement ou pas  avnacement... Cha retarde!

cs_cantador · Answer

Bonchoir,
cha ché ben vré cari..
fodré, puto usé din thhhhrrrrédddd...

cantador

Caribensila · Answer

Tatouttafé raison, chantador!
Allez! On va voir au " Chriiiiid " !

Caribensila · Answer

...chizisui

hajerhajer · Answer

Merci beaucoup Bacterius, ce que tu m'as dit m'as aidée énormément  !
Bn chance!

Bacterius · Answer

Bonsoir,
de rien c'est fait pour ça un forum ! 

Bonne continuation à toi :)

Cordialement, Bacterius !

PS : lol carbensila CHIZISUI mdrrr

Suivre l'exécution d'une fonction par un Progress bar

8 réponses

Votre réponse

Discussions similaires