Welcome To The Home Of The Visual FoxPro Experts  
home. signup. forum. archives. search. google. articles. downloads. faq. members. weblogs. file info. rss.
 From: Yousfi Benameur
  Where is Yousfi Benameur?
 El Bayadh
 Algeria
 Yousfi Benameur
 To: Marcos Pereira
  Where is Marcos Pereira?
 Rio de Janeiro
 Brazil
 Marcos Pereira
 Tags
Subject: RE: thermometer in index
Thread ID: 209311 Message ID: 209435 # Views: 1 # Ratings: 0
Version: Visual FoxPro 9 Category: General VFP Topics
Date: Sunday, December 28, 2008 8:05:01 PM         
   


> good night in brazil.
>
> how do use thermometer in index on command.
>
>
> ex.:
>
CASE ARQUIVO = "xxxxSUAR"
> NOMEARQ = "xxxxSUAR"
> INDEXACAO("FILIAL + NOME","TAG1","xxxxSUAR.001")
> 
> PROCEDURE INDEXACAO(A,C,B)
> PUBL PARC_EFE,ARQ,IND, cKey 
> 
> ARQ = NOMEARQ + ".DBF" 
> IND = ALLTRIM(B) 
> ckey = ALLTRIM(a) 
> 
> DO WHILE .T.
> USE &NOMEARQ EXCLUSIVE IN 0
> SELE &NOMEARQ
> GO TOP
> EXIT
> ENDDO
> oProgress=createObject("myThermo")
> oProgress.nMaxValue=reccount()
> oProgress.nValue=1
> oProgress.Show()
> 
> a1=SECONDS()
> 
> IF !FILE(IND) 
> INDEX ON IndexProgress(&A,RECNO(),RECCOUNT()) tag &C OF &B
> oProgress.Release()
> ENDIF 
> SELECT (nomearq)
> USE 
> RETURN(.T.)
> 
> FUNCTION IndexProgress
> LPARAMETER tcValue, tnRecno, tnReccount
> oProgress.nValue=tnRecno
> oProgress.lBl.caption = ckey
> oProgress.Lbl_High.caption = "Criando Indice : " + nomearq
> oProgress.refresh()
> RETURN tcValue
> ENDFUNC
> 

>
> Obrigado,thanks

Hi marcos
In indexing you cannot control the progession of this operation.Its a block operation and cannot apply record by record...
You can change the mouse (hourglas in this operation and restore to default in end).
you can also at start, animate a small avi (by an activex) at the begining at stop it/hide at the end(like an operation copy file or download).
regards

ENTIRE THREAD

thermometer in index Posted by Marcos Pereira @ 12/27/2008 6:21:30 AM
RE: thermometer in index Posted by tushar @ 12/27/2008 7:11:34 AM
RE: thermometer in index Posted by Marcos Pereira @ 12/27/2008 11:55:45 AM
RE: thermometer in index Posted by Mike Yearwood @ 12/27/2008 4:38:33 PM
RE: thermometer in index Posted by Marcos Pereira @ 12/27/2008 5:05:11 PM
RE: thermometer in index Posted by Mike Yearwood @ 12/28/2008 1:58:43 PM
RE: thermometer in index Posted by Yousfi Benameur @ 12/28/2008 8:05:01 PM
RE: thermometer in index Posted by Marcos Pereira @ 12/28/2008 10:19:30 PM
RE: thermometer in index Posted by Yousfi Benameur @ 12/28/2008 10:27:43 PM
RE: thermometer in index Posted by Marcos Pereira @ 12/28/2008 10:54:30 PM
RE: thermometer in index Posted by Glenn Villar @ 12/29/2008 3:04:40 AM
RE: thermometer in index Posted by Marcos Pereira @ 12/29/2008 1:33:55 PM