ISModalProcessDisplay.IsTwinProcess

Description

This property is True if the dialog includes the total progress indicator.

Syntax

object.IsTwinProcess

Part	Attribute	Type	Description
`object`	Required	ISModalProcessDisplay	The `object` always implements the ISModalProcessDisplay interface

Restriction: This property is readonly.

Return Value

bool

Example

Display the progress indicator dialog and simulate the long-time data processing with its progress indication.

Dim aIterationsCount
Dim aTotalCount
Dim aIsTwinProcess 
Dim aModalProcessDisplay
Dim i, j  

aIterationsCount = 20
aTotalCount = 12
aIsTwinProcess = True

Set aModalProcessDisplay = Profile.CreateModalProcessDisplay(aIsTwinProcess)
aModalProcessDisplay.Caption = "Data Processing Progress"
aModalProcessDisplay.TotalCaption = "Operations Progress"
aModalProcessDisplay.ProcessName = "Data Processing"

aModalProcessDisplay.SetTotalMaxValue(aTotalCount)
aModalProcessDisplay.MaxValue = aIterationsCount

aModalProcessDisplay.AllowCancel = True
aModalProcessDisplay.CancelKind = 1 'sckStop 

for j = 1 to aTotalCount
  for i = 1 to aIterationsCount
    Sleep(200) 'Imitation of the long operation
    aModalProcessDisplay.Position = i 
  next 'i
  
  aModalProcessDisplay.SetTotalPosition(j)
next 'j

Note:

Version information

Added in v7.8.0