::SetNextCollector

This command is used to set the next collector to be activated when this mdlTempListCollector reference is resolved.

Syntax

::model::mdlTempListCollector::SetNextCollector argPresent argNext argNextType

Application

MotionView Tcl

Description

This command is used to set the next collector to be activated when this mdlTempListCollector reference is resolved.

Inputs

argPresent
This argument is the path of the mdlTempListCollector widget for which you are specifying the next collector to be activated.
argNext
This is the path of the next collector widget that is to be activated after this mdlTempListCollector reference is resolved.
argNextType
This is the type of the next collector widget that is to be activated. If it is not specified, then the type is assumed to be another mdlTempListCollector. If the next collector to be activated is not an mdlTempListCollector, then this argument needs to be set to that type (for example, mdlTempCollector/mdlCollector/mdlListCollector).

Example

set first_var ""
set second_var ""
set third_var ""
set sel1 ""
set sel2 ""

set top [toplevel .test]
set colFrm [frame $top.tmpFrm1 ]
pack $colFrm
set col1 [::model::mdlTempCollector $colFrm.col1 ::first_var "Point" "Point" ]
pack $col1
set col2 [::model::mdlTempCollector $colFrm.col2 ::second_var "Point" "Point" ]
pack $col2
set types {{Body Body ::sel1} {Graphic Graphic ::sel2}}
set col3 [::model::mdlTempListCollector $colFrm.col3 ::third_var "$types" ]
pack $col3
# make the collectors get activated in the following order 1-3-2-1
::model::mdlTempCollector::SetNextCollector $col1 $col3 "mdlTempListCollector"
::model::mdlTempListCollector::SetNextCollector $col3 $col2 "mdlTempCollector"
::model::mdlTempCollector::SetNextCollector $col2 $col1

Errors

None.