Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Weird Mouse behavior
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Divers
Thread ID:
00456500
Message ID:
00456520
Vues:
29
...snip...

>If you put your WAIT WINDOW NOWAIT up before you start processing, you should see it. If you have a progress bar, you'll need to provide some break in the action, like between your SQL statements to update it. Sounds like maybe you've got a .LockScreen=.T. somewhere in your code? You should be able to see your WAIT WINDOW. Post a sample or at least something representative.
with thisform
	** Create the progressbar and initialize it to zero.
	set classlib to cprogres additive
	this.AddObject('oProgress','cprogresscontainer',0,nTotRecs,.T.)

	** Customize the title
	this.oProgress.SetTitle('Ledger Analysis')

	** Customize the status
	this.oProgress.SetStatus('Looping')
	
	select sccoa
	scan
		select scstloc
		scan 
			nYTDAmt = 0 && Blank out the YTDAmt for each Location
			for nMonth = 1 to 12
				nRecno = nRecno+1
				.oProgress.SetValue(nRecno)
				*****Some More Code with an insert command******
			endfor
		endscan
	endscan

	** Remove the progressbar from the form.
	this.RemoveObject('oProgress')
	release classlib cprogres

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

Click here to load this message in the networking platform