WDForge.org - Forums

Message d'attente pendant un traitement long ..Comment faire ??

Sujet: Message d'attente pendant un traitement long ..Comment faire ??
par Anonyme sur 9/12/2004 14:57:20

Bonjour,

Je voudrais afficher un message d'attente (animé) pendant un traitement long (requete SQL + remplissage d'une table mémoire)...

J'ai essayé l'ouverture d'une fenetre fille avec un champ image animé..Ca fonctionne mais l'animation ne se fait pas.

J'ai essayé une fenetre fille avec un libéllé animé. Idem

J'ai essayé avec un timer, pas de résultat non plus ..

Voici un peu de code

Fenetre principale :

nTimer = TimerSys(Clignote,100,1)
Multitache ()
OuvreFille(fProgress)

// Traitement long
sReq = "SELECT AR_REF,AR_DESIGN, AR_PRIXVEN, FA_CODEFAMILLE FROM F_ARTICLE"
bres = HExécuteRequêteSQL(Req1,"Sage",hRequêteSansCorrection,sReq)
SI bres ALORS
FichierVersTableMemoire(tArticles,Req1)
Ferme(fProgress)
FinTimerSys(1)
SINON
Erreur ("Erreur dans l'éxecution de la requéte")
Ferme(fProgress)
FinTimerSys(1)
FIN

Timer Clignote
PROCEDURE Clignote()

SI Position (fProgress.Libellé1,"...",1) = 0 ALORS
fProgress.Libellé1 +=" ..."
SINON
fProgress.Libellé1 = "!!!"
FIN

La fenetre fProgress est une fenetre libre, avec un libéllé et/ou un champ image animé

Comment avoir l'animation du texte ou de l'image pendant l'execution du traitement de la fenetre mère ??

Si quelqu'un a une piste de réflexion ou des idées, elles sont bienvenues..

Merci à tous

Cordialement