Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Active-X contol Progress bar
Message
De
27/05/1997 12:21:21
Renato De Giovanni
Via Fractal Information Systems
São Paulo, Brésil
 
 
À
22/05/1997 14:32:21
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00031939
Message ID:
00033709
Vues:
44
>After 15 minutes of hard research I've nice results: an Active-X Progress
>bar can display itself during long SQL-query or Append from... What should
>you do:
>
>1. Place Progress bar on the form and name it as oleProgressBar.
>2. Add new method to the Form called UpdateBar
>3. Place an following code in this method:
>
> thisform.oleProgressBar.value=_tally
> return .t.
>
>4. In Init event of form place the following code:
>
> thisform.oleProgressBar.max=reccount() && or expected maximum of
>records
>
>5. In your SQL query place the following addition:
>
> select *, thisform.UpdateBar() as update from ddd into cursor tmp
> thisform.oleProgressBar.Value=_tally
>
>I've tried this trick and it work fine on my computer... hope this help!
>
>Have a happy day
>Vladimir Shevchenko

That's an interesting idea!

But for a single SQL-query isn't it more simple and accurate doing:

SET TALK ON
SELECT * FROM MyTables WHERE etc...etc...
SET TALK OFF

BTW, after your input I'm considering if it could be possible (and faster) calling a method within the SQL to add ONLY the selected records into my Treeview Control - instead of issuing the SQL and SCANing it after...

I'll try that soon.

Have a happy day too,

Renato
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform