Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Russell Hill
  Where is Russell Hill?
 Sydney
 Australia
 Russell Hill
 To: Nadir Khan
  Where is Nadir Khan?
 Karachi
 Pakistan
 Nadir Khan
 Tags
Subject: RE: Query
Thread ID: 331083 Message ID: 331103 # Views: 59 # Ratings: 0
Version: Visual FoxPro 9 SP2 Category: Forms
Date: Monday, December 26, 2011 8:44:41 PM         
   


> Dear Experts
>
> I want progress bar when i run SQL like
>
> select * from reg_form
>
> after this i want to indicate progress bar
>
> can any help me or any idea how is it possible
>
> thanks
> nadir

Try the following (thank Boris):

SQLPROGRESS(.T.)

** Run your query here.

SQLPROGRESS(.F.)

FUNCTION SqlProgress(lbShowProgress)
   IF m.lbShowProgress
      DEFINE WINDOW WndGlass FROM -100,-100 TO -10,-10
      SET TALK ON WINDOW WndGlass
      SET TALK ON
      SET NOTIFY ON
   ELSE
      RELEASE WINDOWS WndGlass
      SET TALK ON WINDOW
      SET TALK OFF
      SET NOTIFY OFF
   ENDIF
RETURN ""


ENTIRE THREAD

Query Posted by Nadir Khan @ 12/26/2011 5:14:46 PM
RE: Query Posted by Russell Hill @ 12/26/2011 8:44:41 PM
RE: Query Posted by Nadir Khan @ 12/28/2011 10:56:01 AM
RE: Query Posted by mk sharma @ 12/28/2011 3:47:18 PM
RE: Query Posted by Jun Tangunan @ 12/29/2011 5:19:22 AM