This will work, as long as the loProgress object has a method named Update(). It introduce thight coupling between the objects because each object need to know something about the other.
>Pass an object reference to your common progress bar dialog so that it can control it via com....
>
>MyUIProcedure()
>
>local loDCOMEClass,loProgress
>
>loDCOMClass = createobj('myOLEServer.MyClass')
>
>loProgress = createobj('ProgressBar','Running the process',0,100)
>
>loDCOMClass.DoThing( loProgress )
>
>return
>
>************
>Then, your automation would be like...
>
>Function DoThing
>
>lparam loProgress
>
>do while ThisNeedsToBeRunning
>
>*** Lots of code here *****
>
>** Update Progress Bar ****
>
>loProgress.Update( 'Running this process', nIteration, nTotal )
>
>enddo
Précédent
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement