Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Class ProgressIndicator FAW
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Class ProgressIndicator FAW
Versions des environnements
Visual FoxPro:
VFP 7 SP1
OS:
Windows 2000 SP4
Database:
Visual FoxPro
Divers
Thread ID:
01019151
Message ID:
01019151
Vues:
84
Hello Craig,

I've taken a liking to your ProgressIndicator class that you published in a FAQ here on the UT (http://www.levelextreme.com/wconnect/wc.dll?LevelExtreme~2,84,14,27458). This is a nice looking all-VFP soultion, and easy to understand, even for an ameteur like me.

The change to make it work in VFP7 was near painless - a new static gif and a few minor tweaks for color and size.

I took the example from the FAQ article and it ran fine. When I dropped it into my app, the window show()s, but no moving boxes action:
LOCAL loProgress
loProgress = CREATEOBJECT("ProgressIndicator")
* PARAMS: caption, min, max, initial value, undetermined, cancel button
loProgress.setup("Selecting Data...", 1, 1, 0, .T., .F.)
loProgress.show()
=INKEY(10,"H") && This works, but 'real' code does not
RELEASE loProgress
I have about 50 lines of code (2 SCANs and a SELECT ... UNION) that takes about 10 seconds to execute. I removed the =INKEY(10,"H") and placed the RELEASE after all the data munching stuff, and just before the REPORT FORM ....., hoping to hypnotize my users with a classy looking progress bar.

So, where have I gone wrong?
Randy Bosma
VFP - Because life is too short to code in something else...
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform