Icetips Utilities Documentation 1/14/2012     Progress Class:  SetCurrentValue

Previous  Top  Next

This method sets the CurrentValue property and then calls the Calculate method.  This method can be used to "jump" the progress bar in case it should indicate that something has been skipped.  Obviously the value should be in the range of 0 to the value of the TotalValue.

Example:

ITP  ITProgressClass

Q1   Queue

F1     Long

     End

Q2   Queue

F2     Byte

     End

I    Long

 Code

 !! Queues are filled here.

 ITP.Init(?Progress1,Records(Q1),True)  !! Initialize with the number of records from Q1

 ITP.AddToCurrentValue(Records(Q2))     !! Add the number of records from Q2

 If FirstQueueShouldBeIncluded

   Loop I = 1 To Records(Q1)

     Get(Q1,I)

     !! Do something

     ITP.Update

   End

 Else

   ITP.SetCurrentValue = Records(Q1)    !! Set the current value to the end of Q1.

 End

 Loop I = 1 To Records(Q2)

   Get(Q2,I)

   !! Do something

   ITP.Update

 End

 ITP.Kill

See also: