|
Previous Top Next |
Prototype: | (Long pValueToAdd),LONG,PROC |
pValueToAdd | Integer value to add to the TotalValue. |
Returns | Returns the resulting value |
This method adds the passed integer value to the TotalValue property and re-calculates the progress bar percent values so when the progressbar is updated next time it will reflect the correct percentage.
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
Loop I = 1 To Records(Q1)
Get(Q1,I)
!! Do something
ITP.Update
End
Loop I = 1 To Records(Q2)
Get(Q2,I)
!! Do something
ITP.Update
End
ITP.Kill
See also:
[****]